Вниз
Скачать: CL | DM;

Первая открывающаяся флрма обязана быть главной?   Найти похожие ветки 

 
Programmer1 ©   (2003-02-28 11:27) [0]

Уважаемые знатоки, поделитесь, пожалуйста, своими соображениями по поводу такого вопроса:

При запуске проекта появляется окно для ввода пароля, рабочей директории и комментария.
Мне кажется нецелесообразно форму этого окна делать главной формой проекта, как Вам кажется?

Если открывающаяся следом за ней форма быдет главной, то как это программно организовать, ведь в учебнике по дельфи написано, что главная форма открывается первой???

Спасибо :)


 
Skyle ©   (2003-02-28 11:38) [1]

Это можно сделать например так: создавать ручками форму с паролем в файле проекта до создания всех остальных форм (сразу после Application.Initialize). В этом случае всё будет пучком..:)


 
REA ©   (2003-02-28 11:41) [2]

ShowMainForm property (TApplication)
property ShowMainForm: Boolean;
Determines whether the application shows its main form on startup.


 
Smashich ©   (2003-02-28 11:54) [3]

Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
with TPasswordForm.Create(nil) do begin
ShowModal;
Free;
end;
Application.Run;
end.


 
Vladimir ©   (2003-02-28 12:07) [4]

begin
Application.Initialize;
Form2:=TForm2.Create(Application);
Form2.ShowModal;
Form2.Release;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

Form1 остается главной.


 
Anatoly Podgoretsky ©   (2003-02-28 12:08) [5]

Programmer1 © (28.02.03 11:27)
Не целесообразно - главная форма это главная форма, а диалог ввода пароля это диалог и не надо их путать и нагружать не своими функциями.


 
Programmer1 ©   (2003-02-28 16:04) [6]

to Smashich © :
Cкажите, пожалуйста, а почему Вы в Вашем примере кода TPasswordForm.Create(nil) в качестве владельца формы указали nil?


 
Anatoly Podgoretsky ©   (2003-02-28 16:22) [7]

Это не важно, можно и другое, просто без разницы, но наверно он там генерирует исключение.


 
Programmer1 ©   (2003-03-03 17:43) [8]

А как это, "генерирует исключение"?
В результате вызова TPasswordForm.Create(nil) возникнет исключение, чтоли?



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c
1-39343
Kofey
2003-02-28 00:42
2003.03.13
Массив


1-39335
hooch
2003-03-01 08:43
2003.03.13
scroll


1-39302
Term
2003-03-04 09:38
2003.03.13
Серверы Автоматизации..........


1-39288
Эдуард
2003-03-03 22:31
2003.03.13
Как узнать как было запущено приложение?


6-39451
Владимир
2003-01-12 07:30
2003.03.13
Свой Firewall




   Наверх