unit fm_About; interface uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls, Buttons, ExtCtrls; type TfrmAboutBox = class(TForm) Panel1: TPanel; ProgramIcon: TImage; ProductName: TLabel; Version: TLabel; Comments: TLabel; OKButton: TButton; Label1: TLabel; private { Private declarations } public { Public declarations } end; var frmAboutBox: TfrmAboutBox; implementation {$R *.DFM} end.