一个非常简单的问题，大家不要笑我！(20分)

K

kidman520

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-18

• #1

我有一个很简单的问题：有两个listbox控件，我想实现的是：但我点击listbox1中的
一条记录时，点击一个button可以将这条记录添加到listbox2中去。
我知道这个问题很简单，但我是个delphi新手，没有用过这个功能，所以问一下大家，
希望大家不要笑我！
谢谢各位大富翁！！！

 

W

winlmp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-18

• #2

在Button的OnClick中写如下代码：

if ListBox1.itemindex>=0 then//当有一条记录选中时
if ListBox2.items.Indexof(ListBox1.Items[ListBox1.itemindex])<0//说明listbox2中无重复项
ListBox2.items.Add(ListBox1.Items[ListBox1.itemindex]);//添加

 

H

HunterTeam

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-18

• #3

listBox2.Items.Add(listbox1.items[listbox1.itemindex]); //将listbox1当前项添加到listbox2
listbox1.Items.Delete(listbox1.itemindex); //将listbox1当前项删除

 

K

kidman520

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-21

• #4

多人接受答案了。