比如我用两层循环
with adoquery1 do
begin
close;
sql.Clear;
sameunit:='select a,b,c from 表1'
sql.Add(sameunit);
open;
end;
while not adoquery1.Eof do
begin
addr:=trim(adoquery1.fieldbyname('a').AsString; {
..在上面的adoquery1结果集中查询,
如示意:select .. from ( 使用上一次adoquery1中的查询结果,避免在这里重复查询)
}
adoquery1.Next;
end;
with adoquery1 do
begin
close;
sql.Clear;
sameunit:='select a,b,c from 表1'
sql.Add(sameunit);
open;
end;
while not adoquery1.Eof do
begin
addr:=trim(adoquery1.fieldbyname('a').AsString; {
..在上面的adoquery1结果集中查询,
如示意:select .. from ( 使用上一次adoquery1中的查询结果,避免在这里重复查询)
}
adoquery1.Next;
end;
如:
addr:=trim(adoquery1.fieldbyname('a').AsString;sex:=trim(adoquery1.fieldbyname('b').AsString;next;估计我这属于废话。不过不知道你想做的是什么/