Differenz 2erDatum in Tmemo

[danku]

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?