| Class TmdURLLabel (unit mdURLLabel) |
TCustomLabel
| Constructors |
Constructor Create(AOwner : TComponent);| Functions |
Destructor Destroy;
Procedure CheckLinkAble;
Procedure Click;
Procedure SetAFont(AFont, AValue : TFont);
Procedure SetTheCaption;
Procedure SetViewFont;
Procedure UpdateHint;
Function GetCaption : TCaption;
Function GetHint : TCaption;
Procedure SetCaption(Value : TCaption);
Procedure SetHint(Value : TCaption);
Procedure SetLabelType(Value : TmdLabelType);
Procedure SetLinkFont(Value : TFont);
Procedure SetLinkType(Value : TmdLinkType);
Procedure SetPassiveFont(Value : TFont);
Procedure SetShowPrefix(Value : Boolean);
Procedure SetURL(Value : String);
Procedure SetURLAsHint(Value : Boolean);
Procedure SetURLCaption(Value : TCaption);| Properties |
property Align :
property Alignment :
property AutoSize :
property Caption :
property Color :
property Enabled :
property LabelType : TmdLabelType
property LinkFont : TFont
property LinkType : TmdLinkType
property ParentShowHint :
property PassiveFont : TFont
property PopupMenu :
property ShowHint :
property ShowPrefix : Boolean
property Transparent :
property URL : String
property URLAsHint : Boolean
property Visible :
property WordWrap :
property LinkAble : Boolean
property URLCaption : TCaption| Events |
event OnClick :
event OnDblClick :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FCaptionChanged : Boolean;
FLabelType : TmdLabelType;
FLinkAble : Boolean;
FLinkFont : TFont;
FLinkType : TmdLinkType;
FPassiveFont : TFont;
FShowPrefix : Boolean;
FURL : String;
FURLAsHint : Boolean;
FURLCaption : TCaption;
FURLCursor : TCursor;| Constructors |
Constructor Create(AOwner : TComponent);Public declarations
| Functions |
Destructor Destroy;Use the Hint property as full URL notify
Procedure CheckLinkAble;
Procedure Click;
Procedure SetAFont(AFont, AValue : TFont);Protected declarations
Procedure SetTheCaption;Check it the MAPI dll is there
Procedure SetViewFont;
Procedure UpdateHint;Update the hint values
Function GetCaption : TCaption;Execute the default web browser on the web page or the mailto window
Function GetHint : TCaption;
Procedure SetCaption(Value : TCaption);Get the old caption
Procedure SetHint(Value : TCaption);delete it...
Procedure SetLabelType(Value : TmdLabelType);update the caption
Procedure SetLinkFont(Value : TFont);
Procedure SetLinkType(Value : TmdLinkType);update the font (according to the new type
Procedure SetPassiveFont(Value : TFont);
Procedure SetShowPrefix(Value : Boolean);update the caption
Procedure SetURL(Value : String);If the label should look like a normal label
Procedure SetURLAsHint(Value : Boolean);Update the hint values
Procedure SetURLCaption(Value : TCaption);Set the "real" caption variabel
| Properties |
property Align :
property Alignment :
property AutoSize :
property Caption :
property Color :
property Enabled :
property LabelType : TmdLabelType
property LinkFont : TFontPublished declarations
property LinkType : TmdLinkType
property ParentShowHint :
property PassiveFont : TFont
property PopupMenu :
property ShowHint : Published declarations - Inherited
property ShowPrefix : Boolean
property Transparent :
property URL : String
property URLAsHint : Boolean
property Visible :
property WordWrap :
property LinkAble : Boolean
property URLCaption : TCaption| Events |
event OnClick :
event OnDblClick :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FCaptionChanged : Boolean;
FLabelType : TmdLabelType;
FLinkAble : Boolean;
FLinkFont : TFont;Private declarations
FLinkType : TmdLinkType;
FPassiveFont : TFont;
FShowPrefix : Boolean;
FURL : String;
FURLAsHint : Boolean;
FURLCaption : TCaption;
FURLCursor : TCursor;