主题：[求助]怎样遍历窗口中的RecordGrid

还是有问题，请版主帮忙看看实例，右边窗口与左边的记录窗口单元格同步；页签1和页签2都绑定 表A, 绑定时存在部分相同的字段。

此主题相关图片如下：image 1.png

附件1：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:记录窗口.table

谢谢版主！

右侧的录入窗口，光标始终移动到字符尾部，不能在中间编辑了。

另外，如果再增加一个窗口，绑定表B，自定义函数mytxt_TextChanged、mytxt_MouseDown怎么改？

附件：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:记录窗口 (1).table

谢谢版主！

这个函数mytxt_MouseDown怎么改？

Dim sender = args(0)
Dim e = args(1)

If e.Button = MouseButtons.Right Then '假定按下的是鼠标右键
    ContextMenus("快捷菜单1").Show(forms("窗口1").controls("panel1"),e.x,e.y) '则在鼠标位置显示快捷菜单
End If

If e.Button = MouseButtons.Right Then '假定按下的是鼠标右键
    ContextMenus("快捷菜单1").Show(forms("窗口2").controls("panel1"),e.x,e.y) '则在鼠标位置显示快捷菜单
End If

非常感谢蓝版主！

参照改的，能用，不知道对不对？

Dim f As WinForm.Form = Forms.ActiveForm
If f IsNot Nothing Then
    If e.Button = MouseButtons.Right Then '假定按下的是鼠标右键
        ContextMenus("快捷菜单1").Show(f.controls("panel1"),e.x,e.y) '则在鼠标位置显示快捷菜单
    End If
End If