Question

delphi 进行ADOQuery.RecordCount=0判断时报错

代码如下：
sqlString:='select FSerialBill,FPer_Name,FTotalMoney from OP_InvoiceBill where FSerialBill=' + Trim(Edit_SerialNum.Text);
with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add(sqlString);
Open;
end;

if ADOQuery1.RecordCount=0 then
begin
ShowMessage('HIS发票号错误，请检查。');
Exit;
end;
执行到if ADOQuery1.RecordCount=0 then报错
“raised exception class EOleException with message '从数据类型 varchar 转换为 numeric 时出错。”
求解！！！
使用如下判断且返回记录数为0时：
if ADOQuery1.IsEmpty then
报错如下：
Project BillSysTest.exe raised exception class EOleException with message '将 varchar 转换为数据类型 numeric 时出现算术溢出错误。'. Process stopped. Use Step or Run to continue.
百思不得其解。

Answer 1

ADOquery.Close; ADOquery.SQL.Clear; ADOquery.SQL.Add('select * from table where 字段1='+''''+Edit1.text+''''); ADOquery.Open; if ADOqueryt.RecordCount