Приложение 5. Lazarus: компонент Shape
Additional - на этой панели компонентов находится Shape.
Придание фигуре Shape1 формы круга:
Shape1.Shape := stCircle;
Придание фигуре Shape1 светло-зеленого цвета - clLime или красного цвета - clRed:
Shape1.Brush.Color := clLime; Shape1.Brush.Color := clRed;