Delphi-Quellcode:
var zeit1,zeit2:TTime;
Pufferhours,Pufferminutes,Pufferseconds:integer;
...
zeit1:=(Now);
zeit2:=strtotime(wecktime);
Pufferhours:= HoursBetween(zeit1,Zeit2);
Pufferminutes:= MinutesBetween(zeit1,Zeit2);
Pufferseconds:= SecondsBetween(zeit1,Zeit2);
//erst mal als idee um die zeitdifferenz zu sehen
label7.Caption:=inttostr(Pufferhours)+':'+
inttostr(Pufferminutes)+':'+
inttostr(Pufferseconds);
//irgendwie funzt das noch nicht
der hintergrund ist das ich die differenz beider daten
in ein 4-stelliges tmemo basteln möchte.
also wie ein countdown
Zitat:
|------||------| |------||------|
|###||###|: |###||###|
|------||------| |------||------|
Edit: hab gerad das gefunden:
http://www.delphipraxis.net/internal...ifferenz+datum
und wie mach ich das mit dem tmemo?