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

Вниз

Вопрос по DateTime   Найти похожие ветки 

 
Alexey A   (2004-09-07 13:03) [0]

Здравствуйте!

Вопрос в следующем:
Есть два компонента DateTimePicker1 (ввод даты), DateTimePicker2 (ввод времени).
Как переменной типа TDateTime присвоить значение даты и времени из этих компонентов?

rez : TDateTime;

rez := DateTimePicker1.Date;
rez := DateTimePicker2.Time;
не катит..


 
Плохиш ©   (2004-09-07 13:06) [1]

rez := DateOf(DateTimePicker1.Date)+TimeOf(DateTimePicker2.Time)


 
GuAV ©   (2004-09-07 13:07) [2]

Сложить их, предварительно убедившись, что у даты есть только целая часть, а  у времени только дробная.


 
GuAV ©   (2004-09-07 13:07) [3]

а Плохиш был быстрее :)


 
Alexey A   (2004-09-07 13:18) [4]

Плохиш ©, ошибку пишет
Undeclared identifier: "DateOf", "TimeOf"


 
Alexey A   (2004-09-07 13:20) [5]

GuAV ©, сложить пробовал... ведь складываются даты :) Каким образом убедиться в наличии/отсутствии этих дробных частей?


 
Alexey A   (2004-09-07 13:23) [6]

Sorry за поспешные повторные вопросы, нужно же DateUtils в UNIT прописать было :)))

Большое Вам СПАСИБО!


 
jack128 ©   (2004-09-07 13:23) [7]

Alexey A   (07.09.04 13:20) [5]
Каким образом убедиться в наличии/отсутствии этих дробных частей?

Int(DateTimePicker1.Date)+Frac(DateTimePicker2.Time)


 
Акуличев Дмитрий   (2004-09-07 13:23) [8]

rez := DateTimePicker2.Time;
ReplaceDate(rez, DateTimePicker1.Date);



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

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

Наверх





Память: 0.46 MB
Время: 0.061 c
1-1094490496
Klopan
2004-09-06 21:08
2004.09.19
Handle активного текущего окна


10-1038487107
Павел
2002-11-28 15:38
2004.09.19
просьба помочь


1-1093851964
gunner
2004-08-30 11:46
2004.09.19
Передача данных в OCX


1-1094028027
Vn
2004-09-01 12:40
2004.09.19
Как програмно изменить размеры панелей посредством TSplitter?


14-1093664170
Думкин
2004-08-28 07:36
2004.09.19
С днем рождения! 28 августа





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