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


4-22502
Alexander
2001-11-06 11:00
2002.01.08
Как получить иконку для зарегистрированного расширения в системе


7-22440
Rumrunner
2001-05-13 00:32
2002.01.08
В Win98 есть возможность разрешить общий доступ к Интернету для локальной сети


1-22019
Hex_for_delphi
2001-12-17 20:21
2002.01.08
Как написать трейнер!


3-21949
Hermit
2001-12-05 13:22
2002.01.08
Значение текущей записи