|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
12.02.2012, 07:59 | #11 |
Далеко не
Участник клуба
Регистрация: 11.08.2011
Сообщений: 1,512
|
создаем две формы(не забываем второй сообщить о первой в uses)!на первой форме в обработчик create пишем hide; на второй туда же пишем show; переходим ко второй форме кидаем на нее таймер интервал сколько вам надо enabled:=false; далее пишем у второй формы обработчик на событие onshow пишем туда следующее timer1.enabled:=true; теперь кликаем на timer два раза и пишем
Код:
|
12.02.2012, 16:30 | #12 |
Старожил
Регистрация: 30.12.2009
Сообщений: 11,430
|
i - переменая типа Integer
SF - переменная типа TForm У меня это TSplasshForm(её я создаю в run-time). AllowedSplashScreen - моя функция проверки, хочет ли юзер видет заставку при запуске. ProgressLoad - мой прогресс бар(Использую TGauge). |
12.02.2012, 18:12 | #13 |
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
Кольша спасибо. ))) Как сделать заставку и потом показать главную форму я знаю.
Мне надо отображать ход загрузки всех окон - пока показывается заставка, и вот с этим у меня проблема... Пример Человек_Борща может быть и хороший, но я не могу с ним разобраться, не работает... |
12.02.2012, 22:06 | #14 |
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
Всё, разобрался... )) Только вместо Application.CreateForm(TForm, Form2); (как у Человек_Борща) я использовал Form2:=TForm2.create(self); ибо это лучше... ))
Кстати, Человек_Борща, непонятно вообще зачем Вам нужен такой код, для украшательства что ли? ))) Он ведь не несёт никакую информацию о загрузке... Вопрос в другом, что за артефакт при загрузке приложения??? Откуда такое мерцание перед появлением формы? Сделал проект - что бы было понятно. Отдельно екзешник. |
12.02.2012, 22:39 | #15 | |
Форумчанин
Регистрация: 08.09.2010
Сообщений: 880
|
Цитата:
Код:
Приемы эти для фреймов подходят, но никак не для форм. В приведенном коде форма появляются сразу после ее создания. Именно поэтому "артефакт". Чтобы его избежать, надо скрывать форму после ее создания, а после изменения Parent - отображать. |
|
13.02.2012, 01:12 | #16 |
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
|
13.02.2012, 03:13 | #17 | |
Старожил
Регистрация: 30.12.2009
Сообщений: 11,430
|
Цитата:
Я делаю там инициализацию настроек приложения, подготовку программы к работе, и только потом пускаю интерфейс. Мерцание вызвает, абсолютно не нужный: Form1.Update; Код:
В кач-ве родителя, либо nil либо Application. Для Run-time я предпочитаю nil. |
|
13.02.2012, 23:04 | #18 | |||
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
Цитата:
Цитата:
Цитата:
В любом случае - всем спасибо. Тему можно закрыть, так как (основной) вопрос решен. |
|||
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Создание программы для управления некоторыми функциями другой программы | Юрий1991 | Общие вопросы Delphi | 6 | 03.02.2012 15:32 |
Какие программы нужно установить чтобы писать программы для телефонов nokia | Кристинка89 | Общие вопросы по Java, Java SE, Kotlin | 2 | 17.02.2011 15:15 |
Заставка... | maxlake1 | Помощь студентам | 0 | 20.04.2010 20:51 |
Заставка в Ubuntu | rand8154 | Linux (Ubuntu, Debian, Red Hat, CentOS, Mint) | 2 | 05.12.2009 19:22 |
Заставка | Ark | Общие вопросы Delphi | 23 | 23.08.2009 01:10 |