为Delphi窗体加BMP背景图片

首先在窗体中声明 一个 变量 bmp : TBitmap;

然后在创建窗体的方法写下如下代码 即可。

procedure TForm1.FormCreate(Sender : TObject);

begin

bmp := TBitmap.Create;

bmp.LoadFromFile('H:\a.bmp');

Brush.Bitmap := bmp;

end;