关于dbgrid的一个小问题

Question

是否能把里面的数据一列一列的读出来??读一个一个的字段很不方便哦...我本意是想拿一列和某个表里的数据匹配看是否相同

Answer 1

var
  i: integer;
begin
 ...
 ADOQuery1.Close;
 ADOQuery1.SQL.Clear;
 ADOQuery1.SQL.Add('SELECT * FROM tablename');
 ADOQuery1.Open;
 ADOQuery1.First;
 for i := 0 to ADOQuery1.RecordCount - 1 do
 begin
   ShowMessage(ADOQuery1.FieldsByName('FeildName').AsString);
   ADOQuery1.Next
 end;
end;

Answer 2

自己写一个小函数嘛，很简单的。就是读取dbgrid的数据源啊。
Function Retgrdstr(Ds:TDataSet):String;
var s:String;
    i:integer;
begin
  for i:=0 to Ds.FieldCount-1 do
    s:=s+Ds.Fields[i].AsString;
  Result:=s;
end;
////////////////使用
Showmessage(Retgrdstr(DBgrd1.DataSource.DataSet))；