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

[Egor Vladimirovich]

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

[Egor Vladimirovich]

Вроде разобрался) Спасибо! Еще один вопрос! Почему при работе выдает ошибку в это куске программы :

~~~~~~~~~~~~~~~~~~~~~
dat.d:=strtoint(edit5.text);
dat.m:=strtoint(edit6.text);
dat.y:=strtoint(edit7.text);
~~~~~~~~~~~~~~~~~~~~~

Но прекрасно работает если присваивать значания самому:
Например:

~~~~~~~~~~~~~~~~~~~~~
dat.d:=18; dat.m:=10; dat.y:=2006;
~~~~~~~~~~~~~~~~~~~~~

Описание Tdate:

~~~~~~~~~~~~~~~~~~~~~
type
Tdate = class
d : byte;
m : byte;
y : integer;
end;
~~~~~~~~~~~~~~~~~~~~~