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

Вниз

Как преобразовать строку в дату.   Найти похожие ветки 

 
TNK   (2012-02-15 10:55) [0]

Здравствуйте ! На вашем сайте нашла пример - см. ниже . Мне нужно преобразовать строку   <"6-Apr-1998"> в дату -->  <06.04.1998> .
Когда пытаюсь пробовать пример (см. ниже) , появляется ошибка в каждой строке примера  - <Invalid variant conversion>  . В чем же причина ?  

Пример  с  сайта :  

Как преобразовать строку в дату.
Функция StrToDate преобразует только числа, поэтому, если у Вас месяцы в виде имён, то прийдётся использовать VarToDateTime.
Пример:

 var
   D1, D2, D3 : TDateTime;
 begin
   D1 := VarToDateTime("December 6, 1969");
   D2 := VarToDateTime("6-Apr-1998");
   D3 := VarToDateTime("1998-Apr-6");
   ShowMessage(DateToStr(D1)+" "+DateToStr(D2)+" "+
               DateToStr(D3));
 end;


 
MBo ©   (2012-02-15 11:10) [1]

Caption := DateTimeToStr(VarToDateTime("15 февраля 2012"));
работает, т.к. вызов функции приводит к
VarDateFromStr(S, VAR_LOCALE_USER_DEFAULT, 0, Result);

Правда, попытка добавить "г." (у меня в настройках полная дата выглядит как "15 февраля 2012 г.") не фурычит


 
Inovet ©   (2012-02-15 11:12) [2]

> [0] TNK   (15.02.12 10:55)

Локаль русская?


 
Омлет ©   (2012-02-15 11:12) [3]

В русской локали Apr = Апр
D2 := VarToDateTime("6-Апр-1998");


 
Anatoly Podgoretsky ©   (2012-02-15 13:02) [4]

> TNK  (15.02.2012 10:55:00)  [0]

Пиши свою функцию, что бы не зависить от локалей.



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

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

Наверх




Память: 0.47 MB
Время: 0.052 c
2-1337153578
Scott Storch
2012-05-16 11:32
2013.03.22
Создание методов в интерфейсах COM-объекта


15-1343817068
ProgRAMmer Dimonych
2012-08-01 14:31
2013.03.22
Spurious wakeup в WinSock?


2-1340710139
Xmen
2012-06-26 15:28
2013.03.22
Работа с потоком и как подружится с FTP


1-1295123451
cr@nk
2011-01-15 23:30
2013.03.22
Шифрование алгоритмом RSA


4-1258675071
DDorgNev
2009-11-20 02:57
2013.03.22
как перехватить LVM_SETITEMTEXT у контрола в чужом окне?