以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]求助！如何实现每行列表项目不一样  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=146954)
--  作者：suliao9641
--  发布时间：2020/3/6 16:16:00
--  [求助]求助！如何实现每行列表项目不一样
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.table

实现每行列表项目不一样
--  作者：有点蓝
--  发布时间：2020/3/6 20:11:00
--  
产品表PrepareEdit事件

If e.IsFocusCell Then
    If e.Col.Name Like "*_部件名称" Then
        If e.Row.IsNull("产品类型") Then
            e.Col.Combolist = Nothing
        Else
            e.Col.Combolist = DataTables("字典").GetComboListString(e.Row("产品类型") & "_部件名称", e.Row("产品类型") & "_部件名称 is not null")
        End If
    ElseIf e.Col.Name Like "*_辅件名称" Then
        If e.Row.IsNull("产品类型") Then
            e.Col.Combolist = Nothing
        Else
            e.Col.Combolist = DataTables("字典").GetComboListString(e.Row("产品类型") & "_辅件名称", e.Row("产品类型") & "_辅件名称 is not null")
        End If
    End If
End If