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

Информатика. Программирование в Delphi
76
Рис. 4.15 Рис. 4.16
В листинге 4.1 отражены все наши предыдущие действия.
Листинг 4.1
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dia-
logs, StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
Button1: TButton;
Button2: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation