Delphi中取右字符串函数是什么？

Question

请教各位：在Delphi中如何取字符串的左，右部分或中间部分？

Answer 1

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；哈哈，这样就不会有版本的关系了。

Answer 2

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;哈哈！这样就不会有版本的关系了吧？ 查看原帖>>本回答被提问者采纳