将文档(表单)- EditMode设置为false

Question

我希望将表单(文档)设置为EditMode = false；因此，当表单打开时，我希望在按下放置文档的按钮之前不能修改任何字段等。in EditMode = true。

我的代码是这样的：

Sub将尺寸ws初始化为新的NotesUIWorkspace尺寸uidoc为NotesUIDocument尺寸文档为NotesDocument设置uidoc = ws.CurrentDocument‘设置文档= uidoc.Document

uidoc.EditMode = False

结束子对象

我选择在表单的Initialize方法中编码...

但是它不起作用，它给我一条类似于：“文档命令不可用”的消息。请帮忙，我会很感激的，谢谢。

Answer 1

一般来说，不应在表单中使用Initialize事件。其中一个原因是，在Initialize运行时，表单不一定已经加载完所有内容。

这段代码应该放在QueryOpen事件中。

另一种最佳实践是不使用NotesWorkspace.CurrentDocument来获取当前窗体的句柄，而是使用传递到QueryOpen事件中的Source参数。NotesWorkspace.CurrentDocument只能在代理和表单尚未处于上下文中的其他位置使用。当当前文档已经在上下文中时调用NotesWorkspace.CurrentDocument可能会导致Notes中出现奇怪的行为。

下面是一些应该可以工作的代码：

Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
    If (Not Source Is Nothing) Then Source.EditMode = False
End Sub