Hallo!
Ich kann meine Form1 nicht schließen...
Der Quelltext sieht ungefähr so aus:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var Tag, Monat, Jahr: word;
begin
decodedate(date,jahr,Monat,Tag);
showmessage('Heute ist der ' +floattostr(Tag)+'.'+floattostr(Monat)+'.'+floattostr(jahr));
form1.Close;
end;
(ist nur ein Test-Programm; ihr braucht nicht über den Sinn diskutieren
)
Wenn ich das ausprobiere, schließt sich die Form nicht.
Klappt das jetzt nicht, weil´s im TForm1.FormCreate steht?
Ich hätte ja die Alternative, das über den Timer zu schließen, wüsste aber trotzdem gerne, wo der Fehler liegt.
Danke im Voraus!