记录窗口上如何实现与表同步显示锁标记 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 记录窗口上如何实现与表同步显示锁标记

共有1976人关注过本帖树形打印复制链接主题：记录窗口上如何实现与表同步显示锁标记

happyft

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：八尾狐帖子：1916 积分：17116 威望：0 精华：0 注册：2014/7/29 19:09:00

记录窗口上如何实现与表同步显示锁标记 发帖心情

Post By：2019/4/10 15:16:00 [显示全部帖子]

此主题相关图片如下：列表窗口001.jpg

sql窗口表当某列不可编辑时会显示一个小锁，但如果打开绑定的记录窗口时，不可编辑的列处不会显示小锁，很不直观，如何才以实现锁标记同步显示呢？

谢谢！

HappyFt

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：八尾狐帖子：1916 积分：17116 威望：0 精华：0 注册：2014/7/29 19:09:00

Post By：2019/4/10 17:34:00 [显示全部帖子]

这个记录窗口是通用的，只有在项目事件CurrentTableChanged有下面的代码而已

If Forms("记录窗口").Opened Then

Dim rgd As WinForm.RecordGrid = Forms("记录窗口").Controls("RecordGrid1")

rgd.Table = CurrentTable '指定绑定表

rgd.Build()

End If

要在全局表事件drawcell中写代码来控制实际绑定表的列样式？

HappyFt

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：八尾狐帖子：1916 积分：17116 威望：0 精华：0 注册：2014/7/29 19:09:00

Post By：2019/4/10 18:24:00 [显示全部帖子]

可以了，请教一下上面的这句 Dim t as table = rgd.basecontrol 为什么不用 as table? 是不是直接引用底层时后面都不用加变量名，

谢谢

主题：记录窗口上如何实现与表同步显示锁标记