即答即得之：有谁知道如何把query中的字段的DisplayName灌到checklistbox中去？我试了试，不能换行，是什么原因？

Question

是我的原因还是csdn的原因，今天总非常慢。而上其它网站又不慢的，进论坛很不容易。请大家帮帮忙，应该不难的吧。

Answer 1

For i:=0 to Query1.Fields.Count-1 do
Str:=Str+Query1.Fields.Fields[i].DisplayName+chr(13);
checkListBox1.items.add(str);
a1:
for i:=0 to Query1.Fields.Count-1 do
  checkListBox1.items.add(Query1.Fields.Fields[i].DisplayName);
a2:
  For i:=0 to Query1.Fields.Count-1 do
    Str:=Str+Query1.Fields.Fields[i].DisplayName++#13+#10；
  ceckListBox1.items.setext(pchar(str));

Answer 2

a1可行，a2照旧。原来只要这样就行了，我还以为要手动换行哩，原来listbox自己会换的。