Вниз
Скачать: CL | DM;

Названия месяцев   Найти похожие ветки 

 
Марина   (2001-12-20 16:29) [0]

Подскажите,пожалуйста,как получить название месяца не в виде "декабря",например,а в виде "декабрь"? Заранее спасибо.


 
Внук ©   (2001-12-20 16:35) [1]

А стоит ли мучаться? Если можно получить названия месяцев в родительном падеже, то можно составить массив соответствий и все дела.


 
Dimka Maslov ©   (2001-12-20 18:32) [2]

const Months: array [1..12] of string = ("январь", "февраль", ... , "декабрь");

function GetMonthName(N: Integer): string;
begin
if (N=>Low(Months)) and (N<=High(Months)) then Result:=Months[N] else Result:="";

end;



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

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



Память: 0.45 MB
Время: 0.011 c
3-21936
vvs
2001-12-05 06:42
2002.01.08
Delphi5+SQL Server7 нормально, а Delphi5+SQL 2000 бред


14-22406
VEG
2001-11-10 12:56
2002.01.08
Наслучалось тут со мной разного...


14-22403
Burmistroff
2001-11-11 20:13
2002.01.08
Супер справочник по Delphi -2. Ваше мнение, please.


1-22033
voronkov
2001-12-18 12:27
2002.01.08
Как заставить TEdit не генерить звуковой сигнал при включенном обработчике нажатий клавиш.


7-22444
VS
2001-09-27 07:14
2002.01.08
Как скопировать самого себя, если программа запущена




   Наверх