TShape property Brush ignored when Shape is stDiamond
Original Reporter info from Mantis: ikra
-
Reporter name: Ivo Kralj
Original Reporter info from Mantis: ikra
- Reporter name: Ivo Kralj
Description:
To reproduce:
- start new graphic application
- put TShape on main form
- select Shape1.Brush.Color := clBlue (something different from background)
- select Shape1.Shape := stDiamond
On Linux-GTK2 shape inside is transparent while on Windows7 is painted with selected color.
Additional information:
My components derived from TGraphicControl suffer the same behavior. The common denominator to all of them seems Canvas.Polygon(), even if using it in TPaintBox.OnPaint does produce correct results.