Hi,
I have old program in Turbo Pascal 6 for make poligon in graphic environment

using variabel
var
...
poligon : array [1..5] of pointtype;
...

to make

Begin
           poligon[1].x := X_Table^[i,j];
           poligon[2].x := X_Table^[i,j-1];
           poligon[3].x := X_Table^[i-1,j-1];
           poligon[4].x := X_Table^[i-1,j];
           poligon[5].x := X_Table^[i,j];
           poligon[1].y := Y_Table^[i,j];
           poligon[2].y := Y_Table^[i,j-1];
           poligon[3].y := Y_Table^[i-1,j-1];
           poligon[4].y := Y_Table^[i-1,j];
           poligon[5].y := Y_Table^[i,j];
           SetFillStyle(1,0);
           FillPoly(5,poligon);
End

and then i compile it in free pascal that program running well
but when i port it in lazarus
I got error

utigad_1.pas(132,47) Error: Identifier not found "*pointtype*"

plz help me
how i can make identifier or convert *pointtype *in* *lazarus ??

Thanks Alot
Andri
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to