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
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20090907/3f0a47cd/attachment-0001.html>

Try
poligon : array [1..5] of TPoint;

Malcolm

And to draw the polygon

I think that
Canvas.PolyBezier(poligon, true, true)
will probably do what you want.

Malcolm