Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Названия месяцев 


Марина   (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;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.02 c
1-22116           Bond                  2001-12-19 19:08  2002.01.08  
У кого-нить есть процедурка хеша-MD5?


1-22085           ProfiUgl              2001-12-19 15:24  2002.01.08  
Как считать параметры прокраммы в командной строке


1-22107           Alexander             2001-12-19 01:45  2002.01.08  
Как при запуске программы сразу показать поверх главной формы другую?


3-21946           set                   2001-12-05 00:08  2002.01.08  
Ещё раз работа с базами


6-22283           Yuraz                 2001-10-08 11:05  2002.01.08  
Как можно ещё сетевой принтер подключить, кроме стандартного способа??