Class TFrmServiceManager (unit MainForm)

Inherits from

TForm

Constructors



Functions

procedure btnCloseClick(Sender: TObject);


procedure BtnDeleteClick(Sender: TObject);


procedure btnNewServiceClick(Sender: TObject);


procedure btnPropertiesClick(Sender: TObject);


procedure btnRefreshClick(Sender: TObject);


procedure btnStartClick(Sender: TObject);


procedure btnStopClick(Sender: TObject);


procedure cbxDevicesClick(Sender: TObject);


procedure cbxReadOnlyClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure lbxServicesClick(Sender: TObject);


procedure lbxServicesDrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);


procedure tmrWaitTimer(Sender: TObject);


procedure SetButtonStates;

Private declarations

procedure Wait;


Properties

Events

Variables

Animate1 : TAnimate;


btnClose : TButton;


BtnDelete : TButton;


btnNewService : TButton;


btnProperties : TButton;


btnRefresh : TButton;


btnStart : TButton;


btnStop : TButton;


cbxDevices : TCheckBox;


cbxReadOnly : TCheckBox;


EdtComputerName : TEdit;


Label1 : TLabel;


lbxServices : TListBox;


NTService : TNTService;


tmrWait : TTimer;


List : TEnumList;

Public declarations


Constructors


Functions


procedure btnCloseClick(Sender: TObject);


procedure BtnDeleteClick(Sender: TObject);


procedure btnNewServiceClick(Sender: TObject);


procedure btnPropertiesClick(Sender: TObject);


procedure btnRefreshClick(Sender: TObject);


procedure btnStartClick(Sender: TObject);


procedure btnStopClick(Sender: TObject);


procedure cbxDevicesClick(Sender: TObject);


procedure cbxReadOnlyClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure lbxServicesClick(Sender: TObject);


procedure lbxServicesDrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);


procedure tmrWaitTimer(Sender: TObject);


procedure SetButtonStates;

Private declarations


procedure Wait;


Properties


Events


Variables


Animate1 : TAnimate;


btnClose : TButton;


BtnDelete : TButton;


btnNewService : TButton;


btnProperties : TButton;


btnRefresh : TButton;


btnStart : TButton;


btnStop : TButton;


cbxDevices : TCheckBox;


cbxReadOnly : TCheckBox;


EdtComputerName : TEdit;


Label1 : TLabel;


lbxServices : TListBox;


NTService : TNTService;


tmrWait : TTimer;


List : TEnumList;

Public declarations