if IsNumeric(crS.dbnum) and IsNumeric(dbLast) and IsNumeric(dm.cdsClaimDb1.AsString) then if ( StrToInt(crS.dbNum) in [dm.cdsClaimDb1.AsInteger..StrToInt(dbLast)]) then // тут