Timer geht nichtmehr aus?

[Sharky]

Hai resolution,

unabhängig davon was Dir ja schon gesagt wurde würde ich im Code nicht auf die Caption des Buttons prüfen sondern auf den Status des Timers selber. Wenn Du die Beschriftung des Button mal änderst würde deine Abfrage nicht mehr gehen.

Ich würde das ganze so machen:

Delphi-Quellcode:

procedure TDemoForm.runstopClick(Sender: TObject);
begin
begin
  runnow.Enabled := not (runnow.Enabled); // Timer Ein- / Ausschalten
  if (runnow.Enabled) then
    runstop.Caption := 'stop'
  else
    runstop.Caption := 'run';
end;