怎样对TQUERY 对象的结果进行操作？（在线等）

Question

用TQuery类定义一个对象query1，然后往query1中添加一条执行查询操作的SQL语句，
请问各位高手，怎样获得查询结果，也就是说怎样对查询结果进行操作，例如我想把查询结果显示在
一些编缉控件中。
请各位高手帮忙！！

Answer 1

datasource1.dataset:=adoquery1;
dbgrid1.datasource:=datasource1;
str:='select * from yourtab';
with adoquery1 do
  begin
    clear;
    sql.add(str);
    open;
  end;

Answer 2

datasource1.dataset:=adoquery1;
dbgrid1.datasource:=datasource1;
str:='select * from yourtab';
with adoquery1 do
  begin
    close; 
    sql.clear;
    sql.add(str);
    open;//open返回数据集，当执行修改删除时用Execsql；
  end;

Answer 3

自己写SQL，进行处理！再添加两个控件

Answer 4

var
  aString: String;
  aInt: Integer;
begin
  with query1 do
    begin
      close;
      SQL.Clear;
      SQL.Add('Select * from aTable');
      Try
        if Not Prepared then  Prepared;
        Open;
      Except
        ShowMessage('Query Error!');
      End;
      aString := query1.FieldByName('aStringFieldName').AsString;
      aInt := query1.FieldByName('aIntFieldName').AsInteger + 100;
      if query1.RecordCount = 1 then
        begin
          ShowMessage('1 Record Found.');
        end;
    end;
end;

Answer 5

TQuery查询后可以过滤么？
就是不在select语句中过滤/

Answer 6

var
  aString,bstring: String;
  aInt,bint: Integer;
begin
  with query1 do
    begin
      close;
      SQL.Clear;
      SQL.Add('Select * from aTable');
      Try
        if Not Prepared then  Prepared;
        Open;
      Except
        ShowMessage('Query Error!');
      End;
      aString := query1.FieldByName('aStringFieldName').AsString;
      bstring:=query1.fields[1].asstring;
      aInt := query1.FieldByName('aIntFieldName').AsInteger + 100;
      bint:=query1.fields[0].asinteger;
      if query1.RecordCount = 1 then
        begin
          ShowMessage('1 Record Found.');
        end;
    end;
end;

Answer 7

自由的对查询结果进行处理，:
filter

Answer 8

ADOTable中有的ADOQuery中大部分都有.