【delphi源代码】在delphi窗口中平铺图片背景
在delphi应用中我们经常需要在窗体中平铺图片,已获得更好的视觉效果。这个事件很好的实现了这个要求。
procedure TForm1.FormCreate(Sender: TObject);
begin
Bitmap:=TBitmap.Create;
Bitmap.LoadFromFile('ATHENA.BMP');
Self.Brush.Bitmap:=Bitmap;
end;
未经允许不得转载:亿券答案网 » 【delphi源代码】在delphi窗口中平铺图片背景