Время из системных часов

← →
Ivanov (2004-04-17 05:21) [0]

Мастера, не подскажете, как заполучить в свою программу время из системных часов.

← →
Shubin (2004-04-17 06:45) [1]

Не пойму:тебе надо вывести на свою форму системное время?

← →
KSergey © (2004-04-17 06:51) [2]

Time

← →
Shubin (2004-04-17 06:57) [3]

Кинь на форму label и Timer

Label1.Caption:=FormatDateTime("hh:nn:ss",Now);

Усё!

← →
kat (2004-04-17 13:43) [4]

getsystemtime

1-й вариант:

procedure TForm1.Timer1Timer(Sender: TObject);
var sysDT: SyStemTime;
begin
GetLocalTime(sysDT);
Label1.Caption:=IntToStr(sysDT.wHour);
Label2.Caption:=IntToStr(sysDT.wMinute);
Label3.Caption:=IntToStr(sysDT.wSecond);
// и так далее sysDT...
end;

2-й вариант:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label4.Caption:=TimeToStr(Time);
end;

Время из системных часов Найти похожие ветки