Форум: "Начинающим";
Текущий архив: 2006.01.08;
Скачать: [xml.tar.bz2];
ВнизПрограмма заставка Найти похожие ветки
← →
Scripl (2005-12-17 23:24) [0]Можно ли сделать так,чтобы перед появлением программы выскакивала заставка(форма) секунд на 5 ,а потом исчезала???
← →
alex-drob © (2005-12-17 23:31) [1]Создаёшь новую форму, в dpr убераешь её создание, например для Form2 это
Application.CreateForm(TForm2, Form2);
Далее создаёшь формуApplication.Initialize;
Form2:=TForm2.Create(application);
Form2.Show;
Form2.Update;
...
sleep(5000);
Form2.free;
Application.Run;
← →
Scripl (2005-12-17 23:36) [2]ок...спасиба
← →
Scripl (2005-12-17 23:40) [3]А можно всё описать очень подробно и пошагово...не злитесь..я нифига в делфи не понимаю))...
← →
DrPass © (2005-12-17 23:55) [4]меню Project - View Source. А дальше поймешь. А если не поймешь, пока еще рано делать такие вещи :)
← →
alex-drob © (2005-12-17 23:56) [5]Нажимаешь New Form
Укрошаешь форму картинками, надписями и т.д.
Нажимаешь в меню Project -> Viev Source
Удаляешь строкуApplication.CreateForm(TForm2, Form2);
Перед begin пишешьvar
Zast:TForm2;
После строкиApplication.Initialize;
пишешьZast:=TForm2.Create(application);
Zast.Position:=poDesktopCenter;
Zast.BorderStyle:=bsNone;
Zast.Show;
Zast.Update;
Далее идут строки создания остальных формApplication.CreateForm(TForm1, Form1);
Потом пауза в 5 секунд (в uses добавь SysUtils)sleep(1000);
Потом уничтожаешь формуZast.Free;
← →
Scripl (2005-12-17 23:56) [6]рано...согласен..меня заставляют!!!!садисты...
← →
alex-drob © (2005-12-17 23:57) [7]
> Удаляешь строку Application.CreateForm(TForm2, Form2);
Если конечно заставкой делаешь вторую форму. Если нет то строку где создаётся твоя форма.
← →
Scripl (2005-12-18 00:01) [8]alex-drob СПАСИБА!!!!!
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.01.08;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.007 c