关于AdvStringGrid加载的问题
我需向AdvStringGrid加载几列数据
开始没有问题，可是一循环判断就
无法正常显示
while (not dm.cds_temp1.Eof) and (j <21) do
begin
AdvStringGrid1.Cells[0,i]:=dm.cds_temp1.fieldbyname( 'para1 ').AsString;
AdvStringGrid1.Cells[1,i]:=dm.cds_temp1.fieldbyname( 'para2 ').AsString;
AdvStringGrid1.Cells[2,i]:=dm.cds_temp1.fieldbyname( 'para3 ').AsString;
AdvStringGrid1.Cells[3,i]:=dm.cds_temp1.fieldbyname( 'para4 ').AsString;
AdvStringGrid1.Cells[4,i]:=dm.cds_temp1.fieldbyname( 'para5 ').AsString;
AdvStringGrid1.Cells[5,i]:=dm.cds_temp1.fieldbyname( 'sj ').AsString;
AdvStringGrid1.Cells[6,i]:=dm.cds_temp1.fieldbyname( 'zdbs ').AsString;
dm.cds_temp1.Next;
i:=i+1;
end;
dm.cds_temp1.First;
while not dm.cds_temp1.Eof do
begin
AdvStringGrid1.Cells[7,i]:=dm.cds_temp1.fieldbyname( 'para1 ').AsString;
AdvStringGrid1.Cells[8,i]:=dm.cds_temp1.fieldbyname( 'para2 ').AsString;
AdvStringGrid1.Cells[9,i]:=dm.cds_temp1.fieldbyname( 'para3 ').AsString;
AdvStringGrid1.Cells[10,i]:=dm.cds_temp1.fieldbyname( 'para4 ').AsString;
AdvStringGrid1.Cells[11,i]:=dm.cds_temp1.fieldbyname( 'para5 ').AsString;
AdvStringGrid1.Cells[12,i]:=dm.cds_temp1.fieldbyname( 'sj ').AsString;
AdvStringGrid1.Cells[13,i]:=dm.cds_temp1.fieldbyname( 'zdbs ').AsString;
dm.cds_temp1.Next;
i:=i+1;
end;
只能显示一个while语句的内容，打断点第二个循环可以进入，但就是不显示
[解决办法]
i:=9;
dm.cds_temp1.First;
while not dm.cds_temp1.Eof do
