ВУЗ:
Составители:
Рубрика:
объявления класса формы. Эта область зарезервирована для автоматического
генератора кода Delphi. Для дополнения или удаления
Рис. 1. Основная форма программы Customer List.
Листинг 2. Класс TCustList, сгенерированный Delphi.
___________________________________________________________________________
1: unit Custlst;
2:
3: interface
4:
5: uses
6: SysUtils, Windows, Variants, Messages, Classes, Graphics, Controls,
7: Forms, Dialogs, StdCtrls, Buttons;
8:
9: type
10: TCustList = class(TForm)
11: ListBox1: TListBox;
12: BitBtn1: TBitBtn;
13: ButtonAdd: TButton;
14: ButtonDelete: TButton;
15: ButtonChange: TButton;
16: Edit1: TEdit;
17: private
18: { Private declarations }
19: public
20: { Public declarations }
21 end;
22:
23: var
24: CustList: TCustList;
25:
26: implementation
27:
28: {$R *.DFM}
29:
