如何把*.BMP图形插入Excel97中(200分)

我想用Delphi(不是VB/VC)把*.BMP图形插入Excel97中
曾用过的方法是把*.BMP考入剪切板，再拷入F1Book6，之后
用F1Book6保存成Excel95格式
弊端是：1.在NT下可行，但在98下当拷入F1Book6时异常
提示剪切板为空；
2.只能保存成Excel95格式，如果保存成Excel97格式
时，用Excel打开文件时，会产生异常
请问这个问题怎么解决？？？

你安装excel时在帮助中选择“visaul basic help”就ok。

下面的程序绝对比你用F1book6好，但机器必须有Excel

unit InsertBMP;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics,
ComObj,//必须有这个
Controls, Forms, Dialogs, StdCtrls;

type
TForm1 = class(TForm)
OpenExcel: TButton;
InsertBMP: TButton;
ExitPro: TButton;
procedure OpenExcelClick(Sender: TObject);
procedure InsertBMPClick(Sender: TObject);
procedure ExitProClick(Sender: TObject);
private
XLApp,WorkBook,WorkSheet:Variant;
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

//打开Excel 按钮事件
procedure TForm1.OpenExcelClick(Sender: TObject);
begin
XLApp:=CreateOleObject('Excel.Application')
//对各版本的Excel都适用
WorkBook:=XLApp.WorkBooks.add;
xlapp.visible:=true;
WorkSheet:=WorkBook.sheets[1];

end;

//插入图片按钮事件
procedure TForm1.InsertBMPClick(Sender: TObject);
begin

//插入一张图片在当前位置
WorkSheet.Pictures.Insert('C:/WINDOWS/安装程序.bmp');

end;

//退出程序事件
procedure TForm1.ExitProClick(Sender: TObject);
begin

xlapp.quit;
close;
end;

end.
(***************)

多谢二位！
尤其实小刚！你的答案我接受