急阿，，，，，谁能解决阿

Question

A_ClientList[i] := TStringlist.create; 
with datamodule1.ADOQuery2 do
      for i:= 0 to Workercount - 1 do
      begin
        close;
        parameters.Clear;
        Parameters.CreateParameter('param',ftstring,pdinput,8,A_WorkerNumList.ValueFromIndex[i]);
        sql.Clear;
        sql.Add('select 客户名称 from 客户简写表 where 业务员编号 =:param');
        open;
          for j:=0 to datamodule1.ADOQuery2.RecordCount - 1 do
            begin
              A_ClientList[i].Add(datamodule1.ADOQuery2.fieldbyname('客户名称').AsString);
            end;
          combobox3.items.addstring(Clientlist[i]) 
   却什么也没加进入去，这是为什么阿

Answer 1

先追踪调试一下：
1看查询有没有内容，
2.看ClientList有没有内容
放入对应的控件试试

Answer 2

A_ClientList[i] := TStringlist.create; 
这句话应该放在循环里。

Answer 3

同意snowfog(秋风舞),可能你还要用A_ClientList[i] as xxx,呵呵

Answer 4

A_Clientlist[0]负了值，可第二次循环的时候，adoquery的recordercount 为零。不知道为什么。
A_WorkerList的值没有错。

Answer 5

A_ClientList[i] := TStringlist.create; 我做了循环，这里只是标示一下。在公共区做了循环。

Answer 6

A_Clientlist[0]负了值，可第二次循环的时候，adoquery的recordercount 为零。不知道为什么。::可能是你在adoquery的其他事件中写了代码影响的

Answer 7

你没给param参数赋值怎么会有结果？