Forum: Object-Pascal / Delphi-Language
Delphi
by HiWieGehts,
22. Mai 2008
Procedure TForm1.InitShowMessage;
begin
ShowMessage('Hallo!');
end;
Procedure TFormMain.Irgendwas;
begin
..
..
Form1.Show;
Forum: Object-Pascal / Delphi-Language
Delphi
by HiWieGehts,
22. Mai 2008
So eine Antwort kann wohl nur jemand schreiben, der beim Lesen einer Zeile die vorhergehende schon wieder vergessen hat.
Forum: Object-Pascal / Delphi-Language
Delphi
by HiWieGehts,
22. Mai 2008
Hallo,
OnCreate und OnShow werden aufgerufen, bevor die Form angezeigt wird. Daher auch das von die beschriebene verhalten.
Mache aus deinem TForm1.FormCreate ein TForm1.InitShowMessage. Diese rufst du dann nachdem Show für Form1 auf.
Eine weitere, nicht sehr schöne Möglichkeit, ist die Verwendung eines Timers. Diesen startest du im OnCreate oder OnShow und im OnTimer mache dein...