保存scrollbox控件为一图形文件?(43分)

  • 主题发起人 主题发起人 liao_hc
  • 开始时间 开始时间
L

liao_hc

Unregistered / Unconfirmed
GUEST, unregistred user!
有个问题:
把scrollbox中放置一image控件,在image上放置一些Alabel控件(第三方控件),用于显示旋转的文字。请问:为什么这样的控件放置多了(10个以上)就无法保存,只有底图,或仅有一两个Alabel控件?而放置delphi自带控件却正常? 代码如下:
procedure TForm1.bmp1Click(Sender: TObject);
var
bmp:TBitmap;
begin
bmp := TBitmap.Create;
bmp.LoadFromFile('eeee.bmp');
self.ScrollBox1.AutoSize := true;
self.ScrollBox1.PaintTo(bmp.Canvas.Handle,0,0);
bmp.SaveToFile('dest.bmp');
end;
 
后退
顶部