各位用过cell帮我看看我的问题，谢谢(50分)

我用循环将得到的数据写入到cell中。可是4000多条的记录只显示了45条，循环的确运行了4000多次。为什么不能全部显示。这是写入cell的代码，看看有没有问题
while not eof do
begin
Cell1.DoSetCellData (0, nRows, fieldbyname('A_Event').AsString);
Cell1.DoSetCellColor(0, nRows, RGB(255, 0, 0), RGB(255, 255, 255));
Cell1.DoSetCellData (1, nRows, fieldbyname('A_Time').AsString);
Cell1.DoSetCellData (2, nRows, fieldbyname('A_Unit').AsString);
Cell1.DoSetCellData (3, nRows, fieldbyname('A_IP').AsString);
Cell1.DoSetCellData (4, nRows, fieldbyname('A_Level').AsString);
Cell1.DoSetCellData (5, nRows, fieldbyname('A_List').AsString);
Cell1.DoSetCellColor(5, nRows, RGB(255, 0, 0), RGB(255, 255, 255));
Cell1.DoSetCellData (6, nRows, fieldbyname('A_Step').AsString);
Cell1.DoSetCellData (7, nRows, fieldbyname('A_Base').AsString);
Cell1.DoSetCellData (8, nRows, fieldbyname('A_Edition').AsString);
nRows:= nRows+1;
next;
end;
//cell1.Rows:=nrows;
Cell1.DoDrawLine(0,0,8,nRows,0,1,0);//设置表格线

谢谢先

未用过,帮顶吧

没用过啊。[]

现在不是很有时间，大致问一下先吧：
你的行数够吗？要记得增加行呀。
一般性问题可以自己查查CELL的帮助。
另外，代码太少，里面那么多只要写两行就可以了，外面的倒是很想看看。
下班再帮你仔细看吧

路过

谢谢各位,问题已经解决.忘设行数了

？？
怎么不结贴呀!!。。。

对不起，忙忘了。这就结

to ouyongke：“代码太少，里面那么多只要写两行就可以了，外面的倒是很想看看”
是什么意思 。如何把那么多写成2行。

我的意思是说，里面那么多代码，给我们看的时候只要写两行做个代表意思一下就可以了，这样同一个篇幅里就可以少写几行，我们看起来条理可以清楚一点

Cell1.DoSetCellData (0, nRows, fieldbyname('A_Event').AsString);
什么意思 呀

我与没看懂，可能是她那里的版本与我的不同吧，我这里用CELL5

谢谢。问题解决

to请填：是指第1列，第n行单元所对应的值

多人接受答案了。