OleContainer载入word/Excel 如何隐藏菜单

[顺手牵牛]

环境：C++ builder 6.0
使用之前帖子中妖哥的代码：
OleContainer1->DestroyObject();
OleContainer1->CreateObject("Word.Document", false);
OleContainer1->DoVerb(ovInPlaceActivate);
Variant vObj = OleContainer1->OleObject;
int nCmdBarCount = vObj.OlePropertyGet("CommandBars").OlePropertyGet("Count");
for (int i =0; i < nCmdBarCount; i++) {
vObj.OlePropertyGet("CommandBars", i + 1).OlePropertySet("Enabled", false);
}

看之前帖子中的小伙伴已经解决了，但是我的这个word中菜单并没有隐藏 。 03 、07的word 都试过 大神求助 ！

[顺手牵牛]

@妖哥 妖哥 求助啊

[顺手牵牛]

顶一下 真可怜 没人理

[ooolinux]

CB区难以解决的问题，可以到隔壁Delphi区也问问，还可以到英巴官网论坛（英文）问问。

[ooolinux]

ccrun.com 官方技术群 2602062 妖哥在这里，你可以问问看。

[kangyaohui]

//消除工具条方法1。 if (tcFileArm->State == osUIActive) { IOleInPlaceObject *ioip; if (SUCCEEDED(tcFileArm->OleObjectInterface->QueryInterface( IID_IOleInPlaceObject, (void **)&ioip))) { ioip->UIDeactivate(); ioip->Release(); } } 这段可以用，word和excel都可以，最近也在做这个，也是借用的论坛的作品，你试试吧。

[ccrun.com]

引用 5 楼 kangyaohui 的回复:

//消除工具条方法1。 if (tcFileArm->State == osUIActive) { IOleInPlaceObject *ioip; if (SUCCEEDED(tcFileArm->OleObjectInterface->QueryInterface( IID_IOleInPlaceObject, (void **)&ioip))) { ioip->UIDeactivate(); ioip->Release(); } } 这段可以用，word和excel都可以，最近也在做这个，也是借用的论坛的作品，你试试吧。

确实有效。

[顺手牵牛]

引用 5 楼 kangyaohui 的回复:

//消除工具条方法1。 if (tcFileArm->State == osUIActive) { IOleInPlaceObject *ioip; if (SUCCEEDED(tcFileArm->OleObjectInterface->QueryInterface( IID_IOleInPlaceObject, (void **)&ioip))) { ioip->UIDeactivate(); ioip->Release(); } } 这段可以用，word和excel都可以，最近也在做这个，也是借用的论坛的作品，你试试吧。

十分感谢