ado sql简单有关问题，通过詈骂结贴

ado sql简单问题，在线等，通过詈骂结贴
with   adoquery1   do
begin  
Close   ;
sql.Add(select   a,b   from   table   where   。。。);
execsql   ;
end;

其中
table样式
列a       |列   b
esd           fff
hdd           dsfg
jsd           sdffk
要求从一个表里面“逐行”取出数据，并赋值给变量c，d


请高手帮忙，在线等


------解决方案--------------------
顶一下！
------解决方案--------------------
var
a, b: string;
begin
with ADOQuery1 do
begin
Close;
SQL.Text := '... ';
Open;
while not Eof do
begin
a := FieldByName( 'a ').AsString;
b := FieldByName( 'b ').AsString;
Next;
end;
Close;
end;
------解决方案--------------------
SQL.Text := 'select a,b from table where 。。。 ';