با سلام دوست عزیز ابتدا آن ستون هایی که می خواهید Dbgrid آنهارو نمایش بده تو قسمت Columns اضافه کنید و ستون o-Column رو به هیچ فیلدی وصل نکنین و آخر کار هم کد زیرو تو رویداد DBGrid1DrawColumnCell بنویسن.انشاءالله که مشکلتون حل بشه.
procedure TForm4.DBGrid2DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if DataSource1.DataSet.RecNo > 0 then
begin
if DataCol= 0 then
TDBGrid(Sender).Canvas.TextRect(Rect, Rect.Left+ 1, Rect.Top+ 1, IntToStr(TDBGrid(Sender).DataSource.DataSet.RecNo) );
end;
end;