function MyRightStr(S : string； I : integer) :string;begin if length(S)<= I then result := S else result := copy(S,length(S)-I+1,I)；end；哈哈，这样就不会有版本的关系了。
function MyRightStr(S : string; I : integer) :string;begin if length(S)<= I then result := S else result := copy(S,length(S)-I+1,I);end;哈哈！这样就不会有版本的关系了吧？ 查看原帖>>
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024