how to copy from the end of the word in delphi code example

Example: Delphi how copy works

var
  Source, Target : string;

begin
  Source := '12345678';
  Target := copy(Source, 3, 4);
  ShowMessage('Target : '+Target);
end;