Вопрос : Как показать этот экран выплеска на 3 секунды?

Здравствулте!,

I создало мой экран выплеска using метод упомянутый здесь: rel= " nofollow " " _blank " " target= " http://delphi.about.com/od/formsdialogs/a/splashscreen.htm href= потребность /formsdialogs/a/splashscreen.htm

I http://delphi.about.com/od показать экран выплеска на 3 секунды перед показывать главную помощь form.

Please. Thanks.
class=

Ответ : Как показать этот экран выплеска на 3 секунды?

Посмотрите, это будет самое лучшее

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
начните
FormSplashScreen: = TFormSplashScreen.Create (применение);
  попытка
  FormSplashScreen.Show;
  Application.Initialize;
  FormSplashScreen.Update;
  Сон (3000);
  Application.CreateForm (TFormMain, FormMain);
  Application.CreateForm (TFormOptions, FormOptions);
  Application.CreateForm (TForm1, Form1);
  окончательно
  FormSplashScreen.Hide;
  FormSplashScreen.Free;
  конец;
  Application.Run;
конец.
Другие решения  
  •  Как я добавляю кнопки на форме PDF для того чтобы добавить/извлекаю рядки данных?
  •  Шнур ошибки в блоке задвижки?
  •  сколько вариант сервера SQL на одной машине
  •  Внешний вид 2007 не может архивный файл открытой сети сохраненный
  •  Активно директория DNS записывает вопрос
  •  Отчет о доступа 2010 экспорта к CSV с коллекторами?
  •  Прокладчик OCE 9400 не начинает
  •  как добавить десятичное место в формуле в отчете о кристалла seagate
  •  Windows XP и Мичрософт Оутлоок и проблемы установителя Windows
  •  VB6 к VS2010 - консультации тренировки?
  •  
    programming4us programming4us