跟贴有分,delphi中调用ole，如打开work,excel文件，如何在Tolecontainer中显示出来？急，

blueprogramer 2003-12-07 10:51:23

比如在delphi界面窗体界面中打开excel文件，如何在Tolecontainer中显示出来，而不把excel应用程序打开，并且在delphi界面中把olecontainer装载excel文件后在界面中增加的excel程序的菜单搞掉，还有在delphi界面中要能够通过滚动条来翻页
先谢过了，急

...全文

218 34 打赏收藏转发到动态举报

写回复

用AI写文章

34 条回复

切换为时间正序

请发表友善的回复…

发表回复

gsoft 2003-12-15

打赏
举报

我也没有找着哪里有下载呀，有人说这里http://pb7.nethome.com.cn/download.htm
但我去了也下不了，
我现在是用delphi7自己带的才3.01版本的

mbzdh 2003-12-15

打赏
举报

楼主能给说一下马，
那有下的

mbzdh 2003-12-15

打赏
举报

flbook是什么控件，没用过，

blueprogramer 2003-12-15

打赏
举报

不会吧，我现在文件还不知道哪种格式的呢，可能有的是95,97,2000,也可能是xp的，因为客户有文件说不定是用哪个excel版本做的，我现在要在程序里把客户的文件打开，放在f1book中，现在还不知道f1book有没有能力在打开excel文件前取得此文件的版本格式呢，

真是急死了

flyforlove 2003-12-15

打赏
举报

安装delphi的时候他会问你要支持office97,2000,还是xp的。

blueprogramer 2003-12-15

打赏
举报

查到问题了，我的excel格式是xp的，所以读不了

blueprogramer 2003-12-15

打赏
举报

word 我是用ole调的，可以了，但是excel调用时不行

blueprogramer 2003-12-15

打赏
举报

谢谢大家，看来还有人遇到这个问题哟，不只我自己呀

我从别的贴子看到这样代码

读入
f1book1.read(ExtractFileDir(paramstr(0))+'\f1book1.xls',F1FileExcel5);

但是提示说不能找开文件，，
不知道为什么，

gsoft 2003-12-15

打赏
举报

上面的没有写全就发了，不好意思，
procedure TForm1.Button8Click(Sender: TObject);
var
filetype: smallint;
begin

f1book1.Read('C:\sunbrige\demo\6.xls', filetype);
end;
这段代码不正确吗，运行时出现错误框：
project1.exe raised exception class EOleException with message 'Unable to open file'.Process stopped. Use step or Run to continue.

gsoft 2003-12-15