Delphi Multiples Countdownsystem mit nur einem Timer

Thema durchsuchen

Ansicht

Themen-Optionen

Multiples Countdownsystem mit nur einem Timer

Ein Thema von Ajintaro · begonnen am 23. Apr 2012 · letzter Beitrag vom 23. Apr 2012

Vorheriger Beitrag

Nächster Beitrag

Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge

Delphi XE3 Enterprise

AW: Multiples Countdownsystem mit nur einem Timer

23. Apr 2012, 16:17

markieren

Delphi-Quellcode:

			uses dateUtils;

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);

begin

  Caption := TimeToStr(Now) +' - ' + TimeToStr(Now + 1/24/60/60 * 60  ) + ' - '  + TimeToStr(IncSecond(now,60) )

end;

Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)