| Class TTaskIcon (unit TaskIcon) |
TCustomControl
Change this if used by something else!
| Constructors |
constructor create(aOwner : TComponent);| Functions |
destructor destroy;
procedure OnSizeChanged(var Message : TWMSize);
procedure Paint;
function ChangeIcon(Sender : TObject) : boolean;
function KillIcon(sender : TObject) : boolean;
function MakeIcon(sender : TObject) : boolean;
procedure SetActive(Value : boolean);
procedure SetIcon(Value : TIcon);
procedure SetTaskIconID(Value : UINT);
procedure WMTASKICON(var msg : TMessage);| Properties |
property Enabled : boolean
property Icon : TIcon
property TaskIconID : UINT| Events |
event OnClick : TNotifyEvent
event OnDblClick : TNotifyEvent
event OnRightClick : TMouseEvent| Variables |
fActive : boolean;
fIcon : TIcon;
fOnClick : TNotifyEvent;
fOnDblClick : TNotifyEvent;
fOnRightClick : TMouseEvent;
FPicture : TBitmap;
fTaskIconID : UINT;
fVisible : boolean;
tnid : TNOTIFYICONDATA;| Constructors |
constructor create(aOwner : TComponent);| Functions |
destructor destroy;The control should be visible at design time only
procedure OnSizeChanged(var Message : TWMSize);This procedure is called at design time if the designer is trying to resize the control on the form. It will force the control to be the size of the bitmap
procedure Paint;Show the bitmap at design time
function ChangeIcon(Sender : TObject) : boolean;
function KillIcon(sender : TObject) : boolean;
function MakeIcon(sender : TObject) : boolean;
procedure SetActive(Value : boolean);
procedure SetIcon(Value : TIcon);
procedure SetTaskIconID(Value : UINT);
procedure WMTASKICON(var msg : TMessage);| Properties |
property Enabled : boolean
property Icon : TIcon
property TaskIconID : UINT| Events |
event OnClick : TNotifyEvent
event OnDblClick : TNotifyEvent
event OnRightClick : TMouseEvent| Variables |
fActive : boolean;
fIcon : TIcon;
fOnClick : TNotifyEvent;
fOnDblClick : TNotifyEvent;
fOnRightClick : TMouseEvent;
FPicture : TBitmap;Field variables
fTaskIconID : UINT;
fVisible : boolean;
tnid : TNOTIFYICONDATA;