TImage 的一些操作

//给 image上写数字。  

Image1.Picture.Bitmap.Height:= Image1.Height;

  Image1.Picture.Bitmap.Width:= Image1.Width;



  Image1.Picture.Bitmap.Canvas.Font.Size:=10;

  Image1.Picture.Bitmap.Canvas.TextOut(

     80,

     80,

     '1')  ;



  Image2.Picture.Bitmap.Canvas.Font.Size:=10;



  Image2.Picture.Bitmap.Height:= Image2.Height;

  Image2.Picture.Bitmap.Width:= Image2.Width;



  Image2.Picture.Bitmap.Canvas.TextOut(

     80,

     80,

     '2')



//清理掉 image 上的图片

Image1.Picture.assign(nil);