求大神指导：怎么取出dbgrit中第二行第六列跟第三行第六列的值

Question

delphi中   求大神指导：怎么取出dbgrit中第二行第六列跟第三行第六列的值

Answer 1

procedure TMID_1_4_Frm.Button11Click(Sender: TObject);
var S1,S2:string;
begin
  DBGridEh1.DataSource.DataSet.First;                   // 第1行
  DBGridEh1.DataSource.DataSet.Next;                    // 第2行
  S1:=DBGridEh1.DataSource.DataSet.Fields[5].AsString;  // 第2行 第6列值
  DBGridEh1.DataSource.DataSet.Next;                    // 第3行
  S2:=DBGridEh1.DataSource.DataSet.Fields[5].AsString;  // 第2行 第6列值
end;

Answer 2

procedure TMID_1_4_Frm.Button11Click(Sender: TObject);
var S1,S2:string;
begin
  DBGridEh1.DataSource.DataSet.First;                   // 第1行
  DBGridEh1.DataSource.DataSet.Next;                    // 第2行
  S1:=DBGridEh1.DataSource.DataSet.Fields[5].AsString;  // 第2行 第6列值
  DBGridEh1.DataSource.DataSet.Next;                    // 第3行
  S2:=DBGridEh1.DataSource.DataSet.Fields[5].AsString;  // 第2行 第6列值
end;

Answer 3

procedure TMID_1_4_Frm.Button11Click(Sender: TObject);
var S1,S2:string;
begin
  DBGrid1.DataSource.DataSet.First;                   // 第1行
  DBGrid1.DataSource.DataSet.Next;                    // 第2行
  S1:=DBGrid1.DataSource.DataSet.Fields[5].AsString;  // 第2行 第6列值
  DBGrid1.DataSource.DataSet.Next;                    // 第3行
  S2:=DBGrid1.DataSource.DataSet.Fields[5].AsString;  // 第2行 第6列值
end;

Answer 4

lyhoo163的方法最直接。当然考虑非设定行列动态取值，可以考虑用记录号取值。