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

Вниз

Форматирование даты.   Найти похожие ветки 

 
worldmen ©   (2005-09-07 12:59) [0]

форматирую дату в строку так(такие данные мне нужны):
      FormatDateTime("yyyymm",Now);
А еще мне надо наоборот из "yyyymm" в дату.
Как это сделать?


 
Zeqfreed ©   (2005-09-07 14:18) [1]

worldmen ©   (07.09.05 12:59)
function DateYYYYMM(const date : String) : TDateTime;
var
year, month : Word;
begin
try
 year := StrToInt(Copy(date, 1, 4));
 month := StrToInt(Copy(date, 5, 2));
except
 raise Exception.Create("Invalid argument to convert");
end;

Result := EncodeDate(year, month, 1);
end;


Незнаю, возможно есть более универсальные и стандартные решения.


 
Fay ©   (2005-09-07 14:40) [2]

2 worldmen ©   (07.09.05 12:59)
какая версия Delphi?


 
worldmen ©   (2005-09-07 16:06) [3]

Большое спасибо Zeqfreed!
Версия Delphi 7.


 
Fay ©   (2005-09-07 16:24) [4]

2 worldmen ©   (07.09.05 16:06) [3]
function StrToDate(const S: string; const FormatSettings: TFormatSettings): TDateTime; overload;
+ F1



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

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

Наверх




Память: 0.47 MB
Время: 0.047 c
14-1127299712
DelphiN!
2005-09-21 14:48
2005.10.16
Алексей Дубовцев "Microsoft .NET в подлиннике" электоронная верс.


6-1118762188
Dima__
2005-06-14 19:16
2005.10.16
работа с сокетами без создания формы


3-1125572079
Term
2005-09-01 14:54
2005.10.16
Проблема с UNION


2-1127111629
ZZZ
2005-09-19 10:33
2005.10.16
Сокращение времени компиляции.


14-1127479695
oldman
2005-09-23 16:48
2005.10.16
Вот послали меня читать курсы...