【结】OleContainer 问题**

kd_xjx · 发表于 2008-7-23 16:29:10

我们使用olecontainer 链接一个 Excel文件。然后让用户在系统中操作Excel  。当链接进来后，Excel的工具菜单位置在窗体的最上方。没有在功能区域内。怎么能解决呢？

代码如下
unit MainForm;

interface

uses
  Business.System, Business.Forms;

type
  TMainForm = class(TForm)
OleContainer1: TOleContainer;
procedure BizFormShow(Sender: TObject);
  private
{private declarations}
  public
{public declarations}
  end;

implementation

procedure TMainForm.BizFormShow(Sender: TObject);
begin
  OleContainer1.CreateObjectFromFile('c: est.xls',false);
  OleContainer1.DoVerb(OleCtnrs.ovInPlaceActivate);
end;

end.

gaihl · 发表于 2008-7-23 17:18:43

不好控制olecontainer 菜单的位置，在delphi中也是如引
这取决于delphi控件olecontainer ，可以到网上搜搜，估计没有什么好办法。

kd_xjx · 发表于 2008-7-23 17:34:25

不是呀, 我们在delphi中测试了没有问题呀. 就是单独在 Studio 单独运行一个功能的效果就没有问题了. 到business.exe中运行就有问题了!

gaihl · 发表于 2008-7-23 17:37:04

delphi是不是就一个窗体啊？

kd_xjx · 发表于 2008-7-23 17:43:11

什么意思? 这和窗体数量有什么关系

gaihl · 发表于 2008-7-24 10:30:12

我试了一下，没有出现你的现象

amao800613 · 发表于 2008-7-25 08:35:00

最好是将OleContainer换成用webBrowser控件，这样就解决了上面的问题。

kd_xjx · 发表于 2008-7-25 17:33:21

好的谢谢 !

atiger · 发表于 2008-7-25 17:47:20

ok
结

		自动登录	找回密码
密码			立即注册