使用方法如下
var
i:integer;begin
Edit1.Text:='RK20080823001';
i:=strtoint(Rightstr(Edit1.Text,11))+1;提示出错,说取出来的数据是一个无效的整数.....取出来的是20080823001咋不是一个整数呢...
var
i:integer;begin
Edit1.Text:='RK20080823001';
i:=strtoint(Rightstr(Edit1.Text,11))+1;提示出错,说取出来的数据是一个无效的整数.....取出来的是20080823001咋不是一个整数呢...
设置成Long 型试试.
Integer -2147483648..2147483647 signed 32-bit超范围了吧
inttostr和strtoint()不行了.