Получение системного формата даты

← →
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]

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

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