![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Наличные форматы дату
Didi © (2002-07-26 12:23:00)Как можно извлечит и показат в ListBox наличные форматы дату?
MBo (2002-07-26 13:05:00) [1]текущий формат примерно так и еще посмотри список форматов FormatDateTime
function EDFProc(p:pchar):Boolean;stdcall;
begin
form1.listbox1.items.add(formatDatetime(p,now));
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
EnumDateFormats(@EDFProc,LOCALE_USER_DEFAULT,DATE_SHORTDATE);
EnumDateFormats(@EDFProc,LOCALE_USER_DEFAULT,DATE_LONGDATE);
end;
Didi (2002-07-26 12:48:00) [2]Нет, я хочу получит следный списък:
26.07.2002
26.07.2002 г.
26.7.2002
26.7.2002 г.
2002-07-26
26 Юли 2002 г. 12:15 и т.д. - все форматы от RegionalSettings-Date
MBo (2002-07-26 12:28:00) [3]это нужно?
listbox1.items.add(datetostr(now));