Class TDemoFrm (unit TestFrm)

Inherits from

TForm

Constructors



Functions

procedure ClickTimeOutTimerTimer(Sender: TObject);


procedure FormShow(Sender: TObject);

next line only needed if SINGLE click is also needed

procedure ImageClick(Sender: TObject);


procedure ItmClick(Sender: TObject);


procedure ShowCBxClick(Sender: TObject);


procedure UpdateHintBtnClick(Sender: TObject);


procedure UseClickCBxClick(Sender: TObject);


procedure WinTaskbarClick(Sender: TObject);

All below here only needed if you want to support SIBGLE click also.

procedure WinTaskbarDblClick(Sender: TObject);


Properties

Events

Variables

ClickTimeOutTimer : TTimer;


HintEdt : TEdit;


IconGBx : TGroupBox;


Image1 : TImage;


Image2 : TImage;


Image3 : TImage;


Image4 : TImage;


Label1 : TLabel;


OneItm : TMenuItem;


PopupMenu : TPopupMenu;


ShowCBx : TCheckBox;


TwoItm : TMenuItem;


UpdateHintBtn : TSpeedButton;


UseClickCBx : TCheckBox;


WinTaskbar : TWinTaskbar;



Constructors


Functions


procedure ClickTimeOutTimerTimer(Sender: TObject);


procedure FormShow(Sender: TObject);

next line only needed if SINGLE click is also needed


procedure ImageClick(Sender: TObject);


procedure ItmClick(Sender: TObject);


procedure ShowCBxClick(Sender: TObject);


procedure UpdateHintBtnClick(Sender: TObject);


procedure UseClickCBxClick(Sender: TObject);


procedure WinTaskbarClick(Sender: TObject);

All below here only needed if you want to support SIBGLE click also.


procedure WinTaskbarDblClick(Sender: TObject);


Properties


Events


Variables


ClickTimeOutTimer : TTimer;


HintEdt : TEdit;


IconGBx : TGroupBox;


Image1 : TImage;


Image2 : TImage;


Image3 : TImage;


Image4 : TImage;


Label1 : TLabel;


OneItm : TMenuItem;


PopupMenu : TPopupMenu;


ShowCBx : TCheckBox;


TwoItm : TMenuItem;


UpdateHintBtn : TSpeedButton;


UseClickCBx : TCheckBox;


WinTaskbar : TWinTaskbar;