Текущий архив: 2003.11.24;
Скачать: CL | DM;

Вниз

Господа, подскажите, как правидьно организовать большой проект   Найти похожие ветки 

← →
OlegGashev ©   (2003-11-13 16:04) [40]

Не сказано было. Если форма модальная, а их большинство в проекте, проще сразу освобожать память после закрытия формы.
То есть что-то в таком роде:


procedure TSDIAppForm.HelpAbout1Execute(Sender: TObject);
var AboutBox:TAboutBox;
begin
AboutBox:=TAboutBox.Create(self);
AboutBox.ShowModal;
AboutBox.Free;
end;


---

← →
Silver Alex ©   (2003-11-13 16:06) [41]

понял, этот пример просто для MDI-форм, потому что они как Create так сразу и Show, перепиши чуть-чуть здесь

> if not Result then
> AFormClass.Create(Application);

if not Result then
with AFormClass.Create(Application) do
Show;

---

← →
Anatoly Podgoretsky ©   (2003-11-13 16:18) [42]

OlegGashev © (13.11.03 16:04) [40]
Для данного случае еще более правильнее слежующее


procedure TSDIAppForm.HelpAbout1Execute(Sender: TObject);
begin
with TAboutBox.Create(self) do
try
ShowModal;
finally
Free;
end;
end;


---

Страницы: 1 2 вся ветка

Текущий архив: 2003.11.24;
Скачать: CL | DM;

Наверх

Память: 0.53 MB
Время: 0.028 c