Image控件上只能放bmp,对于bmp是可以画的。你可先把jpg转成bmp,然后画完后,在bmp转成jpg

解决方案 »

  1.   

    bmp--->jpg
    代码如下,记得加入 use jpeg.
    var
      MyJpeg: TJpegImage;
      Image1: TImage;
    begin
      Image1:= TImage.Create(self);
      MyJpeg:= TJpegImage.Create;
      Image1.Picture.Bitmap.LoadFromFile('c:\windows\desktop\aa.BMP');  // Load the Bitmap from a file
      MyJpeg.Assign(Image1.Picture.Bitmap);  // Assign the BitMap to MyJpeg object
      MyJpeg.CompressionQuality:=StrToInt('75');
      MyJpeg.Compress;
      MyJpeg.SaveToFile('c:\windows\desktop\test.JPG'); // Save the JPEG to Disk
    end; jpg--->bmp
    JpegImage:TJPEGImage;
    BitmapImage:TBitmap;
    JpegImage:=TJPGEImage.Create();
    Bitmap:=TBitmap.Create();
    JpegImage.LoadFromFile('D:\test.jpeg');
    Bitmap.Assign(JpegImage);
    Bitmap.SaveToFile('D:\test.bmp');
    JpegImage.Free;
    JpegImage:=nil;
    BitmapImage.Free;
    BitmapImage:=nil;