delphi 窗体添加背景图片

原创
2014/08/11 01:52
阅读数 1.2W
var
  Bmp: TBitmap;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Bmp := TBitmap.Create;
  Bmp.LoadFromFile('D:\test.bmp');
  Brush.Bitmap := Bmp;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  Bmp.Free;
end;
展开阅读全文
加载中
点击引领话题📣 发布并加入讨论🔥
打赏
0 评论
2 收藏
0
分享
返回顶部
顶部