Class TWABD_Base_Image (unit WABD_Objects)

Inherits from

TWABD_SectionObject

Constructors


constructor Create(AOwner: TComponent);

TWABD_Base_Image


Functions

destructor Destroy;


procedure HTML_To_Object(FormVal: string);


function Object_To_Control(AOwner: TWinControl): TControl;


function Object_To_HTML: string;

Do Nothing

procedure Loaded;


procedure MouseDown(x, y: integer);


procedure SetHotSpots(HS: TWABD_HotSpots);


procedure SetImagePath(NewImagePath: string);


procedure SetImgHeight(h: integer);


procedure SetImgWidth(w: integer);


procedure SetLocalPath(NewLocalPath: string);


procedure SetName(const Value: TComponentName);


procedure UpdateImageSize;


Properties

property AltText : string


property HotSpots : TWABD_HotSpots


property ImageHeight : integer


property ImageWidth : integer


property LocalPath : string


property ImagePath : string


Events

event OnClick : TNotifyEvent


event OnMouseDown : TWABD_MouseDown


Variables

FAltText : string;


FHotSpots : TWABD_HotSpots;


FImagePath : string;


FImgHeight : integer;


FImgWidth : integer;


FLocalPath : string;


FMouseDown : TWABD_MouseDown;


FOnClick : TNotifyEvent;



Constructors


constructor Create(AOwner: TComponent);

TWABD_Base_Image


Functions


destructor Destroy;


procedure HTML_To_Object(FormVal: string);


function Object_To_Control(AOwner: TWinControl): TControl;


function Object_To_HTML: string;

Do Nothing


procedure Loaded;


procedure MouseDown(x, y: integer);


procedure SetHotSpots(HS: TWABD_HotSpots);


procedure SetImagePath(NewImagePath: string);


procedure SetImgHeight(h: integer);


procedure SetImgWidth(w: integer);


procedure SetLocalPath(NewLocalPath: string);


procedure SetName(const Value: TComponentName);


procedure UpdateImageSize;


Properties


property AltText : string


property HotSpots : TWABD_HotSpots


property ImageHeight : integer


property ImageWidth : integer


property LocalPath : string


property ImagePath : string


Events


event OnClick : TNotifyEvent


event OnMouseDown : TWABD_MouseDown


Variables


FAltText : string;


FHotSpots : TWABD_HotSpots;


FImagePath : string;


FImgHeight : integer;


FImgWidth : integer;


FLocalPath : string;


FMouseDown : TWABD_MouseDown;


FOnClick : TNotifyEvent;