![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Последняя дата месяца? [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]Даты, как и другие типы данных можно сравнивать