[marcoszorrilla]

En un principio mírate la ayuda sobre la función Copy:

Código Delphi [-]
 Var
 cCadena:String;
 begin
 cCadena:=Copy('Hola amigo',6,5);
 end;

Un Saludo.
Notauede también que tengas que utilizar la función Pos.