Riješio sam sa CreatePolygonRgn
Code:
...
Canvas.Brush.Color := FFillColor;
FRgn := CreatePolygonRgn(FPoints, 6, WINDING);
SetWindowRGN(Handle, FRgn, True);
FRgn2 := CreatePolygonRgn(FPoints, 6, WINDING);
FillRgn(Canvas.Handle, FRgn2, Canvas.Brush.Handle);
...
Jedini problem je što poligon ne mogu dobiti transparentan.
Pokušao sam postaviti, ali ne pomaže. Tada je kolor poligona kao kolor forme:
Code:
Canvas.Brush.Color := clNone;
Kako dobiti da ta kontrola bude transparentna, ali da lovi mouse evente na cijeloj regiji? Može li ili moram drugim putem?