请高手帮忙，急

Question

我想从数据库中提出数据并把他导入一个二维数组中，然后从二维数组中把一些数据导入到form上的label的caption      for i:=0 to controlcount-1 do
        begin
          if components[i] is tlabel then
            begin
              if ((components[i] as tlabel).Caption<>'输入：') or ((components[i] as tlabel).Caption<>'收款机号：') then
              begin
              j:=strtoint(funvalue[i,4]);
              (components[i] as tlabel).Caption:='－'+listbox1.Items.Strings[j];
              end;
            end;
        end;但是导入到label不正确，请问有什么好方法。先谢了

Answer 1

觉得好像有问题，首先你你得保证数组比lable控件数要少，否则会报错，然后根据控件得序号找到相应得数据，或者干脆用字符串数组，然后一一对应，当然还有很多其他得方法。

Answer 2

下面的两个不要混用！！！！
for i := 0 to controlcount - 1 do
//use Controls[i]for i := 0 to ComponentCount - 1 do
//use Components[i]

Answer 3

我定义的是字符串数组，关键是现在label多，需要把不需要的label跳过去