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

Вниз

Как объединить 2шт DateTimePicker, один показ. дату, второй время   Найти похожие ветки 

 
Layner   (2003-09-09 11:01) [0]

И в сумме получить переменную TDateTime?


 
ZEE   (2003-09-09 11:05) [1]

var dt:TDateTime;
...
dt:=DateTimePicker1.Date+DateTimePicker2.Time;


 
Layner   (2003-09-09 11:12) [2]

Спасибо!


 
stone   (2003-09-09 11:20) [3]

var dt:TDateTime;
...
dt:=DateTimePicker1.DateTime;

так буде проще :))


 
Layner   (2003-09-09 11:26) [4]

ZEE © (09.09.03 11:05)
Что то у меня не то показывает :(
stone © (09.09.03 11:20)
А как показать на DateTimePicker1 и дату и время?


 
Layner   (2003-09-09 11:29) [5]

dt:=DateTimePicker1.Date+DateTimePicker2.Time;
Сегодняшний год показывает как 2107...


 
ZEE   (2003-09-09 11:33) [6]

Исправляюсь
var dt:TDateTime;
...
DateTimePicker1.Time:=DateTimePicker2.Time;
dt:=DateTimePicker1.DateTime;


 
Layner   (2003-09-09 11:33) [7]

так работает..
s:=DateToStr(DateTimePicker1.Date)+" "+TimeToStr(DateTimePicker2.Time);


 
ZEE   (2003-09-09 11:39) [8]


> Layner © (09.09.03 11:33) [7]
> так работает..
> s:=DateToStr(DateTimePicker1.Date)+" "+TimeToStr(DateTimePicker2.Time);

А как же на счет
"И в сумме получить переменную TDateTime" ???


 
jack128   (2003-09-09 11:49) [9]

Result := Int(DatePicker.Date) + Frac(TimePicker.Time);


 
Layner   (2003-09-09 11:49) [10]

ну ясно же, что не сумма двух дат, а день + время, зачем же 2107 год :) Но, тем не менее, извиняюсь, если что спросил не так.



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

Форум: "Базы";
Текущий архив: 2003.09.29;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.008 c
14-96437
Кен
2003-08-21 04:56
2003.09.29
---|Ветка была без названия|---


14-96390
СергейК
2003-09-11 15:43
2003.09.29
просто


1-96292
Макс
2003-09-16 20:28
2003.09.29
Свой компонент


1-96202
Vasily_Ts
2003-09-14 13:27
2003.09.29
Вопрос по серверам MS Office закладка компонентов Servers


14-96362
Rif
2003-09-10 08:22
2003.09.29
MS SQL Server 2000





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