如何获得DBgrid或dbquery中某行某列的值？

Question

procedure TForm1.Button1Click(Sender: TObject);
begin
  dbgrid1.SetFocus;
  tstringgrid(dbgrid1).col:=1;
  tstringgrid(dbgrid1).row:=1;
end;

Answer 1

Query.First;
Query.MoveBy(Row);
Query.Fields[Col].Value := '1';

Answer 2

都可以用
query.fields[i].asstring
的类似方法来取得当前纪录的某个字段的值当前纪录的定位可以用楼上的方法

Answer 3

或者可以这样！
Query.Fields[0].Value;

Answer 4

for i:=0 to query.recordcount do
begin
  x[i]:=query.fields[0].asstring;
  query.next;
end//可以将数据集的一整列数据赋到一个数组中
for i:=0 to query.FieldCount do
  x[i]:=query.[i].asstring;//可以将数据集的一整行数据赋到一个数组中

Answer 5

dbgrid的数据源由数据源控件提供的所以只要你把，DBGRID设成可选，再在数据源控件取值就行了。