Class TExpertDesktop (unit XDesk)

Inherits from

TForm

Constructors



Functions

procedure eXpertDesktopAddInMenuItemClick(Sender: TObject);

==============================================================

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

if Stayontop1.

procedure Stayontop1Click(Sender: TObject);

==============================================================

Properties

Events

Variables

eXpertDesktopAddInMenu : TxdkAddInMenu;


eXpertDesktopAddInMenuItem : TxdkAddInMenuItem;


Pages : TPageControl;



Constructors


Functions


procedure eXpertDesktopAddInMenuItemClick(Sender: TObject);

==============================================================


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

if Stayontop1.Checked then ExpertDesktop.FormStyle:=fsNormal else ExpertDesktop.FormStyle:=fsStayOnTop; Stayontop1.Checked:=not Stayontop1.Checked;


procedure Stayontop1Click(Sender: TObject);

==============================================================


Properties


Events


Variables


eXpertDesktopAddInMenu : TxdkAddInMenu;


eXpertDesktopAddInMenuItem : TxdkAddInMenuItem;


Pages : TPageControl;