Obtener la primera palabra en una cadena de texto

[ecfisa]

Hola Jere_84.

Primeramente y por favor, te pido que moderes tu forma de expresarte, los insultos hacia otros miembros no son tolerados en Club Delphi.

Ahora siguiendo con la temática del primer mensaje me gustaría destacar el mensaje número #7, que por ahí pasó desapercibido entre tantos, pero es donde está la respuesta más sencilla a tu consulta.

Con la función Pos que devuelve la posición de la subcadena que buscamos en otra y la función Copy que nos permite extraer un numero de caracteres a partir de un índice, creo que ya tenes la solución.

Saludos.