Создание всплывающих окон

[DeKot]

To Vladya : для тех кто хочетсовершенствоваться в освоении Delphi исчерпывающе ответилmihali4 (cм. пост №9 здесь же).Ну а если начинающему лень париться - можно проще.Сделай заставку по Form<n>.ShowModal; с задержкой по Sleep(мсек); или отдай на откуп пользователю - брось кнопку по которой он сам закроет окно заставки когда закончит ею "любоваться".
Вот глянь пример http://www.programmersforum.ru/showthread.php?t=27524
Там четыре заставки + окно "О программе".Два окна работают на автомате по Sleep(), остальные управляются пользователем.

[Vladya]

У меня опять проблема, окно работает держиться столько сколько мне надо, но... Это окно не закрываеться, оно просто закрываеться главным. Возможно ли сделать так что бы это окно закрылось, а потом запустилось главное? Вот код этого окна.

unit Unit3;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;

type
  TForm3 = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form3: TForm3;

implementation

uses Unit1;

{$R *.dfm}
begin
Application.Initialize;
Form3:=TForm3.Create(Application); //запускаем лого
Form3.Show;
Form3.Update;
Application.CreateForm(TForm1, Form1); //запуск главной формы
Sleep(5000);
Application.Run;
Exit;
End.

[mihali4]

Sleep(5000);
Form3.Close;
Application.Run;

[Vladya]

Во!!! За воГетЫй способ спасибо. Все работает ОК! Класный форум, для начинающих то что надо!