清空画布的内容

清空画布的内容 dengdaijiejue（） Delphi GAME，图形处理/多媒体 - delphi2007.net
http://www.delphi2007.net/DelphiMultimedia/html/delphi_20060810153052466.html

Image1.Canvas.TextOut(0,   0,     'aaaaa');  
  以后，如何把画布内容清空

 

Image1.Canvas.TextOut(0,   0,     'aaaaa');  
   
  清空:  
      Image1.Canvas.Font.Color   :=   Image1.Canvas.Brush.Color;  
      Image1.Canvas.TextOut(0,0,'aaaaa');

 

用透明色擦掉原来的（设计时Image的brush的颜色即透明色）即可    
    with   Image1   do  
          begin  
              Canvas.Brush.Color   :=   TransColor;  
              Canvas.FillRect(   Rect(   0,   0,   Width,   Height   )   );   //用透明色擦掉原来的  
              ...  
        end;

 

画布内容全清  
  必须Image1.Canvas.Brush.Style   :=   bsSolid;  
   
  var  
      RC:   TRect;  
  begin  
      GetClipBox(Image1.Canvas.Handle,   RC);  
      InvalidateRect(Image1.Canvas.Handle,   @RC,   True);  
      Image1.Canvas.FillRect(RC);  
   
  如果只请局部  
  RC的Top、Left、Bottom、Right就要赋值，并且不要   GetClipBox(Image1.Canvas.Handle,   RC);   这句

 

画布内容全清  
  必须Image1.Canvas.Brush.Style   :=   bsSolid;  
   
  var  
      RC:   TRect;  
  begin  
      GetClipBox(Image1.Canvas.Handle,   RC);  
      InvalidateRect(Image1.Canvas.Handle,   @RC,   True);  
      Image1.Canvas.FillRect(RC);  
   
  如果只请局部  
  RC的Top、Left、Bottom、Right就要赋值，并且不要   GetClipBox(Image1.Canvas.Handle,   RC);   这句  
   
  不错，高手。

问了两次都没有结果，再次增加到600分。关于jpg文件上加文字

在线等 急

如何在image控件中画透明位图？在线等，解决即给分！

png格式的图片怎样用到自己的程序里？

刷新image的问题。如何删除画上去的东西。

急急急：左声道声音音量的问题

realaudio控件

请问关于图像定位、匹配的问题，请各位高手进来看一下。

如何使用TGifImage保存GIF图象？

关于动态报表创建的一个问题,比较棘手,如果是你,你怎么解决呢???