TImage 的一些 *** 作

TImage 的一些 *** 作

//给 image上写数字。



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

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

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

  Image1.Picture.Bitmap.Canvas.TextOut(

     ,

     ,

     '')  ;

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

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

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

  Image2.Picture.Bitmap.Canvas.TextOut(

     ,

     ,

     '')

//清理掉 image 上的图片

Image1.Picture.assign(nil);