Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.15;
Скачать: CL | DM;

Вниз

Например есть дата 01.07.2002 есть ли стандартная функция   Найти похожие ветки 

 
dimanew   (2002-07-01 09:26) [0]

которая напишет 1 июля 2002


 
tovSuhov ©   (2002-07-01 09:32) [1]

IMHO, это регулируется переменной LongDateFormat


 
XShura ©   (2002-07-01 09:32) [2]

Есть глобальная переменная var LongMonthNames: array[1..12] of string; но тама в именительном падеже, если тебе надо в другом падеже, то ручками выправи


 
dimanew   (2002-07-01 09:40) [3]

а может есть каканибудь API функция, ведь если мышой навести
в трэе на часы то там пишется 1 июля 2002


 
tovSuhov ©   (2002-07-01 10:38) [4]

DateSeparator := " ";
ShortDateFormat := "dd MMMM YYYY";
Label1.Caption = DateToStr(MyDate);


 
vedmed ©   (2002-07-01 11:46) [5]

function WinDateToStr(AFormat: string; ADate: TDateTime): string;
var
t: TSystemTime;
l: Integer;
Locale: Cardinal;
begin
Locale := ((SUBLANG_NEUTRAL shl 16) or LANG_RUSSIAN);
FillChar(t, SizeOf(t), 0);
DecodeDate(ADate, t.wYear, t.wMonth, t.wDay);
l := GetDateFormat(
Locale,//LOCALE_SYSTEM_DEFAULT,
0,
@t,
PChar(AFormat),
nil,
0);
SetLength(Result, l);
GetDateFormat(
Locale,//LOCALE_SYSTEM_DEFAULT,
0,
@t,
PChar(AFormat),
PChar(Result),
l);
end;

с форматом "dd MMMMM yyyy"



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

Текущий архив: 2002.07.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
3-47194
ioRaptor
2002-06-19 13:00
2002.07.15
Создание файла базы данных InterBase


14-47717
VictorT
2002-06-19 15:53
2002.07.15
Disk Dupe


6-47657
BAHO
2002-05-04 04:55
2002.07.15
Indy Help...


14-47696
BigBadMutuh
2002-06-02 13:12
2002.07.15
Вот и у меня сайт появился.


1-47250
Gamar
2002-06-29 10:09
2002.07.15
Передача значения от модального окна