Class TTBNArea (unit TBNArea)

Inherits from

TComponent

neue Message-Konstante

Constructors


constructor Create(AnOwner: TComponent);

Icon wird entfernt


Functions

destructor Destroy;


procedure DoOnDblClick;


procedure DoOnLeftClick;

falls Tip während der Laufzeit geändert wird

procedure DoOnRightClick;


procedure Loaded;

Icon für die Taskbar erzeugen

procedure WndProc(var Msg: TMessage);


procedure DoPopup(i: integer);

Fensterprozedur, um die jeweiligen Events auszulösen

procedure SetCopyright(s: string);

Icon in Taskbar hinzufügen

procedure SetEnabled(Value: boolean);


procedure SetIcon(AnIcon: TIcon);

unsichtbares Fenster freigeben

procedure SetTip(s: string);

falls das Icon während der Laufzeit geändert wird

procedure TBAddIcon;


procedure TBChange;

Icon wird registriert und hinzugefügt

procedure TBRemoveIcon;


Properties

property Copyright : string


property Enabled : boolean


property Icon : TIcon


property PopupMenuL : TPopupMenu


property PopupMenuR : TPopupMenu


property PopupOnBoth : boolean


property Tip : string


Events

event OnDblClick : TNotifyEvent


event OnLeftClick : TNotifyEvent


event OnRightClick : TNotifyEvent


Variables

FCopyright : string;


FEnabled : boolean;


FIcon : TIcon;


FOnDblClick : TNotifyEvent;


FOnLeftClick : TNotifyEvent;


FOnRightClick : TNotifyEvent;


FPopupMenuL : TPopupMenu;


FPopupMenuR : TPopupMenu;


FPopupOnBoth : boolean;


FTip : string;


FWnd : HWnd;


TNIMessage : UINT;



Constructors


constructor Create(AnOwner: TComponent);

Icon wird entfernt


Functions


destructor Destroy;


procedure DoOnDblClick;


procedure DoOnLeftClick;

falls Tip während der Laufzeit geändert wird


procedure DoOnRightClick;


procedure Loaded;

Icon für die Taskbar erzeugen


procedure WndProc(var Msg: TMessage);


procedure DoPopup(i: integer);

Fensterprozedur, um die jeweiligen Events auszulösen


procedure SetCopyright(s: string);

Icon in Taskbar hinzufügen


procedure SetEnabled(Value: boolean);


procedure SetIcon(AnIcon: TIcon);

unsichtbares Fenster freigeben


procedure SetTip(s: string);

falls das Icon während der Laufzeit geändert wird


procedure TBAddIcon;


procedure TBChange;

Icon wird registriert und hinzugefügt


procedure TBRemoveIcon;


Properties


property Copyright : string


property Enabled : boolean


property Icon : TIcon


property PopupMenuL : TPopupMenu


property PopupMenuR : TPopupMenu


property PopupOnBoth : boolean


property Tip : string


Events


event OnDblClick : TNotifyEvent


event OnLeftClick : TNotifyEvent


event OnRightClick : TNotifyEvent


Variables


FCopyright : string;


FEnabled : boolean;


FIcon : TIcon;


FOnDblClick : TNotifyEvent;


FOnLeftClick : TNotifyEvent;


FOnRightClick : TNotifyEvent;


FPopupMenuL : TPopupMenu;


FPopupMenuR : TPopupMenu;


FPopupOnBoth : boolean;


FTip : string;


FWnd : HWnd;


TNIMessage : UINT;