[Delphi]/[Pascal] Задай вопрос, получи ответ

#10

17.09.2007, 18:37

GlOFF

Постоянный

Регистрация: 08.05.2006

Сообщений: 816

С нами: 10531106

Репутация: 1338

Цитата:

Сообщение от Joker-jar

FormatDateTime('dddd, d-mmm-yy h:mm:ss',Date+Time) возвращает дату по-русски. Как сделать чтоб данная функция всегда возвращала дату по-английски?

А ещё можно получить вот так:

Цитата:

VOID GetSystemTime(

LPSYSTEMTIME lpSystemTime // address of system time structure
);

typedef struct _SYSTEMTIME { // st
WORD wYear;
WORD wMonth;
WORD wDayOfWeek;
WORD wDay;
WORD wHour;
WORD wMinute;
WORD wSecond;
WORD wMilliseconds;
} SYSTEMTIME;

Members

wYear

Specifies the current year.

wMonth

Specifies the current month; January = 1, February = 2, and so on.

wDayOfWeek

Specifies the current day of the week; Sunday = 0, Monday = 1, and so on.

wDay

Specifies the current day of the month.

wHour

Specifies the current hour.

wMinute

Specifies the current minute.

wSecond

Specifies the current second.

wMilliseconds

Specifies the current millisecond.

т.е. wMonth -> January = 1, February = 2, and so on.
Создашь массив с именами месяцев Array(January, February, ....) и дней ...

Получаем нужное название месяца = Array[wMonth];