🚀 go-pugleaf

> ==> Confidence_Sun(���)                     ˵��: 
> ����������£� 
>                            Var 
>                                 Bitmap:TBitmap; 
>                            Form.Create;  
>                            begin   
>                                  Bitmap:=TBitmap.Create;  
>                                  with Bitmap.Canvas do  
>                                  begin  
>                                          Brush.Color:=clBlue;  
>                                          Ellipse(0,0,100,100);  
>                                  end;   
>                            end;  
>   
>                            Form.Repaint;  
>                            begin  
>                                   Canvas.CopyMode:=cmsrcCopy;  
>                                   Canvas.Draw(0,0,Bitmap);  
>                            end; 

TBitmap���󴴽�����width=0,height=0
��ˣ���Ҫ���丳һ��ֵ���磺
  Bitmap.width := 100;
  Bitmap.Hieght := 100;
����λͼ�Ϳɼ��ˡ�
 

--
�� ��Դ: �й�ƴ�BBSվ [bbs.ustc.edu.cn]