Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

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

 
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


 
opoloXAI ©   (2004-04-18 13:19) [5]

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;



Страницы: 1 вся ветка

Текущий архив: 2004.05.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.026 c
4-1080878640
Tornado
2004-04-02 08:04
2004.05.23
Сообщения Windows


3-1083074531
AlexBalex
2004-04-27 18:02
2004.05.23
Обновление указанной записи с помощью resync


14-1083403604
Knight
2004-05-01 13:26
2004.05.23
Поздравляю всех с очередным, типа, праздником....


3-1082740421
Frozzen
2004-04-23 21:13
2004.05.23
Заголовок колонки DBGrid


1-1084270327
BlackTiger
2004-05-11 14:12
2004.05.23
Алгоритм переноса слов (на канве битмапа или принтера). Как/где?