| Class TWABD_Label (unit WABD_Objects) |
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure HTML_To_Object(FormVal: string);
function Object_To_Control(AOwner: TWinControl): TControl;
function Object_To_HTML: string;
function GetHRef: string;
procedure SetBold(NewBold: boolean);
procedure SetCaption(NewCaption: string);
procedure SetFontSize(NewSize: integer);
procedure SetName(const Value: TComponentName);
procedure UpdateWidHgt;| Properties |
property Bold : boolean
property CanClick : boolean
property Caption : string
property FontColor : TColor
property FontSize : integer
property Italic : boolean
property Underline : boolean| Events |
event OnClick : TNotifyEvent| Variables |
FBold : boolean;
FCanClick : boolean;
FCaption : string;
FFontColor : TColor;
FFontSize : integer;
FItalic : boolean;
FOnClick : TNotifyEvent;
FUnderline : boolean;| Constructors |
constructor Create(AOwner: TComponent);TWABD_Label
| Functions |
procedure HTML_To_Object(FormVal: string);
function Object_To_Control(AOwner: TWinControl): TControl;
function Object_To_HTML: string;Assert(GetParentForm <> nil); Assert(GetParentForm.Session <> nil);
function GetHRef: string;
procedure SetBold(NewBold: boolean);
procedure SetCaption(NewCaption: string);Now update based on the FontSize
procedure SetFontSize(NewSize: integer);
procedure SetName(const Value: TComponentName);
procedure UpdateWidHgt;| Properties |
property Bold : boolean
property CanClick : boolean
property Caption : string
property FontColor : TColor
property FontSize : integer
property Italic : boolean
property Underline : boolean| Events |
event OnClick : TNotifyEvent| Variables |
FBold : boolean;
FCanClick : boolean;
FCaption : string;
FFontColor : TColor;
FFontSize : integer;
FItalic : boolean;
FOnClick : TNotifyEvent;
FUnderline : boolean;