【结贴】Integer类型变量

vagrant

请问下，在SQL语句中我要引用Integer类型变量，我是这样写的：
'''+gybc+' '',老是报错，帮忙分析下

vagrant

怎么没人呢？

zfang

中午休息呢。

integer类型的跟string类型能这样子做吗？
转换成字符串再做＋操作。

vagrant

if DataSetYPGYSJJ.FieldByName('yp_gxh').IsNull then
  begin
    with DataSetYPGYSJJ do
    begin
      if not active then open;
      //dialogs.ShowMessage(Fmaxgxh);
      edit;
      FieldByName('yp_gxh').AsInteger  := Fmaxgxh(FieldByName('yp_ypdh').AsString,FieldByName('yp_gybc').AsString);
    end;
  end;

vagrant

function TYPXX_INFO.Fmaxgxh(ypdh :string;gybc :string) :Integer;
var
  lQuery : TQuery;
begin
  lQuery := TQuery.Create(nil);
  try
    lQuery.ConnectionString :='DATABASEURL=Biz:\XTGLPT_SPACE\XXXT_SPACE\XXXTSJK_DATA.DATABASE';
    lQuery.CommandText := 'select (max(yp_gxh)+1) as gxh '+
                         'from ypgyb_table where yp_ypdh='''+ypdh+''' and yp_gybc='''+gybc+''' group by yp_ypdh,yp_gybc';

    lQuery.open;
    result := lQuery.FieldByName('gxh').AsInteger ;
  finally
    lQuery.Free;
  end;
end;

vagrant

我已经转换了，但还是报错，帮分析下代码

shangxy

5楼的代码参数还是使用integer，sql语句中使用参数看看

vagrant

回答了跟没回答一样

zfang

报什么错误呢？你都没把问题说清楚。

vagrant

错误提示：error occur during invoke getRecords method, 将数据类型 varchar 转换为 numeric 时出错。