帮我排下错 ( 积分: 0 )

Multi := StrToInt(FUserPass) * StrToInt(RandomNum);
我运行的时候会报错说'3213123123' is not a valid integer value,单引号里的数字是由RandomNum随机生成的数字字符串,下面是产成随机数的代码
function TDModule.GetRandomNum: string;
var
i: Integer;
begin
Randomize;
RandomNum := '';
for i := 0 to 9 do
RandomNum := RandomNum + Char(Byte('0')+Byte(Random(10)));
Result := RandomNum;
end;

Integer -2147483648..2147483647
,知道是什么原因了吧。。。。

那我这句StrToInt(RandomNum)怎么改啊,RandomNum是必须10位的

StrToInt(FUserPass) * StrToInt(RandomNum);
我现在这两个数10位*10位得出的数超过了范围,应该怎么处理呢