Скачать: CL | DM;

Получение системного формата даты   Найти похожие ветки 

← →
EthernalWonderer   (2005-04-21 12:55) [0]

Уважаемые Мастера!
Приложение, которым я занимаюсь, активно использует преобразования даты, и "спотыкается" на компьютерах, где задан "нерусский" формат даты (например, сегодня - 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;

Однако на выходе имею пустые сообщения. Что здесь не так?

---

← →
alpet ©   (2005-04-21 13:15) [1]

1. stdcall не определенно. А это для CallBack функций обязательно.

---

← →
EthernalWonderer   (2005-04-21 13:44) [2]

Спасибо, заработало!

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c