生成的word文档显示后 菜单等不能用(100分)

调用word生成表，myword : TWordApplication;

先 myword := WordApplication1.Create(nil);
myword.Visible := false;
生成后 myword.Visible:=true;
myword.Activate;
----》将生成的文档在最前面显示
问题是 当执行程序前如果有word文档已经打开 则我生成的文档显示后 菜单等不能用，切换一下后才能用,不知道怎么解决，谁遇到过，怎么解决？请帮忙,谢谢！

application.postmessages;
就可以了。

不管对不对 分给你了 没机会上网了

接受答案了.