H
horaer
Unregistered / Unconfirmed
GUEST, unregistred user!
代码如下:
var
ExlApp : TExcelApplication ;
ExlBook : TExcelWorkBook ;
ExlSheet : TExcelWorkSheet ;
begin
// 创建 Excel 服务器控件
ExlApp := TExcelApplication.Create(nil);
ExlBook := TExcelWorkBook.Create (nil);
ExlSheet := TExcelWorkSheet.Create (nil) ;
try
// 连接 Excel 服务器
try
ExlApp.Connect ;
except
ShowMessage ('连接失败,可能没有安装 Excel') ;
bCheckError := True;
end;
if not bCheckError then
//1
begin
// 从指定的模板文件*.xlt 新建一 Excel 文档
RowNum := 0;
//行数,FCC,2005-8-12
temp1 := ModuleName ;
temp2 := 1 ;
ExlApp.Workbooks.Add( temp1, temp2) ;
//在这一句提示出错.
ExlBook.ConnectTo(ExlApp.Workbooks[1] );
ExlSheet.ConnectTo(ExlBook.Worksheets[1] As _WorkSheet );
。。。。。。
原来Office 2000和Office 2003都没问题,自从装上Office 2007后就出现错误提示,
"格式太旧或是类型库无效"
uses的是Excel2000.pas,请问有没有更高级的类型库文件?
或者如何解决上面的问题,谢谢.
var
ExlApp : TExcelApplication ;
ExlBook : TExcelWorkBook ;
ExlSheet : TExcelWorkSheet ;
begin
// 创建 Excel 服务器控件
ExlApp := TExcelApplication.Create(nil);
ExlBook := TExcelWorkBook.Create (nil);
ExlSheet := TExcelWorkSheet.Create (nil) ;
try
// 连接 Excel 服务器
try
ExlApp.Connect ;
except
ShowMessage ('连接失败,可能没有安装 Excel') ;
bCheckError := True;
end;
if not bCheckError then
//1
begin
// 从指定的模板文件*.xlt 新建一 Excel 文档
RowNum := 0;
//行数,FCC,2005-8-12
temp1 := ModuleName ;
temp2 := 1 ;
ExlApp.Workbooks.Add( temp1, temp2) ;
//在这一句提示出错.
ExlBook.ConnectTo(ExlApp.Workbooks[1] );
ExlSheet.ConnectTo(ExlBook.Worksheets[1] As _WorkSheet );
。。。。。。
原来Office 2000和Office 2003都没问题,自从装上Office 2007后就出现错误提示,
"格式太旧或是类型库无效"
uses的是Excel2000.pas,请问有没有更高级的类型库文件?
或者如何解决上面的问题,谢谢.