LibreOffice Base Basic 加载时获取表单字段值

Question

这可以在事件中获取字段的值（比如单击按钮）：

Sub runatevent(Event as Object)
    dim form as Object
    dim cntrl
    form = Event.Source.Model.Parent
    cntrl = form.getByName("txtpath").currentvalue
    print(cntrl)
End Sub

但是，当我尝试在表单的“记录更改后”事件上触发此事件时，我收到错误消息：“找不到属性或方法：模型”

如何在“记录更改后”表单事件中获取“txtpath”的值？

Answer 1

为了解决这个问题，我在Event 对象上使用了XrayTool。这是有效的：

form = Event.Source

正如我对your other question 的回答，我建议从结果集中读取值：

nameCol = form.findColumn("PATH")
print(form.getString(nameCol))

这个想法是表单基于结果集，因此您可以只从结果集中读取，而不是从表单中获取控件然后检查控件的值。在我看来只是更优雅一点。