我用TOleContainer打开word,那我怎么才让程序能做到以下的几个要求：(10分)

1。给打开的word添加一个工具栏。
2。设置word的其它属性如只读，显示修订信息等。

我也想知道怎么办！！！

'在屏幕上突出显示修订
ActiveDocument.ShowRevisions = True

'进入修订状态。
ActiveDocument.TrackRevisions = True

'退出修订状态，进入正常状态
ActiveDocument.TrackRevisions = False

'保护文档，只能阅看
ActiveDocument.Protect Type:=wdAllowOnlyComments

'虽然能够实现只能修订，可以使用，启动的时候先保存，然后再设置为只能修订状态
Doc.Protect Type:=wdAllowOnlyRevisions

'取消对文档保护
Doc.Unprotect