良人博客站群系统
| 良之雨网络    
博客群
首页 | 用户手册 | 成功案例 | 产品列表 | 站群列表 | 使用说明
良人博客站群系统 >

delphi添加背景图片


阅读:14 评论: 赞:1


var

  Bmp: TBitmap;

 

procedure TForm1.FormCreate(Sender: TObject);

begin

  Bmp := TBitmap.Create;

  Bmp.LoadFromFile('D: est.bmp');

  Brush.Bitmap := Image1.Picture.Bitmap;

end;

 

procedure TForm1.FormDestroy(Sender: TObject);

begin

  Bmp.Free;

end;


评论区


昵称
内容
 
 

推荐内容


- © Copyright 2015 良之雨站群系统. Power by 良之雨网络.