Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.08;
Скачать: 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 вся ветка

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

Наверх




Память: 0.46 MB
Время: 0.011 c
3-21946
set
2001-12-05 00:08
2002.01.08
Ещё раз работа с базами


14-22335
Сергей1
2001-11-05 21:44
2002.01.08
ввод символов


1-22176
Serg5
2001-12-20 14:57
2002.01.08
Опять проблема с текстом: вывожу на экран Image1.Canvas.TextOut, но под самим текстом белый беграунд. Можно ли если не убрать(просто наложить буквы), то хотя бы беграунд сделать чёрным.


14-22402
Darker
2001-11-08 12:26
2002.01.08
Ищу человека с ником


4-22473
amamed_3071
2001-11-02 13:46
2002.01.08
Epson Printer commands