كيف أنسخ آخر ثلاث أحرف من نص ما في edit

[hanipino]

تعديل لتعمل مثل RightStr

PHP كود :

Function RightStr1(S:String;X,Y:LongWord):String;
var
  Le:Longword;
begin
  S:=Trim(S); Le:=Length(S);
  Result:=Copy(S,Le-(Y-1),Le-(X-1));
end;