Стр. 171 - Информатика. Программирование в среде Delphi. Часть 1

Информатика. Программирование в Delphi
171
Рис. 12.3
Окончательный вариант данного приложения приведен в листинге 12.1.
Комментарии удалены.
Листинг 12.1
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,Dialogs, StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
GroupBox1: TGroupBox;
Label1: TLabel;
Edit1: TEdit;
Label2: TLabel;
Edit2: TEdit;
GroupBox2: TGroupBox;
ListBox1: TListBox;
Label3: TLabel;
ListBox2: TListBox;
Label4: TLabel;
Memo1: TMemo;
Timer1: TTimer;
Label5: TLabel;
Edit3: TEdit;
GroupBox3: TGroupBox;