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

Вниз

Ограничение на StrToDate   Найти похожие ветки 

 
oxffff ©   (2008-01-10 15:09) [0]

StrToDate не может обрабатывать строки вида YYYYMMDD.
По скольку использует в работе DateSeparator

Например, строка вида 20080110

format.ShortDateFormat:="YYYYYMMMDDD";
date1:=StrToDate("20080110",format);

StrToDate валиться на ней.

Или я не прав?


 
oxffff ©   (2008-01-10 15:10) [1]


> StrToDate валиться на ней.


валится


 
oxffff ©   (2008-01-10 15:10) [2]


> StrToDate валиться на ней.


валится


 
oxffff ©   (2008-01-10 15:10) [3]


> format.ShortDateFormat:="YYYYYMMMDDD";

>
> format.ShortDateFormat:="YYYYMMDD";


 
oxffff ©   (2008-01-10 15:12) [4]

Во блин, на таких вещах завалиться. Sorry

S must consist of two or three numbers, separated by the character defined by the DateSeparator global variable or its TFormatSettings equivalent.


 
Семен Сурков   (2008-01-10 15:13) [5]


> Во блин, на таких вещах завалиться. Sorry

еще парочку постов напиши, а то мало как-то.



 
oxffff ©   (2008-01-10 15:15) [6]


> Семен Сурков   (10.01.08 15:13) [5]


Ты лучше решение предложи готовое.


 
Семен Сурков   (2008-01-10 15:16) [7]


>
> Ты лучше решение предложи готовое.

я думаю, что самому написать
сомневаюсь, что в дельфи такое готовое есть.


 
Игорь Шевченко ©   (2008-01-10 15:18) [8]

RxLib:

function StrToDateFmt(const DateFormat, S: string): TDateTime;


 
Palladin ©   (2008-01-10 15:19) [9]

:)

Function StrToDate(Const s:String):TDateTime;
Var
 n:Integer;
 y,m:Word;
Begin
 n:=StrToIntDef(s,-1);
 If n=-1 Then Result:=SysUtils.StrToDate(s) Else
  Begin
   y:=n div 10000; n:=n mod 10000;
   m:=n div 100; n:=n mod 100;
   Result:=EncodeDate(y,m,n);
  End;
End;


 
oxffff ©   (2008-01-10 15:20) [10]


> Palladin ©   (10.01.08 15:19) [9]


> Игорь Шевченко ©   (10.01.08 15:18) [8]


Спасибо огромное.


 
Anatoly Podgoretsky ©   (2008-01-10 16:01) [11]

> oxffff  (10.01.2008 15:12:04)  [4]

Опять "глюк" нашел.


 
Семен Сурков   (2008-01-10 16:02) [12]


>  [11] Anatoly Podgoretsky ©   (10.01.08 16:01)
> > oxffff  (10.01.2008 15:12:04)  [4]
>
> Опять "глюк" нашел.


мастер


 
Romkin ©   (2008-01-10 16:31) [13]

Стандартная DateTimeToString чем плоха?


 
Palladin ©   (2008-01-10 16:32) [14]

тем, что она наоборот :)))


 
oxffff ©   (2008-01-10 16:37) [15]


> Anatoly Podgoretsky ©   (10.01.08 16:01) [11]


Нет, в этот раз не прочитал об этой особенности.
Точнее был настолько уверен, что функция универсальна.
Увы, это не так. А другой не нашел.



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

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

Наверх




Память: 0.47 MB
Время: 0.041 c
15-1199637317
Катунов Юрий
2008-01-06 19:35
2008.02.10
Как лучше всего повесить намертво компьютер?


2-1199975765
312kbps
2008-01-10 17:36
2008.02.10
Не могу создать DBF файл на соседнем компе (


2-1200312837
Washington
2008-01-14 15:13
2008.02.10
Прорисовка PopupMenu


15-1199647800
Sergey Masloff
2008-01-06 22:30
2008.02.10
Рождественская история (ресальная)


15-1199959150
Terc
2008-01-10 12:59
2008.02.10
Как установить Indy 10 in Delphi





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