Форум: "Начинающим";
Текущий архив: 2008.12.21;
Скачать: [xml.tar.bz2];
Вниз
splashscreen Найти похожие ветки
← →
mops (2008-11-11 10:26) [0]подскажите, как решить такую проблему: делаю splashscreen для программы - показываю нужную форму перед созданием остальных, но форма с splashscreen не прорисовывается..
...
begin
Application.Initialize;
Application.CreateForm(TFormLoading,FormLoading);
Application.Title := "MyProg";
Application.CreateForm(TFormmain, Formmain);
...
Application.Run;
FormLoading.Hide;
end.
← →
Сергей М. © (2008-11-11 10:43) [1]Дело, наверно, в многоточии
← →
Anatoly Podgoretsky © (2008-11-11 10:47) [2]> Сергей М. (11.11.2008 10:43:01) [1]
Можно не сомневаться, именно там действия по показу формы.
← →
Anatoly Podgoretsky © (2008-11-11 10:47) [3]> mops (11.11.2008 10:26:00) [0]
Автор в приведеном коде ошибок нет.
← →
mops (2008-11-11 10:53) [4]во многоточии просто еще создаются формы
← →
Сергей М. © (2008-11-11 10:54) [5]
> Anatoly Podgoretsky © (11.11.08 10:47) [3]
Ну как же нет ?
Сплеш-форма стала основной, хотя основной должна быть TFormmain - и вся дальнейшая логика коту под хвост, даже если Автор увидит свою splashscreen во всей красе
← →
mops (2008-11-11 10:58) [6]я делал и так:
begin
Application.Initialize;
with TLogoForm.Create(Application) do
try
Show;
Update;
Application.CreateForm(TForm1, Form1);
...
finally
Free;
end;
Application.Run;
end.
но splashscreen тоже не прорисовывался..
← →
Сергей М. © (2008-11-11 11:27) [7]begin
Application.Initialize;
with TLogoForm.Create(nil) do
try
Show;
Application.ProcessMessages;
Application.CreateForm(TForm1, Form1);
Application.ProcessMessages;
Application.CreateForm(TForm2, Form2);
Application.ProcessMessages;
...
Application.CreateForm(TFormN, FormN);
finally
Free;
end;
Application.Run;
end.
← →
alex_3 (2008-11-11 11:35) [8]2 Сергей М.
так тоже пробовал - мигает (
может есть вообще какой нибудь другой способ?
← →
Сергей М. © (2008-11-11 11:44) [9]мигает <> не прорисовывается
← →
mops (2008-11-11 11:46) [10]это да, но вы поняли чего я добиваюсь )
← →
Сергей М. © (2008-11-11 11:57) [11]Ну так сделай свою сплеш-форму StayOnTop и будет тебе счастье !
Всего делов-то)
← →
Anatoly Podgoretsky © (2008-11-11 12:04) [12]
> Show;
> Application.ProcessMessages;
Лучше update
← →
mops (2008-11-11 13:08) [13]спасибо
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.12.21;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.052 c
