Thema: Delphi Arbeiten mit Timer

Einzelnen Beitrag anzeigen

Benutzerbild von Jens Hartmann
Jens Hartmann

Registriert seit: 11. Jan 2009
Ort: Wilnsdorf
1.439 Beiträge
 
Delphi XE2 Professional
 
#4

Re: Arbeiten mit Timer

  Alt 8. Mär 2009, 01:12
Hallo,

du musst das über das OnTimer Ereignis des Timer´s regeln..

Den Quelltext habe ich nicht geprüft, nur so zusammen getippt...

Delphi-Quellcode:

zB. Button.Click oder irgendwas anderes als Start...

begin
  Timer1.Interval := StrToInt(Edit1.Text); //Zeit dem Timer 1 zuweisen
  Timer2.Interval := StrToInt(Edit2.Text); //Zeit dem Timer 2 zuweisen

  Timer1.Enabled := True;

  CheckBox1.Checked := True;
end;

// Dann im OnTimer Ereignis

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  CheckBox1.Checked := False;
  Timer2.Enabled := true;
  CheckBox2.Checked := True;
end;


usw. usw. usw.
Sollten es viele Checkboxn sein, könntest Du dir gedanken über eine Schleife oder eine If.Abfrage machen.

Du müsstest mal zeigen, was Du schon hast, und genau erklären was Du damit erreichen willst.

Gruß

Jens
Jens Hartmann
Das Leben selber ist zu kurz, also nutze jeden Tag wie er kommt.
  Mit Zitat antworten Zitat