OLEContainer控件中显示WORD文档,但却只能显示第一页的内容,怎么解决?
我想在程序中打开一上WORD文档,但这个文档是要和程序一体的,用OLEContainer可以实现,但运行的时候始终只能显示文档的第一页,后面的都没有了.请如何处理呢?网上有很多这个问题,但都没有见到有回答的.我的代码如下:
procedure TForm1.Button1Click(Sender: TObject);
var
fnm: String;
begin
if OpenDialog1.Execute then begin
fnm := OpenDialog1.FileName;
Label2.Caption := fnm;
OleContainer1.CreateObjectFromFile(fnm, False);
OleContainer1.Run;
end;
end;
如果有其他更好的办法显示WORD也可以的,请高手支招.我只需要显示,但显示的文档只能看不能修改也不能保存,谢谢了
[解决办法]
加上OleContainer1.DoVerb(ovShow);
[解决办法]
word vba帮助,那里有很多函数和方法,基本上都能通过delphi以com接口的方式也就是OLE的方式调用，慢慢试慢慢研究看看。
[解决办法]
别有OLEContainer了, 直接上网下载微软公布的那个ActiveX控件来放到Delphi里面好了
