ayat255
پنج شنبه 16 آذر 1391, 13:37 عصر
بدست آوردن زمان البته به زمان گرینویچ نه ایران(دنبال روش جمع و کم کردن هم نیستم چو ممکنه یک سیستم در حال اجرای برنامه زمانش رو ایران تنظیم نباشه)
ayat255
پنج شنبه 16 آذر 1391, 16:29 عصر
دوستان خودم پیدا کردم
میزارم اینجا شاید به درد دوستان بخوره
procedure TForm1.Button1Click(Sender: TObject);
var
UTC:SYSTEMTIME;
begin
GetSystemTime(UTC);
Label1.Caption:=IntToStr(UTC.wHour)+':'+IntToStr(U TC.wMinute)+':'+IntToStr(UTC.wSecond);
end;
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.