L lanpx Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-19 #1 如何取得列表框(可以选多个的)的各个选中的项目,能举个例子吗? 谢了!
P panjf Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-19 #2 var StringList: TStringlist; ..... for i := 0 to Listbox1.Items.Count - 1do if Listbox1.selected then StringList.Add(Listbox1.Items); ......
var StringList: TStringlist; ..... for i := 0 to Listbox1.Items.Count - 1do if Listbox1.selected then StringList.Add(Listbox1.Items); ......
P pcc_mmz1 Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-19 #3 这应该是个简单的问题。 var i :integer; saveStr :string; For i := 0 to Combobox1.Items.Count - 1do begin Combobox1.itemindex :=i; saveStr :=Combobox1.items.string; end;
这应该是个简单的问题。 var i :integer; saveStr :string; For i := 0 to Combobox1.Items.Count - 1do begin Combobox1.itemindex :=i; saveStr :=Combobox1.items.string; end;