unit EXINSTU; interface uses SysUtils, Classes, Graphics, Forms, Dialogs, StdCtrls, Buttons, Controls; type { TFirstInstFrm } TFirstInstFrm = class(TForm) BitBtn2: TBitBtn; Info: TLabel; private { Private declarations } public { Public declarations } end; var FirstInstFrm: TFirstInstFrm; implementation {$R *.lfm} end.