各位高手，请帮我改一段代码

[wudang]

本人初次接触OLE编程，希望能够在OleContainer上显示Word文档，能够浏览全部，但不出现Word 的编辑按钮等冬冬。以下这段代码实现不了。
请各位高手帮忙，不胜感激。

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Variant V,VC,VI;
AnsiString name;

V = CreateOleObject("Word.Application");
VC = V.OlePropertyGet("CommandBars");
for(int i=1;i<128;i++)
{
VI = VC.OlePropertyGet("Item",i);
name = AnsiString(VI.OlePropertyGet("name"));
if(name!="Menu Bar")
VI.OlePropertySet("Visible",false);
}
Form2->OleContainer1->CreateObjectFromFile("E:\\temp.doc",false);
Form2->OleContainer1->DoVerb(ovShow);
Form2->ShowModal();
}

[xuby5228]

帮你顶！]
关注中！！

[我不懂电脑]

建议你用WordApplication

[jack2002]

建议你用WordApplication


休息、休息、休息一会儿。。。

[wudang]

songhtao：
终于看到你答复我的帖子了。
以前数据库做的比较多，To Office控制还是第一次。
我要在Form的一部分显示Word文档，只要能够全部显示出来，界面不乱就行。WordApplication我还用不好，而且其打开的文档用什么显示？有图形和表格的。有代码吗?