+ -
当前位置:首页 → 问答吧 → 为什么清除不了Form?

为什么清除不了Form?

时间:2011-08-26

来源:互联网

我用下面的过程,

procedure TForm1.Button1Click(Sender: TObject);
begin
  canvas.brush.style:=bssolid;
  canvas.brush.color:=clwhite;
  canvas.rectangle(0,0,width,height);
end;

来清除form1.canvas上画的和写的东西,有时竟清除不了,为什么?

作者: zzwu   发布时间: 2011-08-26

不可能吧,后绘的应该会覆前面的

作者: kaikai_kk   发布时间: 2011-08-26

使用fillrect来清除

作者: sz_haitao   发布时间: 2011-08-26

Delphi(Pascal) code

procedure TForm1.Button1Click(Sender: TObject);
begin
  canvas.brush.style:=bssolid;
  canvas.brush.color:=clwhite;
  canvas.FillRect(Rect(0,0,width,height));
end;


作者: DelphiTeacher   发布时间: 2011-08-26

感觉不可能,重绘后,刷新一下试试

作者: likeyrain   发布时间: 2011-08-26

看什么情况下不能清除,正常应该是可以的!用FillRect处理好点!

作者: xfxlylove   发布时间: 2011-08-26

不要直接画在控件的canvas上,画在一个内存bitmap上,然后把bitmap的canvas绘制到控件上

作者: funxu   发布时间: 2011-08-26

热门下载

更多