unit fTobitmapImg; interface uses System.Classes, Vcl.Forms, Vcl.Controls, Vcl.ExtCtrls; type TForm2 = class(TForm) Image1: TImage; private public end; var Form2: TForm2; implementation {$R *.dfm} end.