问一个挺简单的基础问题，如何取得一个字符串的最后三位？在线等，急急急！

Question

如何用DELPHI的函数来获取一个未知长度的字符串的最后三位？这个函数是什么？在线等，急急急！
希望大家能救我一下了！
我只知道用copy函数可以取得从第一位开始下去的任何字符，但我现在的字符不知道长度，而且长度是不定的，我只要用最后三位就行了，前面的字符不用去管的

Answer 1

uses StrUtils;
....
var
  s0, s1: string;
....
  s0 := 'abcdefghijk';
  s1 := RightStr(s0, 3);
  ShowMessage(s1);

Answer 2

Copy(str, Length(str)-3, 3);

Answer 3

Copy(str, Length(str)-3, 3);

Answer 4

也可以
procedure TForm1.Button1Click(Sender: TObject);
var
  s,t: string;
begin
  s:= 'aaaaaaaabbb';
  t:= s[length(s)-2]+s[length(s)-1]+s[length(s)-0];
  showmessage(t);
end;

Answer 5

也可以
procedure TForm1.Button1Click(Sender: TObject);
var
  s,t: string;
begin
  s:= 'aaaaaaaabbb';
  t:= s[length(s)-2]+s[length(s)-1]+s[length(s)-0];
  showmessage(t);
end;

Answer 6

各位的方法都行，但只有ppiy3670老兄的方法最好，问题已经解决了，谢谢

Answer 7

uses StrUtils;
....
var
  s0, s1: string;
....
  s0 := 'abcdefghijk';
  s1 := RightStr(s0, 3);--------------------------来晚了,用RightStr就可以.
如果要从左开始就是 LeftStr
如果从中间开始取就是 MidStr

Answer 8

555.....
哈哈....RightStr(s0, 3);