| Class TDanHint (unit Danhint1) |
TComponent
| Constructors |
constructor Create(AOwner:TComponent);| Functions |
destructor Destroy;
procedure Loaded;
procedure SetNewHintFont;
procedure CMFontChanged(var Message:TMessage);
procedure SetHintColor(Value:TColor);
procedure SetHintDirection(Value:THintDirection);
procedure SetHintFont(Value:TFont);
procedure SetHintPauseTime(Value:Integer);
procedure SetHintShadowColor(Value:TColor);| Properties |
property HintColor : TColor
property HintDirection : THintDirection
property HintFont : TFont
property HintPauseTime : Integer
property HintShadowColor : TColor| Events |
event OnSelectHintDirection : TOnSelectHintDirection| Variables |
FHintColor : TColor;
FHintDirection : THintDirection;
FHintFont : TFont;
FHintPauseTime : Integer;
FHintShadowColor : TColor;
FOnSelectHintDirection : TOnSelectHintDirection;| Constructors |
constructor Create(AOwner:TComponent);Public declarations
| Functions |
destructor Destroy;in TApplication's SetShowHint, the private FHintWindow is allocated according to HintWindowClass, so here do so actions to call SetShowHint and keep ShowHint property the same value
procedure Loaded;
procedure SetNewHintFont;
procedure CMFontChanged(var Message:TMessage);to activate to allocate a new Hint Window
procedure SetHintColor(Value:TColor);
procedure SetHintDirection(Value:THintDirection);to activate to allocate a new Hint Window
procedure SetHintFont(Value:TFont);
procedure SetHintPauseTime(Value:Integer);to activate to allocate a new Hint Window
procedure SetHintShadowColor(Value:TColor);| Properties |
property HintColor : TColor
property HintDirection : THintDirectionPublished declarations
property HintFont : TFont
property HintPauseTime : Integer
property HintShadowColor : TColor| Events |
event OnSelectHintDirection : TOnSelectHintDirection| Variables |
FHintColor : TColor;
FHintDirection : THintDirection;Private declarations
FHintFont : TFont;
FHintPauseTime : Integer;
FHintShadowColor : TColor;
FOnSelectHintDirection : TOnSelectHintDirection;