如何用DELPHI传给EXCEL固定大小的图像？(200分)

给EXCEL贴固定大小的图片，但在DELPHI中输入的图片大小不固定，怎么可以自动缩放
贴如EXCEL的图片！

我也遇到了这个问题，那位大虾指点指点啊

怎么没人理呀？请继续讨论

这个还不简单啊，只要找找以前人家的答案就搞定啦。
思路是把输入的图片转变大小后重新保存，然后再将这个图片传到Excel

我来抄一个
Var B:Tbitmap; //临时位图
Begin
B:=Tbitmap.Create; //建立临时位图
B.Assign(YourBitmap); //采用相同色彩深度
With B do
Begin
Width:=90; //临时位图的大小为90x90
Height:=90;
End;
B.canvas.StretchDraw(B.canvas.Cliprect,YourBitmap); //缩放适应
B.SavetoFile(YourFileName); //保存
B.Free;
End; //搞定

是啊，这个问题看起来很简单的

多人接受答案了。