uses excel97
Try
ExcelWh1.Disconnect ;
ExcelWb1.Disconnect ;
ExcelApp1.Connect ;
Except
Application.MessageBox('系统中没有安装EXCEL97/2000!','错误',MB_OK);
Exit;
end; ExcelApp1.Visible[0]:=False;
ExcelApp1.Workbooks.Add (Null,0); ExcelWb1.ConnectTo (ExcelApp1.Workbooks[1]); ExcelWh1.ConnectTo (ExcelWb1.Sheets[1] as _worksheet);//delphi6编译出错程序在2000专业版下正常,2000高级服务器下提示没有安装EXCEL
求救
Try
ExcelWh1.Disconnect ;
ExcelWb1.Disconnect ;
ExcelApp1.Connect ;
Except
Application.MessageBox('系统中没有安装EXCEL97/2000!','错误',MB_OK);
Exit;
end; ExcelApp1.Visible[0]:=False;
ExcelApp1.Workbooks.Add (Null,0); ExcelWb1.ConnectTo (ExcelApp1.Workbooks[1]); ExcelWh1.ConnectTo (ExcelWb1.Sheets[1] as _worksheet);//delphi6编译出错程序在2000专业版下正常,2000高级服务器下提示没有安装EXCEL
求救
解决方案 »
- delphi绝对路经改相对路经问题
- [散分]偶用delphi isapi技术做的论坛
- delphi2005如何创建服务
- 在UNIX下SQL 语句有一种用法直接将数据库的值给变量,delphi有没有这种用法? 我很茫然!!!
- 急问SQL语句,在线等待.........
- 打包问题 帮帮忙。。。。。解决就给分 在线。。。InstallShield Express5
- 如何读取数据库的字段名???急,在线等待
- 请问delphi下使用什么样的语言控件包比较好?
- 问用DELPHI怎么做文字从下向上平滑滚动,有控件也可以?
- 一个SQL动态参数问题。请教各位。
- XP下的乱码,怪
- 如何把一个字符串转化成指定字符集的另外一个字符串?
ExcelApp,MyWorkBook: OLEVariant;
begintry
ExcelApp:=CreateOleObject('Excel.Application');
MyWorkBook:=CreateOleobject('Excel.Sheet');
except
application.Messagebox('无法打开Xls文件,请确认已 经安装EXCEL.','',
mb_OK+mb_IconStop);
Exit;
end;
你在装D6的时候有选择
可是编译出错另一个问题,程序在2000服务器上不能连接EXCEL时提示错误是接口不支持
在D6下可运行createoleobject这样的函数, 在D7就出问题!
DELPHI6怎么有很多文件要手工引用,DELPHI5反而不用,奇怪