Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
Sql запрос и еще... 17.09.02 14:50 Число просмотров: 1043
Автор: _Inquisitor_ Статус: Незарегистрированный пользователь
|
> Фигня в том, что чеки уже сформированы и мне при закрытии > окна с чеками надо считать их значения (т.е. при событии > OnClose), сформировать zzz из их caption. Нормальным > способом будет долго и много, надо короче ... Ну тогда что-то типа
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var i: integer;
TC: TComponent;
begin
For i:=0 to Form1.ComponentCount-1 do
begin
TC:=Form1.Component[i];
if (TC is TCheckBox) then
if (TC as TCheckBox).Checked then zzz:=zzz+(TC as TCheckBox).Caption;
end;
end;
PS Научись общаться с хелпом, иногда помогает ;-))
|
|
|