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

Вниз

Перевод Variant в TDate   Найти похожие ветки 

 
alsov ©   (2005-11-14 12:21) [0]

Приветствую, Мастера

Вот такой вроде простой вопрос, но не получается решить.
Есть вариант, содержащий TDatetime. Надо преобразовать енту радость в дату, чтоб сделать сравнение


 
Digitman ©   (2005-11-14 12:24) [1]

var
 dt: TDatetime;
 v: Variant;
..

 dt := v;


 
alsov ©   (2005-11-14 12:46) [2]

и получу в dt ещё и время
а надо только дату


 
DesWind ©   (2005-11-14 12:50) [3]

DT:=Trunc(v)


 
DesWind ©   (2005-11-14 12:51) [4]

DT:=Trunc(v)


 
alsov ©   (2005-11-14 12:58) [5]

все разрулил
надо просто дробную часть отбросить
то есть

function TruncTime(ADatetime: TDateTime): TDateTime;
begin
 Result := Trunc(ADatetime);
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.04 c
1-1131337689
Lkan
2005-11-07 07:28
2005.12.04
дбф в еxe-шник


14-1131703604
TStas
2005-11-11 13:06
2005.12.04
Существует ли фри оракл?


1-1131039262
Ins!7t
2005-11-03 20:34
2005.12.04
Ошибка- The compiler could not find the given identifier???


1-1131075777
ali_tash
2005-11-04 06:42
2005.12.04
как определить оптимальный размер буфера для System.SetTextBuf


14-1131833098
lookin
2005-11-13 01:04
2005.12.04
Идиотизм? Пьяный машинист метро