Excel2007错误提示"格式太旧或是类型库无效"(100分)

  • 主题发起人 主题发起人 horaer
  • 开始时间 开始时间
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,请问有没有更高级的类型库文件?
或者如何解决上面的问题,谢谢.
 
类型库
从delphi菜单里import activex。。。
 
类型库哪里有?有的话麻烦发给我一份好吗?谢谢.
horaer@163.com
 
呵呵,工程里边-〉导入类型库(import type library) 选择 Microsoft Excel XX Object Library -> create unit 或者 直接install.
如果提示已经存在,先卸载原库。
建议最好直接用 createoleobject 操作,这样兼容性好些。比如我们这边的机器上 从
office2000~到office2003各个版本都有。
 
sorry
类型库
从delphi菜单里import type library。。。
 
能不能把用createoleobject方法导出Excel的代码或者函数发布一下或者传一份到我的邮箱,谢谢.
horaer@163.com
 
后退
顶部