delphi5中打开excel文档的问题

ibicf 2004-09-28 03:39:43
情况是这样的,我想通过点击按钮打开opendialog,然后选择excel文件,问题是这样,我现在写了段代码第一次打开excel文档没有问题,但是要使我关掉excel后再打开excel文件,文件就显示不出来了,请各位给点意见
代码
var
sDir: String;
sFileName: String;
begin
sDir := 'c:\';
OpenDialog1.InitialDir := sDir;
if OpenDialog1.Execute then
begin
try
try
sFileName := OpenDialog1.FileName;
//excelapplication是拖放到界面上的
ExcelApp.Workbooks.Open(sFileName,null,null,null,null,null,null,
null,null,null,null,null,null,0);
ExcelApp.Visible[1] := true;
except
end;
finally
end;
end;

end;
...全文
169 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
tjkjdx 2004-12-03
  • 打赏
  • 举报
回复
mark~~~~~
zxggwan1 2004-11-11
  • 打赏
  • 举报
回复
kankan
zzn007 2004-09-28
  • 打赏
  • 举报
回复
在打开之后,马上取消所有与excel的对象,一般在finally之后运行释放语句。这样就能打开另外一个文件了。

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧