Question

delphi中如何在多条符合条件的记录中，循环出符合条件的第一条记录

这是我循环出全部记录的代码，循环出第一条记录怎么改

adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select 计量单位 from jsj');
ADOQuery1.Open;
while not adoquery1.eof do
begin
combobox1.items.add(adoquery1.fieldByName('计量单位').asstring);
adoquery1.next();
end;

Answer 1

去掉while循环，直接获取
adoquery1.fieldByName('计量单位').asstring
的值即可。

追问

谢谢

谢谢了