| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1819 人关注过本帖, 1 人收藏
标题:太高兴了,我用VFP做的带spinner控件的可复选列表框
只看楼主 加入收藏
潇洒人间一剑仙
Rank: 2
等 级:论坛游民
威 望:1
帖 子:140
专家分:48
注 册:2008-9-19
结帖率:83.33%
收藏(1)
 问题点数:0 回复次数:3 
太高兴了,我用VFP做的带spinner控件的可复选列表框
按这个思路,可以在列表框里自由添加任何控件.
首先将list的multiselect属性设为.t.
在list的click事件中这样写:
FOR i=1 TO this.ListCount
objname=ALLTRIM(this.List(i))
IF TYPE("thisform.&objname.") = "O"
thisform.removeobject(objname)
endif
IF this.Selected(i)
thisform.AddObject(objname,"spinner")
itemsize=thisform.list1.fontsize+8
WITH thisform.&objname.
.visible=.t.
.top=i*itemsize+thisform.list1.top-17
.width=40
.height=itemsize
.left=thisform.list1.Left+thisform.list1.Width-100
.value=1
ENDwith
ENDIF
NEXT
thisform.refresh
注:本例中list的fontsize是12.
搜索更多相关主题的帖子: 控件 复选 VFP spinner 列表 
2008-10-20 19:02
潇洒人间一剑仙
Rank: 2
等 级:论坛游民
威 望:1
帖 子:140
专家分:48
注 册:2008-9-19
收藏
得分:0 
无码写真图:
图片附件: 游客没有浏览图片的权限,请 登录注册
2008-10-20 19:04
ibmlang_002
Rank: 5Rank: 5
来 自:浙江-嘉兴
等 级:贵宾
威 望:18
帖 子:437
专家分:176
注 册:2008-8-30
收藏
得分:0 
这种方法我在GRID中使用日期控件(DATE AND TIME PICKER)时用过。不过稍许有些不同

VFP
2008-10-21 07:36
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
学习了!

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2008-10-21 11:19
快速回复:太高兴了,我用VFP做的带spinner控件的可复选列表框
数据加载中...
 
   



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

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