TShapeData

type TShapeData = record

  ShapeType: TfrShapeType;

  FillColor: TColor;

  FrameStyle: TfrFrameStyle;

  FrameWidth: Double;

  FrameColor: TColor;

  Radius: Single;

  Corners: TCornerSet;

  GradientColor: TColor;

  GradientDirection: TGradientDirection;

end;