[Delphi] De tijd weten in Delphi

[Crysania]

ik wil een variabelen hebben met daarin de tijd, hoe is dit mogelijk??

[Verwijderd]

var time : string
begin
time := timetostring(now);
label1.caption := time;
label2.caption := formatdatetime('HH-MM-SS', now) // geloof ik, zo uit me hoofd
label3.caption := formatdatetime('DD-MM-YYYY', now);
end;

[Tom-my]

Ganie werken, time is al een gereserveerd wordt hoor

var
tijd : string

begin

tijd := timetostr(time);
label1.caption:= tijd;
end;

nou bij een ontimer event ff deze procedure aanroepen en klaaaaar!

[Crysania]

ik heb hem, (met wat aanpassingen)

code:

procedure TForm1.Button1Click(Sender: TObject);

var time : string;
begin

time := timetostr(now);
label1.caption := time;
label2.caption := formatdatetime('HH-MM-SS', now);
label3.caption := formatdatetime('DD-MM-YYYY', now);
end;

end.

thnx

[MerijnB]

wat je dus vooral niet vergeten is dat in FormatDateTime M voor maand staat, niet voor minuut!
zou dus FormatDateTime(now, 'hh-nn-ss') moeten zijn