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;