Class TTrayIconForm (unit trayicfm)

Inherits from

TForm

Constructors



Functions

procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure SetupTrayIcon(vID: Integer; vTrayIcon: hIcon; const vTip : String);


procedure DefaultHandler(var Message);


procedure SetTip(const value: String);


procedure SetTrayIcon(value: hIcon);


function ShellNotify(Msg, Flags: Integer): Boolean;


Properties

property Tip : String


property TrayIcon : hIcon

Public declarations

Events

Variables

fID : Integer;


fReady : Boolean;


fTip : String;


fTrayIcon : hIcon;

Private declarations


Constructors


Functions


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure SetupTrayIcon(vID: Integer; vTrayIcon: hIcon; const vTip : String);


procedure DefaultHandler(var Message);


procedure SetTip(const value: String);


procedure SetTrayIcon(value: hIcon);


function ShellNotify(Msg, Flags: Integer): Boolean;


Properties


property Tip : String


property TrayIcon : hIcon

Public declarations


Events


Variables


fID : Integer;


fReady : Boolean;


fTip : String;


fTrayIcon : hIcon;

Private declarations