Info-Fenster bei Programmstart

[elcomportal]

Hallo,
ich versuche seit Stunden vergeblich beim Programmstart ein Info-Fenster einzublenden und dieses nach 5 Sekunden automatisch wieder verschwinden zu lassen. In diesem Fenster soll nur ein Bild sein. Keine Schaltflächen. (ähnlich wie beim Starten von Delphi) . Habe schon versucht ein 2. Formular zu nehmen oder einen Frame. Funzt alles nicht richtig. Wenn ich in der Hilfe auf info klicke soll das selbe Fenster auch wieder erscheinen, dann aber mit einem OK-Button.
Hat da einer mal 'nen Tip für mich
Vilen Dank schonmal.
Mfg
Torsten

[Luckie]

splashscreen. sakura hat dazu mal ein Tutorial geschrieben.

[elcomportal]

Danke für den Tip, Splashscreen, auf den Begriff bin ich nicht gekommen. Dann kann man lange suchen.
Mfg
Torsten

[axelf98]

Oder ganz einfach:

Code Projekt-Datei

Delphi-Quellcode:

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};

{$R *.RES}

begin
  Application.Initialize;
  Application.ShowMainForm := false;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Form2.show;
  Application.Run;
end.

Code in Form2 (mit einem Timer):

Delphi-Quellcode:

procedure TForm2.Timer1Timer(Sender: TObject);
begin
 timer1.Enabled := false;
 self.close;
end;

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 timer1.Enabled := false;
 Form1.show;
end;

Im Anhang ist ein Beispiel