从粘贴板上获取图片存为JPG文件的求教解决方法

从粘贴板上获取图片存为JPG文件的求教
我在EXCEL里面有好多图片，我想实现
      我在EXCEL里面把图片复制，然后用delphi做的程序复制到IMAGE.PICTURE;然后在保存为JPG文件；
      我试过用
image1.picture.Assign(Clipboard);
image1.Picture.savetofile( 'c:\1.jpg ');
这个都好像没问题；

但如果再用以下语句读取保存好的1.JPG就有问题了，
image1.Picture.LoadFromFile( 'c:\1.jpg ');
不知道是不是从EXCEL文件出来的剪贴板   保存出来的格式都不是jpg   或bmp，大家帮帮忙啊


------解决方案--------------------
不好意思，上面的有错，用下面的试一下吧。

看楼主一直没有解决这个问题，我就现学了一下。发现TBitmap与TJpegImage相互转换很容易的。

implementation
uses clipbrd, Jpeg;
{$R *.dfm}

var
Jpg : TJpegImage;
Bmp : TBitmap;

procedure TForm1.Button1Click(Sender: TObject);
begin
if Bmp <> nil then Bmp:=nil;
Bmp := TBitmap.Create;
Bmp.Assign(Clipboard);
image1.Picture.Bitmap := Bmp;
Bmp.Free;

if jpg <> nil then jpg:=nil;
Jpg := TJpegImage.Create;
Jpg.Assign(image1.Picture.Bitmap);
Jpg.SaveToFile( 'c:\1.jpg ');
Jpg.Free;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
image1.Picture.LoadFromFile( 'c:\1.jpg ');
end;