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

Вниз

Кто нибудь создавал формы в initialization ???   Найти похожие ветки 

← →
kronprince ©   (2002-12-04 20:32) [0]

Наступал на грабли во втором варианте???
Требуется создать форму раньше других и убить позже всех
Есть два варианта (требуется создать form1 )
1.

program RuntimeFormCreate;
...
try
form1:=Tform1.Create(nil);
Application.CreateForm(TformMain, formMain);
Application.Run();
finally form1.Free()
end;{try}

2.

unit uForm1;
...
initialization
form1:=Tform1.Create(nil);
initialization_uForm1 := true;
finalization
form1.Free();
end.


---

← →
MaximatorVeter ©   (2002-12-04 21:16) [1]

>создать форму раньше других и убить позже всех
Совсем не гуманно.

---

← →
Shadow ©   (2002-12-04 21:38) [2]

2 kronprince
А какие грабли?

---

← →
Antonius ©   (2002-12-04 21:51) [3]

первая созданная форма автоматом станет главной, т.е. application.mainform. Может это и не грабли? Если это не поправить (как?) то закрытие второй формы не приведет к закрытию программы, например.

---

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

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

Наверх

Память: 0.47 MB
Время: 0.013 c