Class TIEButton (unit IEBtn)
Inherits from
TGraphicControl
Constructors
constructor Create(AOwner: TComponent);
Functions
destructor Destroy;
procedure CMButtonPressed(var Message: TMessage);
procedure CMColorChanged(var Message: TMessage);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(var Message: TMessage);
procedure CMMouseEnter(var Message: TMessage);
procedure CMMouseLeave(var Message: TMessage);
procedure CMSysColorChange(var Message: TMessage);
procedure CMTextChanged(var Message: TMessage);
procedure Loaded;
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure Notification(AComponent: TComponent; Operation: TOperation);
procedure Paint;
procedure WMLButtonDblClk(var Message: TWMLButtonDown);
procedure WMMouseMove(var Message: TWMMouseMove);
procedure CreateBrushPattern;
procedure CurrentLayOut(var txtRect, bitRect: TRect);
function GetDown: boolean;
procedure MakeTransparent(DrwStyle: TDrawingStyle; var LeftPt, TopPt: integer);
procedure SetAllowAllUp(value: boolean);
procedure SetBorderWidth(value: TBorderWidth);
procedure SetColor(index: integer; value: TColor);
procedure SetCurrentGlyph;
procedure SetDown(value: boolean);
procedure SetGlyph(value: TBitmap);
procedure SetGroupIndex(value: integer);
procedure SetInactiveStyle(value: TDrawingStyle);
procedure SetLayOut(value: TButtonLayOut);
procedure SetMenuMark(value: boolean);
procedure SetNumGlyphs(value: TNumGlyphs);
procedure SetPopupMenu(value: TPopupMenu);
procedure SetShowCaption(value: boolean);
procedure SetSpacing(value: TSpacing);
procedure SetTransparentColor(value: TColor);
procedure SetVisible(value: boolean);
procedure UpdateExclusive;
Properties
property AllowAllUp : boolean
property BorderWidth : TBorderWidth
property Caption :
property Color :
property ColorHighLight : TColor
property ColorShadow : TColor
property Down : boolean
property Enabled :
property Font :
property Glyph : TBitmap
property GroupIndex : integer
property InactiveStyle : TDrawingStyle
property LayOut : TButtonLayOut
property MenuMark : boolean
property NumGlyphs : TNumGlyphs
property ParentColor :
property ParentFont :
property PopupMenu : TPopupMenu
property ShowCaption : boolean
property ShowHint :
property Spacing : TSpacing
property TransparentColor : TColor
property Visible : boolean
Events
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnMouseDown :
event OnMouseEnter : TMouseEnter
event OnMouseLeave : TMouseLeave
event OnMouseMove :
event OnMouseUp :
event OnStartDrag :
Variables
FAllowAllUp : boolean;
FBorderWidth : TBorderWidth;
FColorHighLight : TColor;
FColorShadow : TColor;
FCurrentGlyph : TBitmap;
FDown : boolean;
FGlyph : TBitmap;
FGroupIndex : integer;
FHasMouse : boolean;
FImageList : TImageList;
FInactiveStyle : TDrawingStyle;
FLayOut : TButtonLayOut;
FMark : TBitmap;
FMenuMark : boolean;
FMouseDown : boolean;
FMouseEnter : TMouseEnter;
FMouseIsDown : boolean;
FMouseLeave : TMouseLeave;
FNumGlyphs : TNumGlyphs;
FPopupMenu : TPopupMenu;
FShowCaption : boolean;
FSpacing : TSpacing;
FTransparentColor : TColor;
FVisible : boolean;
Constructors
constructor Create(AOwner: TComponent);
Functions
destructor Destroy;
procedure CMButtonPressed(var Message: TMessage);
procedure CMColorChanged(var Message: TMessage);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(var Message: TMessage);
procedure CMMouseEnter(var Message: TMessage);
procedure CMMouseLeave(var Message: TMessage);
procedure CMSysColorChange(var Message: TMessage);
procedure CMTextChanged(var Message: TMessage);
procedure Loaded;
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure Notification(AComponent: TComponent; Operation: TOperation);
procedure Paint;
procedure WMLButtonDblClk(var Message: TWMLButtonDown);
procedure WMMouseMove(var Message: TWMMouseMove);
procedure CreateBrushPattern;
procedure CurrentLayOut(var txtRect, bitRect: TRect);
function GetDown: boolean;
procedure MakeTransparent(DrwStyle: TDrawingStyle; var LeftPt, TopPt: integer);
procedure SetAllowAllUp(value: boolean);
procedure SetBorderWidth(value: TBorderWidth);
procedure SetColor(index: integer; value: TColor);
procedure SetCurrentGlyph;
procedure SetDown(value: boolean);
procedure SetGlyph(value: TBitmap);
procedure SetGroupIndex(value: integer);
procedure SetInactiveStyle(value: TDrawingStyle);
procedure SetLayOut(value: TButtonLayOut);
procedure SetMenuMark(value: boolean);
procedure SetNumGlyphs(value: TNumGlyphs);
procedure SetPopupMenu(value: TPopupMenu);
procedure SetShowCaption(value: boolean);
procedure SetSpacing(value: TSpacing);
procedure SetTransparentColor(value: TColor);
procedure SetVisible(value: boolean);
procedure UpdateExclusive;
Properties
property AllowAllUp : boolean
property BorderWidth : TBorderWidth
property Caption :
property Color :
property ColorHighLight : TColor
property ColorShadow : TColor
property Down : boolean
property Enabled :
property Font :
property Glyph : TBitmap
property GroupIndex : integer
property InactiveStyle : TDrawingStyle
property LayOut : TButtonLayOut
property MenuMark : boolean
property NumGlyphs : TNumGlyphs
property ParentColor :
property ParentFont :
property PopupMenu : TPopupMenu
property ShowCaption : boolean
property ShowHint :
property Spacing : TSpacing
property TransparentColor : TColor
property Visible : boolean
Events
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnMouseDown :
event OnMouseEnter : TMouseEnter
event OnMouseLeave : TMouseLeave
event OnMouseMove :
event OnMouseUp :
event OnStartDrag :
Variables
FAllowAllUp : boolean;
FBorderWidth : TBorderWidth;
FColorHighLight : TColor;
FColorShadow : TColor;
FCurrentGlyph : TBitmap;
FDown : boolean;
FGlyph : TBitmap;
FGroupIndex : integer;
FHasMouse : boolean;
FImageList : TImageList;
FInactiveStyle : TDrawingStyle;
FLayOut : TButtonLayOut;
FMark : TBitmap;
FMenuMark : boolean;
FMouseDown : boolean;
FMouseEnter : TMouseEnter;
FMouseIsDown : boolean;
FMouseLeave : TMouseLeave;
FNumGlyphs : TNumGlyphs;
FPopupMenu : TPopupMenu;
FShowCaption : boolean;
FSpacing : TSpacing;
FTransparentColor : TColor;
FVisible : boolean;