Unit 'ExShape' Package
[Overview][Types][Classes][Index] [#bs_controls]

TShapeEx

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: exshape.pas line 49

type TShapeEx = class(TShape)

protected

  function DefaultPlaceText();

  

  procedure HeaderFontChanged();

  

  function MeasureText();

  

  function TextFlags();

  

public

  constructor Create(); override;

  

  destructor Destroy; override;

  

  procedure Paint; override;

  

published

  property Font;

  

  property Header: TShapeText; [rw]

  

  property HeaderFont: TFont; [rw]

  

  property Text: TShapeText; [rw]

  

end;

Inheritance

TShapeEx

  

|

TObject



CT Web help

CodeTyphon Studio