如何得到DBListBox中选择项的内容？

[nuinui]

如何得到DBListBox中选择项的内容？
在VB中用:
Text1.text=ListBox1.Text
可Delphi中却没有Text。

[Limu]

Because you can select multiple items in a DBListBox,so you must use the Items property to access the values of a DBListBox.
Like this: DBListBox.Items(DBListBox.ItemIndex) is current selected item.
another like this:
for i:=0 to DBListBox.Items.Count-1 do
if DBListBox.Selected[i] then //if you selected i items,the condition value is True.
......

[joyuce]

可以用Items属性：
eg: Lable1.Caption:=DBListBox1.Items[0];

[joyuce]

DBListBox1.Items[DBListBox1.ItemIndex]

[ling]

Text1.Text := DBListBox1.Items[DBListBox1.ItemIndex](前提:DBListBox1中有选中值, 否则ItemIndex=-1)

or

Text1.Text := DBListBox1.Field.AsString(假如对应的字段为字符型)

[meijg]

先确定ItemIndex不为-1，取得ItemIndex
然后 DBListBox1.Items[ItemIndex]即为其内容

[Hibin]

Limu所述是Delphi推荐的标准用法，nuinui可认真看一下。

[Hank]

Edit1.Text:=DBListBox1.Items.Strings[0];
想取那一个就是那一个！例如：
Edit1.Text:=DBListBox1.Items.Strings[SpinEdit1.Value];