Класс календаря., ООП Опции

[Egor Vladimirovich]

Условие. Календарь. Реализовать класс календаря с возможностью получения дня
недели для даты, числа дней в i месяце,начиная с текущего,определение
высокосного года! Как это реализовать в Delphi?

[Egor Vladimirovich]

Помогите кто нибудь мне написать процедуру Вычисления количества дней,между 2 датами!!!!!!!!!

[Malice]

Помогите кто нибудь мне написать процедуру Вычисления количества дней,между 2 датами!!!!!!!!!

Тебе нужна функция, переводящая дату в количество дней начиная с хз какой даты:

function days (y,m,d:integer):longint;
begin
if m<3 then begin dec (y); inc (m,12); end;
days:=round(int (y*365.25)+int ((m+1)*30.601)+d-int(y/100)+int (y/400));
end;

Для вычисления разницы между датами в самый раз.