Zitat von
mOzZzI:
Hallo,
habe ein Programm, ich will das die Hauptform nur für X sec. angezeigt wird und dann minimiert wird.
Wie funktioniert das, mit TTimer? Bitte um Hilfe...
Hi mOzZzI
du hast zwei Formulare (Form1) und (Form2),
angenommen Form1 ist dein Hauptformular und du möchtest,
dass Form2 nur 5 Sekunden sichtbar ist, dann wäre
eine Lösung:
1) Auf das Form2 eine TTimer-Komponente draufmachen (enabled:=false, Intervall:=5000).
Im OnShow-Event wird der Timer aktiviert
Delphi-Quellcode:
procedure TForm2.FormShow(Sender: TObject);
begin
Timer1.enabled:=True;
end;
und im Timer-Event selbst wird das Form geschlossen
Delphi-Quellcode:
procedure TForm2.Timer1Timer(Sender: TObject);
begin
Timer1.Enabled:=false; //<--- Timer abschalten
close;
end;
2) Der Aufruf von deinem Hauptformular (Form1) könnte dann so aussehen:
Delphi-Quellcode:
uses Unit2; //damit das zweite Formular auch verfügbar ist
procedure zeigeform2;
var frm2:TForm2;
begin
frm2:=TForm2.Create(self);
frm2.showmodal; //<-- zeigt das Formular an, bis es beendet wird
frm2.free;
end;
War das die Frage?