Função Copy

A função Copy(Texto, Inicio, Fim) "Resulta" em um determinado pedaço do texto...
procedure TForm1.FormCreate(Sender: TObject);
var
  Texto: string;
begin
  Texto := 'Oi Blogger';

  ShowMessage(Copy(Texto, 1, Length(Texto) - 1));
  // Mensagem = "Oi Blogger"

  ShowMessage(Copy(Texto, Length(Texto) , 1));
  // Mensagem = "r"

  ShowMessage(Copy(Texto, 4, 5));
  // Mensagem = " Blogg"

end;
Bom é isso deu para entender?
Qualquer coisa é so falar...