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

Вниз

Как узнать, какое сейчас число и сколько времени?   Найти похожие ветки 

 
pendalf   (2003-09-07 13:50) [0]

Мне надо следующее: если число такое-то и времени столько-то, то зделать следующее, если нет, то ничего.


 
Я ©   (2003-09-07 14:14) [1]

var Dat:TDateTime;
...
Dat:=Now;
if Dat=... then ...

а вообще смотри в хелпе, там этих функций навалом


 
DrFox ©   (2003-09-07 14:46) [2]

Ет делаеться так

var Time : TDateTime;

Time := GetSystemTime();

А ещё есть функции для работы со временем типа
TimeToStr и StrToTime %)


 
alex21 ©   (2003-09-08 08:54) [3]

в режиме события timer1.ontimer впеши код
label1.caption:=timetostr(time);
в режиме события timer2.ontimer впеши код
label2.caption:=dATEtostr(DATE);
И НАСЛАЖДАЙСЯ ЖИЗЬНЬЮ.


 
wl ©   (2003-09-08 10:09) [4]


> Как узнать, какое сейчас число и сколько времени?

1) посмотреть на календарь
2) посмотреть на часы


 
BackRooT   (2003-09-08 10:11) [5]

Вирьмейкер, однака...


 
pendalf   (2003-09-08 11:13) [6]

Спасибо.


 
DrFox ©   (2003-09-12 20:20) [7]

да не зачто


 
x77 ©   (2003-09-12 22:03) [8]

как, интересно, он будет сравнивать время? по миллисекундам? :)


 
Anatoly Podgoretsky ©   (2003-09-12 22:41) [9]

Я тебе скажу, сейчас 22:41 12 сентября 2003 года, а программно можешь использовать функции Date, Time, Now (это в одном флаконе)


 
Sam Stone ©   (2003-09-12 23:38) [10]


> как, интересно, он будет сравнивать время? по миллисекундам?
> :)

Округлять число (время в виде TDateTime) до нескольких(5, кажется) знаков после запятой, чтобы отбросить миллисекунды



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

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

Наверх




Память: 0.48 MB
Время: 0.024 c
3-82109
Andrey-kor
2003-09-06 18:12
2003.09.25
Переиндексация dbf-файлов в Delphi


14-82422
Vijit
2003-09-08 15:45
2003.09.25
Проблема с скином в WinAmp 2.x


1-82205
Dark Elf
2003-09-12 14:19
2003.09.25
Чтение текстового файла


14-82439
Некрофил-затейник__
2003-09-08 09:01
2003.09.25
Человеки помогите найти!


3-82087
PrettyFly
2003-09-06 14:03
2003.09.25
TClientDataSet