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

Вниз

Get only Date from TMonthCalendar   Найти похожие ветки 

 
orion_st ©   (2003-02-18 14:55) [0]

Как взять только дату без времени из TMonthCalendar?
Сразу после запуска проги беру
MonthCalendar1.Date:=Date;
результат идет в виде 23423,235235 т.е. со временем.
Взять целую часть не получается, т.к. такие математические операции не поддерживаются.

Что делать?

После того как вручную кликаю по компоненте, дата брется нормально, без времени, только целая часть числа.


 
gsu ©   (2003-02-18 15:01) [1]

>> Взять целую часть не получается, т.к. такие математические операции не
>> поддерживаются

???


 
orion_st ©   (2003-02-18 17:24) [2]

Т.е. нельзя делать действия ни c mod, ни с div.


 
jack128 ©   (2003-02-18 17:42) [3]

а что, когда то можно было ЦЕЛОЧИСЛЕННО делить ВЕЩЕСТВЕННЫЕ числа? или делить их(вещ.числа) по модулю?


 
orion_st ©   (2003-02-18 18:05) [4]

Короче говоря, нашел способ выкрутиться из этой ситуации:
беру это вещественное число и превращаю в тип Comp, остается только целаяч часть, т.е. только дата, с этим числом потом и работаю.

Изврат, но че делать...


 
orion_st ©   (2003-02-18 18:08) [5]

Блин, нифига, функция DoubleToComp вещественное число округляет, а мне это не надо. Фигня :((

Блин, че делать? Как дату взять?


 
Hint ©   (2003-02-18 18:54) [6]

Я тоже умею извращаться :o)
1. Сначала конвертим как надо дату:время с помощью FormatDateTime;
2. Потом StrToDate ;o)


 
Blondin ©   (2003-02-18 19:05) [7]

trunc(MonthCalendar1.Date)



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

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

Наверх




Память: 0.48 MB
Время: 0.013 c
1-17078
swamp
2003-02-25 17:42
2003.03.06
Увеличить на год


14-17365
Dracula2000
2003-02-18 16:34
2003.03.06
Service pack for Delphi 5


4-17451
Cheboor
2003-01-19 10:45
2003.03.06
Как отследить запуск другого приложения?


3-16897
Pk
2003-02-14 16:10
2003.03.06
Как сделать чтобы QuickReport


1-17068
ALEXEY_URAL
2003-02-25 13:32
2003.03.06
Импорт отчета из QuickReport в Excel