类型不匹配，真不知道哪错了？？高手帮忙

Question

procedure TFrmSaleInformation.P_UpdateDriver(str_driver : string );
var
I_Oldtimes,totaltimes:Integer;
 Str_OldGrade,Str_Grade : String ;其中的定义和一段SQL代码。  Query2.close;
      query2.sql.clear;
      query2.sql.add('update siji set loadtimes=:times,loadtimes2=:times2,grade=:grade where name=:name ');
      query2.ParamByName('times').AsInteger:=I_Oldtimes;
      Query2.ParamByName('times2').AsInteger:=totaltimes;
      query2.ParamByName('grade').AsString:=Str_Grade;
      query2.ParamByName('name').AsString:=str_driver;
      query2.Prepare;
      Query2.ExecSQL;
SQL一执行就报错。错误type mismatch in expression。数据库字段类型如下：
loadtimes  N
loadtimes2 N
grade      A
name       A  高手出山看下。小弟不甚感激！

Answer 1

query2.ParamByName('grade').AsString:=QuotedStr(Str_Grade);
query2.ParamByName('name').AsString:=QuotedStr(str_driver); 

Answer 2

自己找了个帖子已解决。loadtimes  N 
loadtimes2 N 
设成long  integer.
或者定义为变量直接为 longint 都行。