نمایش ساعت سیستم در فرم اصلی

[ehsan_ei]

سلام دوستان:
من میخوام توی دلفی ساعت سیسنم رو روی فرم اصلیم نشون بدم. چه طوری این کار رو باید بکنم؟؟؟؟:افسرده:

[BEHESHT*]

از کتابخانه system یه تایمر بذار Interval رو هزار بذار که هر ثانیه یه بار کدت اجرا شه حواست باشه Enable فعال باشه

روش دابل کلیک کن کد زیر رو بنویس:

procedure TForm1.tmr1Timer(Sender: TObject);
var tm : TDateTime ;
begin
tm := GetTime ;
lbl1.Caption := TimeToStr(tm);
end;