| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2526 人关注过本帖
标题:TREE 目录树最简单的案例疑问
取消只看楼主 加入收藏
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
结帖率:100%
收藏
已结贴  问题点数:18 回复次数:7 
TREE 目录树最简单的案例疑问
图片附件: 游客没有浏览图片的权限,请 登录注册

请各位大佬帮忙看下,如果要显示点击右边目录树的值,比如任何一个人,,右边的文本框就显示相应的数值,右下角的表格也自动定位到那一个人的记录,并用红色背景标注。。研究了一个月搞不懂,,请问这个咋搞?
kh.7z (11.63 KB)
搜索更多相关主题的帖子: 显示 目录树 一个人 TREE 疑问 
2022-03-06 11:09
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 2楼 laowan001
多谢大师指点,我再研究研究
2022-03-06 20:38
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 5楼 easyppt
40岁大叔,学的是情怀,,,以前看别人用VFP写的软件,感觉很牛B,现在有点时间,就兴趣学学.嘿嘿
非常感谢指点!
2022-03-07 17:49
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 4楼 sam_jiang
感谢,后来用6楼的大师代码可以了
2022-03-07 18:06
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 6楼 cjc1010
图片附件: 游客没有浏览图片的权限,请 登录注册
图片附件: 游客没有浏览图片的权限,请 登录注册
图片附件: 游客没有浏览图片的权限,请 登录注册
图片附件: 游客没有浏览图片的权限,请 登录注册

大师好!
按您提供的代码,确实可以显示左右联动,,,不过就是点击左边边的值(人名),右边表不能自动高亮..要点击右边表里面的值,这行才能高亮显示.不知是为啥?
2022-03-07 18:18
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 6楼 cjc1010
*** ActiveX 控件事件 ***
LPARAMETERS node
XM=ALLTRIM(Node.text)
SELECT gzrs
LOCATE FOR ALLTRIM(gzrs.姓名)==ALLTRIM(Node.text)
IF FOUND()
    thisform.text1.Value=gzrs.卡号
    thisform.text2.Value=gzrs.姓名
    thisform.text3.Value=gzrs.部门
    thisform.text4.Value=gzrs.报到日期
    thisform.text5.Value=gzrs.住址
ENDIF



Thisform.grid1.SetAll('DynamicForeColor','IIF(姓名="&XM",RGb(255,0,0),rgb(0,0,0))','column')
Thisform.grid1.SetAll('DynamicbackColor','iif(姓名="&xm",RGb(255,255,0),rgb(255,255,255))','column')
Thisform.Grid1.Refresh

OK 啦,,,可以实现点击左边的树,右边变颜色
2022-03-07 20:10
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 11楼 kangss
主要是姓名再左边的目录树里面,看的比较直白,,,总比卡号好吧,,,不过你说的重复的问题倒是没考虑到
2022-03-08 17:56
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 14楼 kangss
非常感谢!
2022-03-14 21:05
快速回复:TREE 目录树最简单的案例疑问
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.012313 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved