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

Вниз

Time   Найти похожие ветки 

 
Марат   (2004-08-02 12:57) [0]

Вопрос такой.
Procedure ...
var TmCnsdD: Extended;
TmCnsd: byte;
DtCntrN: TDateTime;
tt: integer;
DtCntrN:=date+1;
...здесь идет алгоритм подсчета DtCntrN
DtCntrN:=int(DtCntrN);
TmCnsdD:=DtCntrN-date-tt;
Edit1.text:=Inttostr(TmCnsdD);
Т.е. выводилось количество дней. А теперь как мне сделать, чтобы в Edit1.text вывелась информация о количестве часов.
Ну вроде бы TmCnsdD:=(DtCntrN-date-tt)*24+time;
а при выводе "0"


 
Ega23 ©   (2004-08-02 13:00) [1]

DecodeDate, DecodeTime + Help



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

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

Наверх




Память: 0.46 MB
Время: 0.058 c
14-1090705135
Soft
2004-07-25 01:38
2004.08.15
Был установлен Линукс.


14-1090950265
Art_Z
2004-07-27 21:44
2004.08.15
Издательсво "Питер",серия "Для професионалов"


14-1090590223
Baron
2004-07-23 17:43
2004.08.15
Информативный хлам.


1-1091359482
dracula
2004-08-01 15:24
2004.08.15
работа со строками


6-1087215967
KLEVO
2004-06-14 16:26
2004.08.15
Обмен данными.