提问“OLE控件为什么没有菜单” ？(100分)

这段代码是将excel嵌入到窗体中，可是我没有看到excel的菜单为什么？
测试时请在窗体中放入OleContainer控件和Button控件。
---------------------------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
var
xlApp, Sheet: Variant;

begin
OleContainer1.CreateObject('Excel.Sheet',true);
OleContainer1.DoVerb(ovSHOW);
xlapp:=OleContainer1.OleObject.Application;
xlapp.CommandBars['Standard'].Visible:= false;
xlapp.CommandBars['Formatting'].Visible:= false;
sheet := xlApp.WorkBooks[1].WorkSheets[1];
Sheet.Cells[1, 1] := '1234';
// OleContainer1.SaveAsDocument('c:/aa.xls');
end;

你必须加一菜单mainmenu才行,这才excel的菜单则与这个菜单融合.

这也只是在应用程序中才会出现，在ACTIVEX控件中不会出现的。