Курсовая работа: Основные принципы разработки графического пользовательского интерфейса

MainMenu1: TMainMenu;

Services1: TMenuItem;

oreinstall1: TMenuItem;

Edit1: TMenuItem;

Exit1: TMenuItem;

ToolBar1: TToolBar;

ImageList1: TImageList;

ToolButton1: TToolButton;

ToolButton2: TToolButton;

ToolButton3: TToolButton;

ToolButton4: TToolButton;

ToolButton5: TToolButton;

procedure FormCreate(Sender: TObject);

procedure FormDestroy(Sender: TObject);

procedure N1Click(Sender: TObject);

procedure N2Click(Sender: TObject);

procedure N4Click(Sender: TObject);

procedure FormActivate(Sender: TObject);

procedure oreinstall1Click(Sender: TObject);

procedure Exit1Click(Sender: TObject);

procedure Edit1Click(Sender: TObject);

private

ShownOnce: Boolean;

public

procedure WMICON(var msg: TMessage); message WM_MYICONNOTIFY;

procedure WMSYSCOMMAND(var msg: TMessage);message WM_SYSCOMMAND;

procedure CreateTrayIcon(n:Integer);

procedure DeleteTrayIcon(n:Integer);

procedure RestoreMainForm;