Текущий архив: 2003.06.09;
Скачать: CL | DM;
Вниз
закрытие формы Найти похожие ветки
← →
Andrey V. (2003-05-29 07:38) [0]Если я вызываю форму так :
with TEditForm.Create(Application) do begin
try
ShowModal;
finally
Free;
end;{try}
end;{with}
имеет ли смысл писать :
procedure TEditForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:=caFree;
end;
← →
Forester © (2003-05-29 08:07) [1]Никакого смысла. Подобный подход используется для закрытия немодальных форм.
← →
Skier © (2003-05-29 08:22) [2]
> имеет ли смысл писать :
Нет.
Страницы: 1 вся ветка
Текущий архив: 2003.06.09;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.02 c