Form

← →
Samvel (2002-04-29 10:48) [0]

Извеняюсь за надоедливость но вопрос стоит так:
В Project manager - options созданные мной формы переношу из окна autocreate окно available. До этого переноса форму я активизировал процедурой formX.showmodal, а теперь ее как активизировать?
Заранее спасибо а то потом будет некогда

← →
McSimm © (2002-04-29 10:54) [1]

можно так:
with TFormX.Create(Self) do begin // настроить параметры Caption := "Моя модальная неавтосозданная форма"; Left := 10; if ShowModal = mrOk then ... else ... end

← →
McSimm © (2002-04-29 10:57) [2]

Чуть не забыл.
Форму надо уничтожить. Для этого надо в предыдущем примере поставить Free перед End.
Или в обработчике TFormX.OnClose написать Action := caFree, тогда форма уничтожится при закрытии сама. В этом случае нельзя будет использовать ее данные после ShowModal.

Если в методах созданной формы будут какие ньть exception, то она может правильно не закрыться и не освободить память...
я обычно так делаю:

Form1 := TForm1.Create(Application) try if Form1.ShowModal = mrOk then begin ... end else begin ... end; finally FreeAndNil(Form1); end;

Form Найти похожие ветки