Ето код програмы там весь есть...типа в Практической....
а еще вопрос... разве такой синтаксис
Код:
TPoint = object
private
x, y : integer; {Координати}
figure : TShape;
public
end;
вот где в инете не смотрю...
Код:
TPoint = class
private
x, y : integer; {Координати}
figure : TShape;
public
end;
lmikle: пользуемся тегами!!!