Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.004 c
7-100083
Neo2002
2001-10-22 21:34
2002.01.31
Как обратно врубить мышь и клаву?


1-100011
kserg@ukr.net
2002-01-15 12:40
2002.01.31
Про меню (в смысле про TMainMenu)


1-99986
ГС ТОФ
2002-01-14 15:03
2002.01.31
Пропала форма в проекте


7-100079
Serega_2
2001-10-22 13:31
2002.01.31
Работа с Word`ом


1-99997
Dmitriy_R
2002-01-08 14:40
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский