1166
社区成员
- 全部
窗体Canvas上作图，在线结
如何在窗体的canvas上放一个BMP图
procedure TForm1.FormPaint(Sender: TObject);
var
bitmap : tbitmap;
begin
bitmap.Canvas.Brush.Bitmap.LoadFromFile('1.bmp');
try
canvas.Draw(0, 0, bitmap);
finally
freeandnil(bitmap);
end;
end;
这样做老是报错
procedure TForm1.FormPaint(Sender: TObject);
var
bitmap : tbitmap;
begin
bitmap.Canvas.Brush.Bitmap.LoadFromFile('1.bmp');
try
canvas.Draw(0, 0, bitmap);
finally
freeandnil(bitmap);
end;
end;
这样做老是报错
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
gemouzhi 2005-03-03
bitmap := TBitmap.Create;
bitmap.LoadFromFile('1.bmp');
混分，呵呵
bitmap.LoadFromFile('1.bmp');
混分，呵呵
