如何在DBGRID中获取一个已知行的各个字段的数据

解决方案 »

  1.   

    将数据集的当然数据指向那行,然后再取数据即可
    如:
    procedure TForm1.Button1Click(Sender: TObject);
    var
      iOldRec: Integer;
      I: Integer;
    begin
      with DBGrid1.DataSource do
      begin
        iOldRec := DataSet.RecNo;
        DataSet.DisableControls;
        try
          DataSet.RecNo := 13;
          for I := 0 to DataSet.FieldCount - 1 do
          begin
            ShowMessage(DataSet.Fields[I].AsString);
          end;
        finally
          DataSet.RecNo := iOldRec;
          DataSet.EnableControls;
        end;
      end;
    end;