警告:Delphi ADOQuery的异常!
正常情况下,ADOQuery在open后,纸箱第一条记录,但是有大约不到1%的例外会纸箱第二条记录,所以为保证数据完整,须要显式纸箱第一条记录:ADOQuery.First;
我是真是遇到的。
for i := 1 to 1000 do begin
PCode.Close;
PCode.SQL.Text := 'Select * From FlawCode Order by FlawCode';
PCode.Open;
//PCode.First;
N:=PCode.RecNo;
if N<>1 halt;
end;