Введение в технологию программирования. Часть 3. Проект OLYMPUS-D. Коржов Е.Н - 44 стр.

UptoLike

Составители: 

44
Edit1: TMenuItem;
View1: TMenuItem;
Run1: TMenuItem;
DB1: TMenuItem;
Window1: TMenuItem;
Help1: TMenuItem;
Help2: TMenuItem;
ControlBar1: TControlBar;
ImageList1: TImageList;
ImageList2: TImageList;
ToolBar1: TToolBar;
ToolButton1: TToolButton;
ToolButton2: TToolButton;
ToolButton3: TToolButton;
ToolBar2: TToolBar;
ToolButton4: TToolButton;
ToolButton6: TToolButton;
ToolButton7: TToolButton;
ToolButton8: TToolButton;
ToolButton9: TToolButton;
Panel1: TPanel;
TreeView1: TTreeView;
Memo1: TMemo;
ToolButton11: TToolButton;
ToolButton5: TToolButton;
ToolButton10: TToolButton;
ToolButton12: TToolButton;
ToolButton13: TToolButton;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Cronus: TCronus;
implementation
{$R *.dfm}
end.
После этого текст модуля дорабатывается вручнуюнапишем ввод-
ный комментарий, подключим модули
CONTROL, PROLOG, OUTPUT.
                       Edit1: TMenuItem;
                       View1: TMenuItem;
                       Run1: TMenuItem;
                       DB1: TMenuItem;
                       Window1: TMenuItem;
                       Help1: TMenuItem;
                       Help2: TMenuItem;
                       ControlBar1: TControlBar;
                       ImageList1: TImageList;
                       ImageList2: TImageList;
                       ToolBar1: TToolBar;
                       ToolButton1: TToolButton;
                       ToolButton2: TToolButton;
                       ToolButton3: TToolButton;
                       ToolBar2: TToolBar;
                       ToolButton4: TToolButton;
                       ToolButton6: TToolButton;
                       ToolButton7: TToolButton;
                       ToolButton8: TToolButton;
                       ToolButton9: TToolButton;
                       Panel1: TPanel;
                       TreeView1: TTreeView;
                       Memo1: TMemo;
                       ToolButton11: TToolButton;
                       ToolButton5: TToolButton;
                       ToolButton10: TToolButton;
                       ToolButton12: TToolButton;
                       ToolButton13: TToolButton;
                       private
                            { Private declarations }
                       public
                            { Public declarations }
                    end;
    var
       Cronus: TCronus;
implementation
       {$R *.dfm}
end.
       После этого текст модуля дорабатывается вручную – напишем ввод-
ный комментарий, подключим модули CONTROL, PROLOG, OUTPUT.

                                      44