Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как узнать номер месяца


Crazy manager ©   (2006-06-15 11:59:00) 

Люди добрые! Подскажите пожалуйста как узнать программно номер месяца. Январь, как известно под номером 1, февраль под номером 2 и.т.д.


Crazy manager   (2006-06-15 12:20:00) [1]

Всем спасибо! Разобрался!


Sergey13   (2006-06-15 12:10:00) [2]

2[2] Crazy manager   (15.06.06 12:03)
Если у машины квадратные колеса, надо колеса менять, а не форсировать двигатель. ИМХО.


Сергей М.   (2006-06-15 12:08:00) [3]

function GetMonthNumber(MonthName: String): Integer;
begin
 if MonthName = 'Январь' then Result := 1 else
 if MonthName = 'Февраль' then Result := 2 else
..  
end;


Ega23   (2006-06-15 12:05:00) [4]

DecodeDate + F1


Crazy manager   (2006-06-15 12:03:00) [5]


> А чем тебе не нравится вариант с последовательным апдейтом
> из прежнего топика? И зачем вообще плодить топики?

Да нет нравится, но сама программа работает на ADO компонентах с аксесовской таблицей. Мне проще переделать кое-что в Делфи и потом в результате получается значительно проще и эффективней.


Sergey13   (2006-06-15 12:01:00) [6]

А чем тебе не нравится вариант с последовательным апдейтом из прежнего топика? И зачем вообще плодить топики?


Наверх

Титульная страница Поиск, карта сайта Написать письмо