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

Вниз

Уважаемые Мастера!   Найти похожие ветки 

 
DeNNiss   (2002-01-14 13:40) [0]

Такой вопрос: мне нужно получить количество часов между заданными датами, например между 01.01.02 15:00 и 17.01.02 19:00. Как это сделать, что-то у меня переклинило, вопрос-то несложный. Заранее спасибо.


 
SergVlad   (2002-01-14 14:08) [1]

"Зри в корень"

TDateTime - это double тип.
Целая часть - число суток
Дробная - часть одних суток
Вычитая из большей даты меньшую получаешь разницу в днях и части дня: Delta.

Число часов = int(Delta*24)


 
Vitaly   (2002-01-14 14:15) [2]

var t1, t2: TDateTime;
begin
t1 := StrToDateTime("01.01.2002 12:00");
t2 := StrToDateTime("01.01.2002 13:00");
caption := IntToStr( trunc(24*(t2-t1)) );
end;


Учти, что между этими датами еще 0 часов.



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

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

Наверх




Память: 0.44 MB
Время: 0.004 c
1-99927
3d[Power]
2002-01-11 01:22
2002.01.31
Packed record. absolute. file r/w.


4-100124
star
2001-11-28 12:35
2002.01.31
Клавиатурные шпионы ...


3-99834
катерина
2001-12-25 14:53
2002.01.31
помогите


14-100037
frostbite
2001-12-04 13:39
2002.01.31
JBuilder


14-100062
Лисий Хвост
2001-12-10 09:22
2002.01.31
Программистам-Битломанам





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский