Hallo,
beendet sich das Programm, wenn Du Button1 anklickst?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Close;
end;
Ist Form1 das erste Formular, das im Projekt erstellt wird?
Delphi-Quellcode:
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
Wenn so aussieht, wird das Programm beim Klick auf Button1 beendet und Du wirst kaum noch in die Ereignisroutine des Timers gelangen, da dieser mit dem Formular freigegeben wird und dann das Programm beendet.
Warum willst Du einen Timer benutzen, könntest Du die Logik aus der Timerroutine nicht genausogut im FormClose ausführen lassen?