Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Как заставить работать VarToDateTime?

Автор: wood 6.9.2006, 07:07

Дата представлена в формате '31-Aug-2006' пытаюсь конвертнуть ч\з VarToDateTime('31-Aug-2006')- выдает ошибку. Подскажите чем можно можно конвертнуть в формат TDate?

Автор: Fedia 6.9.2006, 07:32

wood, для того, чтобы функция VarToDateTime сработала, дата должна быть в формате: 'dd.mm.yy'.

Автор: Akella 6.9.2006, 08:23

Цитата(wood @ 6.9.2006, 07:07

)

Дата представлена в формате '31-Aug-2006'

дата в текстовом формате или в вариантном, где храниться я имею ввиду, в текстовой переменной или в вариантной?
Попробуй использовать FormatDateTime.

Цитата

function FormatDateTime(const Format: string; DateTime: TDateTime): string; overload;

Код


Var
FromDate, ToDate:String;
begin
...
FromDate := '31-Aug-2006';
ToDate := FormatDateTime('dd-mmm-yyyy', FromDate);
...

ну или что-то в этом роде, ну... в противном случае сам переводи (ReplaceString) aug, mar, feb в 08, 03, 02 соответсвенно.

Автор: ASGDeveloper 6.9.2006, 08:36

Цитата(Akella @ 6.9.2006, 08:23

)

Попробуй использовать FormatDateTime.

Хм, даже из твоего описание функции видно, что второй параметр это TDateTime, а пытаешься скормить ей string. smile