Foxtable(狐表)用户栏目专家坐堂 → 求助!筛选窗口中使用目录树时会同时改变表信息


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

主题:求助!筛选窗口中使用目录树时会同时改变表信息

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


加好友 发短信
等级:婴狐 帖子:4 积分:102 威望:0 精华:0 注册:2011/9/14 15:20:00
求助!筛选窗口中使用目录树时会同时改变表信息  发帖心情 Post By:2011/11/7 11:49:00 [只看该作者]

求助!筛选窗口中使用目录树时会同时改变表信息;

 

我做个2个窗口,分别是录入窗口(可以填表和改表)和筛选窗口(不能修改表中信息);

 

筛选窗口:

ComboBox类型 不会改变表的信息;

而DropDownBox类型,并且下拉窗口中嵌入了一个“目录树”,选择树中内容时会同时改变表的内容;

 

以下是DropDownBox的详细属性

类型:DropDownBox

绑定到:    [空]

初始值:    [空]

只读:Default    [若是 Ture,那么在筛选窗口中无法点开下拉框]

下拉窗口:目录树 - 资产分类

允许直接输入:True

-------------------------------

目录树 - 资产分类  详细信息

类型:DropDownForm

名称:TreeView1

 

Afterload

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("固定资产","资产分类|资产名称")

 

 

 

 If e.Node.Level = 1 Then

    Dim ps() As String = e.Node.FullPath.Split("\")
    Dim tr As Row = Tables("固定资产").Current
    Dim dr As DataRow = DataTables("固定资产").Find("资产分类 = '" & ps(0) & "' And 资产名称 = '" & ps(1) & "'")
    If dr IsNot Nothing Then

        tr("资产分类") = dr("资产分类")
        tr("资产名称") = dr("资产名称")
        e.Form.DropDownBox.Value = tr("资产名称") 

    End If
    e.Form.DropDownBox.CloseDropdown()
End If

 

 

 

[此贴子已经被作者于2011-11-7 12:56:05编辑过]

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


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2011/11/7 14:03:00 [只看该作者]

请楼主上传狐表相关文件看看

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


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/11/7 15:15:00 [只看该作者]

是的,最好做个简单的例子上传,并说明问题。


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


加好友 发短信
等级:婴狐 帖子:4 积分:102 威望:0 精华:0 注册:2011/9/14 15:20:00
  发帖心情 Post By:2011/11/29 11:06:00 [只看该作者]

比如第一行的内容是:

 

资产分类 | 资产名称 | 资产编号 | 责任人 | 所属部门

办公用品     签字笔        224         王五        人力

 

 

我把鼠标放在第1行,表的内容如上所示,当打开“筛选窗口”,将资产分类 选择为“电脑设备”时,“办公用品”会变为“电脑设备”;(不影响筛选结果)

 

注:筛选窗口的“资产分类”用的是目录树功能做的,  有这样的问题。

      如果是非目录树的,如“资产编号”,不会修改表的内容;


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


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/11/29 11:24:00 [只看该作者]

做个简单例子传上来,然后说明问题。

 回到顶部