当前位置: 代码迷 >> VFP >> 怎的使用列表匡
  详细解决方案

怎的使用列表匡

热度:8920   发布时间:2013-02-26 00:00:00.0
怎样使用列表匡
我想用两个列表匡,就是在LIST1双击某个记录后这个记录在LIST1中消失而选进到LIST2表中.有哪位高手指教一下哦.

------解决方案--------------------------------------------------------
两个List控件的数据选取

*-----------------------

示例:

设表单上有List1和List2


List1的Init事件:

This.RowSourceType=1
This.RowSource="A,B,C,D,E,F,G,H,I,J"
This.DisabledItemBackColor=Rgb(255,200,200)
*This.DisabledItemForeColor=Rgb(0,0,0)


List1的DblClick事件:

Thisform.list2.AddListItem(This.ListItem(This.ListItemId),Thisform.list2.ListCount+1,1)
Thisform.list2.AddListItem(Transform(This.ListItemId),Thisform.list2.ListCount,2)
This.ListItem(This.ListItemId)="\"+This.ListItem(This.ListItemId)


List2的DblClick事件:

Thisform.list1.ListItem(Val(This.ListItem(This.ListItemId,2)))=This.ListItem(This.ListItemId)
This.RemoveListItem(This.ListItemId)
  相关解决方案