| Description | Hierarchy | Fields | Methods | Properties |
type TShape = class(TObject)
Abstract base class used by all geometric shapes.
![]() |
constructor Create; |
![]() |
constructor CreateAndSet(Shape: TShape); virtual; |
![]() |
destructor Destroy; override; |
![]() |
procedure Assign(Shape: TShape); virtual; |
![]() |
procedure Draw(Bitmap: TBitmap; XMin, YMin, XMax, YMax: real); virtual; abstract; |
![]() |
procedure GenerateNormal; virtual; abstract; |
![]() |
constructor Create; |
![]() |
constructor CreateAndSet(Shape: TShape); virtual; |
![]() |
destructor Destroy; override; |
![]() |
procedure Assign(Shape: TShape); virtual; |
![]() |
procedure Draw(Bitmap: TBitmap; XMin, YMin, XMax, YMax: real); virtual; abstract; |
![]() |
procedure GenerateNormal; virtual; abstract; |
![]() |
property ShapeType: TShapeType; |
![]() |
property ShapeType: TShapeType; |