又是DBGrid，为什么不会输出当前记录数？

Question

又是DBGrid，为什么不会输出当前记录数？代码如下：
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;  Field: TField; State: TGridDrawState);
begin
if field=adoquery1.FieldByName('xuhao') then
dbgrid1.Canvas.TextOut(rect.Left,rect.Top,inttostradoquery1.RecNo));
end;

Answer 1

dbgrid1.Canvas.brush.color:=dbgrid1.Color; 
dbgrid1.Canvas.FillRect(rect); 
dbgrid1.Canvas.font.color:=clblack; 
dbgrid1.Canvas.TextOut(rect.left,rect.top,inttostr(adoquery1.RecNo));

Answer 2

都UP不如复制一下啦
dbgrid1.Canvas.brush.color:=dbgrid1.Color; 
dbgrid1.Canvas.FillRect(rect); 
dbgrid1.Canvas.font.color:=clblack; 
dbgrid1.Canvas.TextOut(rect.left,rect.top,inttostr(adoquery1.RecNo));