| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Получение системного формата даты [D6, Win95/98, WinME, NT4, Win2k, WinXP]
EthernalWonderer © (2005-04-21 12:55:00)Уважаемые Мастера!
Приложение, которым я занимаюсь, активно использует преобразования даты, и "спотыкается" на компьютерах, где задан "нерусский" формат даты (например, сегодня - 04.21.05).
Хочу с разрешения юзера поправить формат в системе, для этого сначала надо его получить. Делаю так:
Function CheckDateFormat: Boolean;
Function EnumDateFormatsProc(DateFormatStr: LPTSTR): Boolean;
Begin
ShowMessage(StrPas(DateFormatStr));
Result := False;
End;
Begin
EnumDateFormats(@EnumDateFormatsProc,LOCALE_SYSTEM_DEFAULT,DATE_SHORTDATE);
End;
Однако на выходе имею пустые сообщения. Что здесь не так?
EthernalWonderer (2005-04-21 13:44:00) [1]Спасибо, заработало!
alpet (2005-04-21 13:15:00) [2]1. stdcall не определенно. А это для CallBack функций обязательно.
| |
