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

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

Последняя дата месяца? [D5, Win95/98]


MaXie ©   (2002-12-05 14:49:00) 

Как определить входит ли заданная дата в определенный месяц?


Andrey007   (2002-12-05 15:25:00) [1]

Из даты можно выделить день, и проверить сколько дней в месяце.


stone   (2002-12-05 15:21:00) [2]

procedure TForm1.Button1Click(Sender: TObject);

var
Present: TDateTime;
Year, Month, Day, Hour, Min, Sec, MSec: Word;
begin
Present:= Now;
DecodeDate(Present, Year, Month, Day);
if Month = определенному месяцуthen
DoSomething;
end;


MaXie   (2002-12-05 15:01:00) [3]

Это понятно, но дата имеет формат dd.mm.yy, а месяц - mm.yy!
Как в этом случае ты предлагаешь проверять, принадлежит (входит) ли дата определенному месяцу или нет?!


Reindeer Moss Eater   (2002-12-05 14:54:00) [4]

Даты, как и другие типы данных можно сравнивать


Наверх

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