ArenaZ

1
unit about;
2

3
interface
4

5
uses Windows, Classes, Graphics, Forms, Controls,
6
  StdCtrls, Buttons, ExtCtrls;
7

8
type
9
  TAboutBox = class(TForm)
10
    Panel1: TPanel;
11
    OKButton: TButton;
12
    ProgramIcon: TImage;
13
    ProductName: TLabel;
14
    Version: TLabel;
15
    Copyright: TLabel;
16
    Comments: TLabel;
17
  private
18
     
19
  public
20
     
21
  end;
22

23
var
24
  AboutBox: TAboutBox;
25

26
implementation
27

28
{$R *.dfm}
29

30
end.
31
 
32