对代码感兴趣的朋友，看！

Question

;
      sql.Add('select * from productnot');
      try
      open;
      except
      begin
      showmessage('还没有记录！');
      exit;
      end;
      end;这里是Query发生异常后显示message，不是没有记录。检查你的SQL语句及连接
不要使用ADOQuery1.eof来判断，使用IsEmpty()

Answer 1

这没错吧？while not ADOQuery1.IsEmpty  do begin
        mych:=ADOQuery1.FieldByName('productToFactoryPrice').asstring;
        QRDBText5.Caption:=mych;
        QRLabel19.Caption:=mych;
end;