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

Вниз

Подскажите, пожалуйста, как сравнить несколько дат   Найти похожие ветки 

 
GreyOl   (2004-12-11 06:21) [0]

Как сравнить  три времени?
Время компьютера сравнивается с пользовательским, которое он задает(тип string).
DateTime := Time;//время компа            
str := TimeToStr(DateTime);-я преобразую время в строку, затем с помощью
val(str,real_time,cod) в число.Пользовательское время(строка->число)- аналогично и сравниваю.
Но тогда сравниваются только часы, а нужно и минуты.
Как можно сравнить? Формат времени **:**:**.
Использовать ф-ю CompareTime тож не выходит.


 
Sergey_Masloff   (2004-12-11 06:26) [1]

Время это всего лишь Double в котором целая часть дни с определенной даты а дробная - доля суток прошедшая с 0 часов текущего дня. Их и сравнивай. Если сравнивать только время отбрось целую часть.
 То что ввел пользователь преобразуй в TDateTime (StrTo...) все очень просто.



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

Форум: "Основная";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.042 c
3-1101969512
Ann
2004-12-02 09:38
2004.12.26
SQL запрос. Подскажите пожалуйста.


1-1102847589
Frozzen
2004-12-12 13:33
2004.12.26
Копирование буфера Move


1-1102528136
Руслана
2004-12-08 20:48
2004.12.26
Перестала запускаться Delphi7


10-1071058585
ShimA
2003-12-10 15:16
2004.12.26
DELPHI+CORBA+CALLBACK Самоуничтожение объекта


14-1102314317
Vlad Oshin
2004-12-06 09:25
2004.12.26
Наконец нашел в нашей дыре контору, где реально надо писать





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский