Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Restzeit von einen Countdown

    Delphi
    by Amateurprofi, 28. Nov 2005
  Hallo Sven,
  bei mir laufen auch die ersten Sekunden normal.
  Was passiert denn in dem Programm?:
  1) Bei Button1Click werden die Stunden, Minuten, Sekunden aus den Edit Feldern geholt,
  in TDateTime umgewandelt. Das Ergebnis wird zum aktuellen Datum.Zeit addiert und in
  endtime gespeichert.
  Dann wird der Timer auf ein Intervall von 1/2 Sekunde gestellt und enabled auf true gesetzt.
  ...
• Forum: Sonstige Fragen zu Delphi

  Re: Restzeit von einen Countdown

    Delphi
    by Amateurprofi, 24. Nov 2005
  so müßte es funktionieren
  
  var endtime:TDateTime;
  
  procedure TMain.Button1Click(Sender: TObject);
  begin
  endtime:=Now+EncodeTime(StrToInt(Edit1.Text),StrToInt(Edit2.Text),
  StrToInt(Edit3.Text),0);
  Timer1.Interval:=500; // nicht 1000
  Timer1.Enabled:=true;