Tesselation of non convex polygons in Delphi

Hi,
How can I tesselate and fill with pattern a non convex polygon using OpenGL
gluTessBeginPolygon...gluTessEndPolygon functions.
Can you give a vivid example in Delphi?

Paul
=========================
pavel.vassil...@getos.belgorod.su