TShape
From Lazarus wiki
Jump to navigationJump to searchTShape is a component that creates a shape (triangle, circle or square) on the surface of its parent (such as a TForm). It is a TGraphicControl descendant and is available under the Additional tab of the Component Palette.
See also