Легенда:
 новое сообщение
 закрытая нитка
 новое сообщение
 в закрытой нитке
 старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
Sql запрос и еще... 17.09.02 13:24 Число просмотров: 974
Автор: Sandy <Alexander Stepanov> Статус: Elderman
|
> 2) Допустим в моем приложении в delphi есть 20 чекбоксов на
> одной форме с именами cb_1, cb_2, ..., cb_20. Я проверяю их
> значение и в зависимости от их значения я делаю в общемто
> одну и туже апперацию. Например:
> if cb_1.checked=true then zzz:=zzz+cb_1.caption+', '; //
> zzz: string
> if cb_2.checked=true then zzz:=zzz+cb_2.caption+', ';
> ...
> if cb_20.checked=true then zzz:=zzz+cb_20.caption;
А если так:
for I:=0 to Form.ComponentCount-1 do begin
if StrLeft(Form.Components[I].Name, 3)="cb_" then begin
if Form.Components[I].Checked=1 then begin
zzz := zzz + Form.Components[I].Caption;
end;
end;
end;
---
|
|
|
подробно о проекте
Анализ криптографических сетевых...
