Значит имеет такую конструкцию ( кусок кода) :
{$N+}
{$E+}
Program Figures;
uses Crt, Graph;
type
PointP=^Point;
Point=object
protected
X:integer;

Y:integer;
Color:integer;
public
constructor Init(InitX, InitY, InitC:integer);
function GetX:integer;
function GetC:integer;
procedure PutX(NewX:integer);
procedure PutY(NewY:integer);
procedure PutColor(NewColor:integer);
procedure ShowP;
procedure HideP;
procedure MoveTo(XL,YL:integer);
end;
Суть проблемы , Компилятор ругается с ошибкой 86 ( Предпологается ":" в ( X:integer;) все есть . Что не так ?