Question

Delphi 如何读取listbox中所有的项

如何把listbox中所有的项返回到一个字符串数组中？

Answer 1

所有对应数据库中表名字
SELECT * FROM 数据库名..SysObjects where xtype = 'u'
写个过程调用次sql语句，通过LISTBOX.item.add()循环加载上去就可以了！

Answer 2

for i:=0 to ListBox1.Items.Count-1 do
str[i] := ListBox1.Items[i];