Page 23 - 6263
P. 23
ДОДАТОК Б. ПРИКЛАД З ОСНОВНИМИ КОМПОНЕНТАМИ
VCL
unit Unit1; // модуль Unit1
interface // інтерфейсна частина модуля
uses // використовувати модулі
Windows, Messages, SysUtils, Variants, Classes,
Graphics, Controls, Forms,
Dialogs, Menus, StdCtrls, ExtCtrls, Math;
type
// клас TForm1 успадковує TForm і описує вікно програми
TForm1 = class(TForm)
// члени класу (див. вікно Form1 та реалізації методів):
MainMenu1: TMainMenu;
PopupMenu1: TPopupMenu;
Label1: TLabel;
Edit1: TEdit;
Memo1: TMemo;
Button1: TButton;
CheckBox1: TCheckBox;
RadioButton1: TRadioButton;
RadioButton2: TRadioButton;
ListBox1: TListBox;
ScrollBar1: TScrollBar;
File1: TMenuItem;
Edit2: TMenuItem;
About1: TMenuItem;
Open1: TMenuItem;
Save1: TMenuItem;
Exit1: TMenuItem;
23
