| Class TsCustomLinkEdit (unit sToolsEdit) |
| Constructors |
constructor Create( AOwner: TComponent );| Functions |
procedure CloseUp;
destructor Destroy;
procedure DropDown;
procedure ButtonClick;
procedure CreateParams(var Params: TCreateParams);
procedure CreateWnd;
function GetDefaultBitmap(var DestroyNeeded: Boolean): TBitmap;
function GetEditRect: TRect;
procedure KeyDown(var Key: Word; Shift: TShiftState);
procedure KeyPress(var Key: Char);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseMove(Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
function NeedBorderRedraw: Boolean;
procedure PaintBorders(DC: HDC);
procedure PaintEdit(DC: HDC);
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure WndProc(var Message: TMessage);
procedure ApplicationShowHint(var HintStr: string; var CanShow: Boolean; var HintInfo: THintInfo);
function ButtonWidth: Integer;
procedure CMEnabledChanged (var Msg: TMessage);
procedure DrawButton(DC: HDC);
function GetButtonGlyph: TBitMap;
procedure InvalidateButton;
procedure RecreateGlyph;
procedure RedrawButtonBorder(DC: HDC);
procedure SetButtonVisible(const Value: Boolean);
procedure SetEditRect;
procedure SetGlyph(const Value: TBitMap);
procedure SetGlyphKind(const Value: TGlyphKind);
procedure SetGlyphsNumber(const Value: Integer);
procedure StopTracking;
procedure TrackButton(const X,Y: Integer);
procedure WMKillFocus(var Message: TMessage);
procedure WMSetCursor(var Msg: TWMSetCursor);| Properties |
property PopupOpen : Boolean
property ButtonHint : String
property ButtonShowHint : Boolean
property ButtonVisible : Boolean
property ClickKey : TShortCut
property Glyph : TBitMap
property GlyphKind : TGlyphKind
property GlyphsNumber : Integer| Events |
event OnButtonDown : TNotifyEvent| Variables |
FPopupOpen : Boolean;
FAppShowHint : TShowHintEvent;
FButtonHint : String;
FButtonShowHint : Boolean;
FButtonVisible : Boolean;
FButtonWidth : Integer;
FClickKey : TShortCut;
FGlyph : TBitMap;
FGlyphKind : TGlyphKind;
FGlyphsNumber : Integer;
FOnButtonDown : TNotifyEvent;| Constructors |
constructor Create( AOwner: TComponent );TsCustomLinkEdit
| Functions |
procedure CloseUp;
destructor Destroy;
procedure DropDown;
procedure ButtonClick;
procedure CreateParams(var Params: TCreateParams);
procedure CreateWnd;
function GetDefaultBitmap(var DestroyNeeded: Boolean): TBitmap;
function GetEditRect: TRect;
procedure KeyDown(var Key: Word; Shift: TShiftState);
procedure KeyPress(var Key: Char);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseMove(Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
function NeedBorderRedraw: Boolean;
procedure PaintBorders(DC: HDC);
procedure PaintEdit(DC: HDC);
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure WndProc(var Message: TMessage);
procedure ApplicationShowHint(var HintStr: string; var CanShow: Boolean; var HintInfo: THintInfo);
function ButtonWidth: Integer;
procedure CMEnabledChanged (var Msg: TMessage);CM_EXIT;
procedure DrawButton(DC: HDC);
function GetButtonGlyph: TBitMap;
procedure InvalidateButton;
procedure RecreateGlyph;
procedure RedrawButtonBorder(DC: HDC);
procedure SetButtonVisible(const Value: Boolean);
procedure SetEditRect;
procedure SetGlyph(const Value: TBitMap);
procedure SetGlyphKind(const Value: TGlyphKind);
procedure SetGlyphsNumber(const Value: Integer);
procedure StopTracking;
procedure TrackButton(const X,Y: Integer);
procedure WMKillFocus(var Message: TMessage);
procedure WMSetCursor(var Msg: TWMSetCursor);| Properties |
property PopupOpen : Boolean
property ButtonHint : String
property ButtonShowHint : Boolean
property ButtonVisible : Boolean
property ClickKey : TShortCut
property Glyph : TBitMap
property GlyphKind : TGlyphKind
property GlyphsNumber : Integer| Events |
event OnButtonDown : TNotifyEvent| Variables |
FPopupOpen : Boolean;
FAppShowHint : TShowHintEvent;
FButtonHint : String;
FButtonShowHint : Boolean;
FButtonVisible : Boolean;
FButtonWidth : Integer;
FClickKey : TShortCut;
FGlyph : TBitMap;
FGlyphKind : TGlyphKind;
FGlyphsNumber : Integer;
FOnButtonDown : TNotifyEvent;