Foxtable(狐表)用户栏目专家坐堂 → [求助]recordgrid控件click事件


  共有4545人关注过本帖树形打印复制链接

主题:[求助]recordgrid控件click事件

帅哥哟,离线,有人找我吗?
cqlwsam
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
[求助]recordgrid控件click事件  发帖心情 Post By:2017/1/8 14:14:00 [显示全部帖子]

如截图,窗口中有两个recordgrid控件,单击其中任一控件中的某行,获取该行第一列的标题(原表中的列标题),然后从“实验室检查维护”表中筛选相同的行,并将其正常值及临床意义赋值给窗口的正常值及临床意义文本框。如何实现?我从三方控件的事件思路不是很清晰,请帮帮忙。谢谢!



图片点击可在新窗口打开查看此主题相关图片如下:360反馈意见截图1773011795138138.png
图片点击可在新窗口打开查看


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:recodrgrid控件click事件.table



 回到顶部
帅哥哟,离线,有人找我吗?
cqlwsam
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2017/1/8 14:44:00 [显示全部帖子]

跪谢!!!那如果窗口中的recordgrid控件是动态添加的,不知道是什么名称?个数也不祥?这个又怎么办?

 回到顶部
帅哥哟,离线,有人找我吗?
cqlwsam
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2017/1/8 19:14:00 [显示全部帖子]

由于原项目中,recordgrid是动态添加的,点击选择不同行,加载不同的recordgrid,个数和名称也不相同。我在窗口的click的全局事件中添加:

If e.Sender.Gettype().Tostring()="RecordGrid"  Then
    Dim g1 As C1.Win.C1FlexGrid.C1FlexGridBase = e.Form.Controls(e.sender.name).baseControl
    AddHandler g1.Click, AddressOf grid_Click
End If

不能实现点击recordgrid中某一行向正常值和临床意义文本框中赋值。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:recodrgrid控件click事件(1).table


 回到顶部
帅哥哟,离线,有人找我吗?
cqlwsam
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2017/1/8 21:14:00 [显示全部帖子]

搞定。代码如下:

If TypeOf e.Sender Is winform.recordgrid Then
    Dim g1 As C1.Win.C1FlexGrid.C1FlexGridBase = e.Form.Controls(e.sender.name).baseControl
    AddHandler g1.Click, AddressOf grid_Click
End If

 回到顶部
帅哥哟,离线,有人找我吗?
cqlwsam
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2017/1/8 23:06:00 [显示全部帖子]

我是针对整个项目写的内部函数。只是其中的部分需要使用正常值和临床意义。这样也能实现。

弱弱地问一个问题:

原窗口添加新窗口后,原来窗口中的控件名称也保持不变吗?



 回到顶部
帅哥哟,离线,有人找我吗?
cqlwsam
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
[求助]recordgrid控件click事件  发帖心情 Post By:2017/1/10 16:44:00 [显示全部帖子]

直接在窗口中添加recordgrid控件,能达到效果。但是如果采用动态添加窗口和控件的方式就不行了。找不到原因。谢谢!


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:recodrgrid控件click事件.table


 回到顶部
帅哥哟,离线,有人找我吗?
cqlwsam
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
[求助]recordgrid控件click事件  发帖心情 Post By:2017/1/10 17:16:00 [显示全部帖子]

谢谢!你真是我的救命恩人呀!

 回到顶部
帅哥哟,离线,有人找我吗?
cqlwsam
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2017/1/19 18:19:00 [显示全部帖子]

如果实现上述功能的同时,在我点击recordgrid控件中某一行的时候,鼠标自动定位在该行的第二列。如何使用
[此贴子已经被作者于2017/1/19 18:19:14编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
cqlwsam
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2017/1/19 18:20:00 [显示全部帖子]

grid.select(r,1)吗?好像不行。

 回到顶部