这是什么错误？？

[bugcool]

Project Project1.exe raised exception class EOleException with message '引用没有存储'. Process stopped.

就是在下面SQL.ADD()地方发生的，他是在一个线程里运行的


strSql := 'insert into passRecord(autoLicense,kindCode,typeCode,passTime,stationID,driveWayID,driveWayType,casherID,color,image1) values(:var1,:var2,:var3,:var4,:var5,:var6,:var7,:var8,:var9,:var10)';
with frmMDI.queryMain do
begin
close;
sql.Clear;
sql.Add(strSql);
Parameters[0].Value := driveInfo.autoLicense;
Parameters[1].Value := driveInfo.kindCode;
Parameters[2].Value := driveInfo.typeCode;
Parameters[3].Value := driveInfo.passTime;
Parameters[4].Value := driveInfo.stationID;
Parameters[5].Value := driveInfo.driveWayID;
Parameters[6].Value := strToInt(driveInfo.driveWayType);
Parameters[7].Value := driveInfo.casherID;
Parameters[8].Value := driveInfo.color;
Parameters[9].Value := DriveInfo.stationID+DriveInfo.driveWayID+DriveInfo.strTime + '.jpg' ;
ExecSQL;
end;

[bugcool]

哦
写掉了
错误应该是：‘标记没有引用存储’

[Black]

strSql := 'insert into passRecord(autoLicense,kindCode,typeCode,passTime,stationID,driveWayID,driveWayType,casherID,color,image1) values('+''''+var1+''''+','+''''var2+''''+','+......+','+''''+var10+''''+')';
with frmMDI.queryMain do
begin
close;
sql.Clear;
sql.Add(strSql);
Parameters[0].Value := driveInfo.autoLicense;
Parameters[1].Value := driveInfo.kindCode;
Parameters[2].Value := driveInfo.typeCode;
Parameters[3].Value := driveInfo.passTime;
Parameters[4].Value := driveInfo.stationID;
Parameters[5].Value := driveInfo.driveWayID;
Parameters[6].Value := strToInt(driveInfo.driveWayType);
Parameters[7].Value := driveInfo.casherID;
Parameters[8].Value := driveInfo.color;
Parameters[9].Value := DriveInfo.stationID+DriveInfo.driveWayID+DriveInfo.strTime + '.jpg' ;
ExecSQL;
end;
如果字段不是字符型的，应转成字符型的