起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 145|回复: 4

【结】[请求] 如何将流转框内的组织结构展开?**

[复制链接]
发表于 2008-12-7 10:26:39 | 显示全部楼层 |阅读模式
如下图,默认流转时只显示“组织机构”根目录,用户每次都需要点击多次才能展开组织机构树,请问如何默认展开机构树?

业务模型系统空间\用户界面基础界面库\系统接口选择流程任务执行者对话框,是修改这里的代码吗?

展开组织机构.jpg

62.33 KB, 下载次数: 72

回复

使用道具 举报

发表于 2008-12-8 09:01:55 | 显示全部楼层
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-12-15 17:48:03 | 显示全部楼层
2楼是全部展开,1楼的需求 只要展开到部门,如1楼的图片。

看过一个帖子,http://bbs.justep.com/forum.php?mod=viewthread&tid=11553
修改代码如下:
    for I := trvSource.Items.Count - 1 downto 0 do // 修改这行代码
        begin
          lNode := TTreeNode(trvSource.Items[I]);
          trvSource.Items.Expand(false); // 增加这行代码
          if (lNode.Level = 1) then
            lNodes.Add(lNode);
        end;

        for I := 0 to lNodes.Count - 1 do
        begin
          lNode := TTreeNode(lNodes[I]);
          if not lNode.Expanded then
            lNode.Expand(False);
        end;

但这样改只展开一层(见下图),请问如何展开到机构下的部门?

展开一层机构.jpg

59.35 KB, 下载次数: 60

回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-12-17 14:11:12 | 显示全部楼层
看帖子 http://bbs.justep.com/forum.php?mod=viewthread&tid=10106 9楼,但这个帖子而 lNodes 定义 和原代码中的定义不一致。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-12-18 13:38:07 | 显示全部楼层
结贴吧
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-28 05:36 , Processed in 0.047872 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表