使用方法如下
  var
 i:integer;begin
 Edit1.Text:='RK20080823001';
 i:=strtoint(Rightstr(Edit1.Text,11))+1;提示出错,说取出来的数据是一个无效的整数.....取出来的是20080823001咋不是一个整数呢...