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

Application.CreateForm(Tsetup, setup);

Application.Run;

end;end;

end.

unit Viewing;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Menus, ComCtrls, ShellCtrls, ToolWin, ImgList;

const

WM_MYICONNOTIFY = WM_USER + 123;

type

Tlook = class(TForm)

PageControl1: TPageControl;

TabSheet1: TTabSheet;

TabSheet2: TTabSheet;

TabSheet3: TTabSheet;

TabSheet4: TTabSheet;

TabSheet5: TTabSheet;

ShellListView1: TShellListView;

ShellListView2: TShellListView;

ShellListView3: TShellListView;

ShellListView4: TShellListView;

ShellListView5: TShellListView;

PopupMenu1: TPopupMenu;

N1: TMenuItem;

N2: TMenuItem;

N3: TMenuItem;