прорисовка формы при старте - Общие вопросы Delphi

designer999 · 12.11.2010, 00:39

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

Код:

Application.CreateForm(TAuthentification1, Authentification1);
Authentification1.Show;

если же сдеать

Код:

Application.CreateForm(TAuthentification1, Authentification1);
Authentification1.Show;
Application.run;

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

как можно запустить форму при запуске уже с отрисоваными компонентам ? буду благодарен очень за помощь

mihali4 · 12.11.2010, 00:49

Приведите полный код файла проекта .dpr

designer999 · 12.11.2010, 01:03

ну полный код не могу так как программа не паблик)
ну примерно так выглядить

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin

// КОД

Application.CreateForm(TAuthentification1, Authentification1);
Authentification1.Show;

//проверка на mysql сервере

Authentification1.free;
// КОД

end;

на Authentification1 лежит ProgressBar c Style:=pbstMarquee; моя цель такова, пока исполняется аутентификация с Mysql базой, то эта форма открывается и на ProgressBar происходит "анимация", как только аутентификация произошла форма Authentification1 закрывается и открывается главная

типа отображение загрузки)))

mihali4 · 12.11.2010, 01:33

Я говорю только о файле проекта.
Ваши формы с юнитами мне не нужны.
Вы, видимо, плохо понимаете, что такое файл проекта.
Еще раз напоминаю - он единственный с расширением DPR...

12.11.2010, 00:39	#1
designer999 Форумчанин Регистрация: 16.02.2010 Сообщений: 187	прорисовка формы при старте Здраствуйте открываю дополнительную форму при старте программы таким методом, но компоненты этой формы не прорисовываются пока программа не запустится полностью Код: `Application.CreateForm(TAuthentification1, Authentification1); Authentification1.Show;` если же сдеать Код: `Application.CreateForm(TAuthentification1, Authentification1); Authentification1.Show; Application.run;` то компоненты прорисуются но программа полностью не запустится, а только будет эта форма как можно запустить форму при запуске уже с отрисоваными компонентам ? буду благодарен очень за помощь

12.11.2010, 01:03	#3
designer999 Форумчанин Регистрация: 16.02.2010 Сообщений: 187	ну полный код не могу так как программа не паблик) ну примерно так выглядить Код: `procedure TForm1.FormCreate(Sender: TObject); begin // КОД Application.CreateForm(TAuthentification1, Authentification1); Authentification1.Show; //проверка на mysql сервере Authentification1.free; // КОД end;` на Authentification1 лежит ProgressBar c Style:=pbstMarquee; моя цель такова, пока исполняется аутентификация с Mysql базой, то эта форма открывается и на ProgressBar происходит "анимация", как только аутентификация произошла форма Authentification1 закрывается и открывается главная типа отображение загрузки)))

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Delphi прорисовка формы...	_Flyer_	Общие вопросы Delphi	0	10.06.2010 12:24
Появляется сразу две формы при старте...	TwiX	Общие вопросы Delphi	4	13.02.2010 03:22
При старте програмы	KoBRaAndrey	Общие вопросы Delphi	9	04.10.2009 15:46
создание dll при старте приложения и удаление при завершении	TyoshA	Общие вопросы Delphi	7	13.07.2009 13:56
заставка при старте програми	VVk	Общие вопросы Delphi	3	02.11.2007 11:37

12.11.2010, 00:49	#2
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Приведите полный код файла проекта .dpr

12.11.2010, 01:33	#4
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Я говорю только о файле проекта. Ваши формы с юнитами мне не нужны. Вы, видимо, плохо понимаете, что такое файл проекта. Еще раз напоминаю - он единственный с расширением DPR...