Question

一个VFP控件问题

一张表单,设一个COMB1控件,一个COMM1,一个LIST1,一个COMM2,一个EDIT(或其他控件)
要求:从COMB1中选择一科,按COMM1,以LIST1中出现一科所有人员资料,这个功能我已经实现,现在,选中LIST1中的一条记录,点击COMM2,将选中的数据添加到EDIT1(或是其他控件,请告知到底该用什么控件)中,请问可否,如何设置.谢谢.

Answer 1

我猜你的COMM1和COMM2是按钮吧。

界面大概像这样：

如果LIST1是多列，可以用.LIST1.LISTITEM()来取得相应行列的数据。

例如：

with thisform

 .edit1.value=.list1.listitem(.list1.listindex,2)  &&其中2是可以替换成你实际要的列，如果要把所有字段都显示，则需要逐个拼串了。

endwith

追问

非常感谢,非常简洁,但是如果将上图中LIST中的内容逐一加入到EDIT中,该如何操作.谢谢.俺是绝对新手,

追答

很简单，你需要拼写要输出到EDIT1里的字符串就可以了。
with thisform
*我的例子中有2列，所以我就把2个值用回车符链接起来，再写到EDIT1的VALUE里。
.edit1.value=.list1.listitem(.list1.listindex,1)+chr(13)+.list1.listitem(.list1.listindex,2)
endwith

Answer 2

comm2.click

edit1.addlistltem(list1.selecteditem)