W wr960204 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #2 var c:TCanvas; begin c:=TControlCanvas.Create; TControlCanvas(c).Control :=Panel1; c.Rectangle(10,10,50,50); c.Free; end;
var c:TCanvas; begin c:=TControlCanvas.Create; TControlCanvas(c).Control :=Panel1; c.Rectangle(10,10,50,50); c.Free; end;
J jsxjd Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #3 还有 brush ，设置brush panel1.brush.color:=clRed; 在最小最大化切换时，会闪一下。 可能之后又用背景重画色重画了。
L lwgygz Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #4 请问jsxjd:在创建的TCanvas上画图形后，如何对其进行刷新呢？我的Panel是在一个ScrollBox中 的，Panel的长、宽均大于ScrollBox的Range，当ScrollBox的滚动条滚动后，又如何对TCanvas 进行刷新呢？(注：我在TCanvas上所画的所有图形的相关信息均保存在一个TList列表中，重 画时可以直接调用)。
请问jsxjd:在创建的TCanvas上画图形后，如何对其进行刷新呢？我的Panel是在一个ScrollBox中 的，Panel的长、宽均大于ScrollBox的Range，当ScrollBox的滚动条滚动后，又如何对TCanvas 进行刷新呢？(注：我在TCanvas上所画的所有图形的相关信息均保存在一个TList列表中，重 画时可以直接调用)。
L lzhuan Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #8 delphi高手特破中有个这样的例子程序。 这本书也不错。
