| Class TPGGlyph (unit PGGlyph) |
TGraphicControl
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure CMFontChanged(var Message: TMessage);
procedure GlyphChanged(Sender: TObject);
procedure Loaded;
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure RefreshAll;
destructor Destroy;
function GetBevelWidth: Integer;
function GetButton: Boolean;
function GetCaption: string;
function GetGlyph: TBitmap;
function GetLayout: TButtonLayout;
function GetMargin: Integer;
function GetNumGlyphs: Integer;
function GetSpacing: Integer;
function GetState: TPGGlyphState;
function GetTransparent: Boolean;
function GetTransparentColor: TColor;
procedure OnRefreshDrawings(Sender: TObject);
procedure Paint;
procedure SetBevelWidth(Value: Integer);
procedure SetButton(Value: Boolean);
procedure SetCaption(Value: string );
procedure SetGlyph(Value: TBitmap );
procedure SetLayout(Value: TButtonLayout );
procedure SetMargin(Value: Integer );
procedure SetNumGlyphs(Value: Integer);
procedure SetSpacing(Value: Integer );
procedure SetState(Value: TPGGlyphState );
procedure SetTransparent(Value: Boolean);
procedure SetTransparentColor(Value: TColor);| Properties |
property BevelWidth : Integer
property Button : Boolean
property Caption : string
property Font :
property Glyph : TBitmap
property Layout : TButtonLayout
property Margin : Integer
property NumGlyphs : Integer
property ParentFont :
property Spacing : Integer
property State : TPGGlyphState
property Transparent : Boolean
property TransparentColor : TColor
property GlyphEngine : TPGGlyphEngine| Events |
event OnClick :
event OnDblClick :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FGlyphEngine : TPGGlyphEngine;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure CMFontChanged(var Message: TMessage);
procedure GlyphChanged(Sender: TObject);
procedure Loaded;Refresh the drawings of each of the currently created glyph states.
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure RefreshAll;
destructor Destroy;
function GetBevelWidth: Integer;
function GetButton: Boolean;
function GetCaption: string;
function GetGlyph: TBitmap;
function GetLayout: TButtonLayout;
function GetMargin: Integer;
function GetNumGlyphs: Integer;
function GetSpacing: Integer;
function GetState: TPGGlyphState;
function GetTransparent: Boolean;
function GetTransparentColor: TColor;
procedure OnRefreshDrawings(Sender: TObject);
procedure Paint;
procedure SetBevelWidth(Value: Integer);
procedure SetButton(Value: Boolean);
procedure SetCaption(Value: string );
procedure SetGlyph(Value: TBitmap );
procedure SetLayout(Value: TButtonLayout );
procedure SetMargin(Value: Integer );
procedure SetNumGlyphs(Value: Integer);
procedure SetSpacing(Value: Integer );
procedure SetState(Value: TPGGlyphState );
procedure SetTransparent(Value: Boolean);
procedure SetTransparentColor(Value: TColor);| Properties |
property BevelWidth : Integer
property Button : Boolean
property Caption : string
property Font :
property Glyph : TBitmap
property Layout : TButtonLayout
property Margin : Integer
property NumGlyphs : Integer
property ParentFont :
property Spacing : Integer
property State : TPGGlyphState
property Transparent : Boolean
property TransparentColor : TColor
property GlyphEngine : TPGGlyphEngine| Events |
event OnClick :
event OnDblClick :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FGlyphEngine : TPGGlyphEngine;