Auslesen, wie lange ein Timer schon läuft.

[Luckie]

Bei dem Code wird der Timer ausgeschaltet, wenn der Zähler gleich 10 ist. Steht doch da:

Delphi-Quellcode:

case zaehler of
  10: 
  begin 
    ...;
    Timer1.Enabled _= FALSE;
  end;
end;

Und nicht jedes mal, wenn das Timer Ereignis eintritt.