Foxtable(狐表)用户栏目专家坐堂 → beforeselchange事件好像不发挥作用


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

主题:beforeselchange事件好像不发挥作用

美女呀,离线,留言给我吧!
susu312
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:997 积分:6752 威望:0 精华:0 注册:2018/6/8 16:17:00
beforeselchange事件好像不发挥作用  发帖心情 Post By:2018/9/9 22:43:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

 

那个值一会可以下来出来,一会下来不出来

在筛选表的beforselchange事件中代码如下:

If e.Table.Cols(e.NewRange.ColSel).name = "值" Then
    Dim t As Table = Tables("person")
    Dim r As Row = e.Table.Rows(e.NewRange.Rowsel)
    If r.IsNull("字段") = False AndAlso t.Cols.Contains(r("字段")) Then
        If t.cols(r("字段")).IsDate Then
            If e.Table.grid.cols("值").Editor Is Nothing OrElse typeof e.Table.grid.cols("值").Editor Is windows.forms.DateTimePicker = False Then
                e.Table.grid.cols("值").Editor = new windows.forms.DateTimePicker
            End If
        Else
            e.Table.grid.cols("值").Editor = Nothing
            e.Table.Cols("值").ComboList = t.DataTable.GetComboListString(r("字段"))
        End If
    Else
        e.Table.grid.cols("值").Editor = Nothing
        e.Table.Cols("值").ComboList = Nothing
    End If
End If

 

 

 


 回到顶部
美女呀,离线,留言给我吧!
susu312
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:997 积分:6752 威望:0 精华:0 注册:2018/6/8 16:17:00
  发帖心情 Post By:2018/9/10 10:58:00 [显示全部帖子]

以下是引用有点甜在2018/9/9 22:51:00的发言:

1、不能在prepareEdit事件写代码?

 

2、做个实例发上来测试。

这是之前您和有点蓝老师给我写的,prepareedit事件里面也不行


 回到顶部
美女呀,离线,留言给我吧!
susu312
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:997 积分:6752 威望:0 精华:0 注册:2018/6/8 16:17:00
  发帖心情 Post By:2018/9/10 18:21:00 [显示全部帖子]

以下是引用有点甜在2018/9/10 11:01:00的发言:

 

实例发上来测试。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目23.table

 

例子里面貌似现在是好的,但是在项目中一会好一会不好的?为啥


 回到顶部