درست کردن ساعت در برنامه

[مهرداد برنامه نویس]

در timer1 بنویسید
var a:ttime;
begin
a:=time;
form1.Canvas.TextOut(10,10,timetostr(a));
همین و تمام
:shock: 8-) 8) :? :idea: :?: :evil: [/i]

[babak_delphi]

:گیج:

[leylam]

اگر کد مربوطه را به صورت زیر تغییر دهیم date را هم خواهیم داشت:

var
a:TDateTime;
begin
a:=Now;
Form1.Canvas.TextOut(10,10,DateTimeToStr(a));
end;