Punteros Strings

[Albano]

Empezado por jlrbotella

Hola:Me gustaría realizar una función donde reciba un string y se modifique dentro de la misma función, pero no tengo claro los punteros.

Si lo que quieres es usar el código que pusiste al inicio, tienes que modificar una de estas dos líneas:

Código Delphi [-]
ValorOriginal := ValorOriginal + ' cambiado';

Código Delphi [-]
Showmessage(cadena);

Por una de estas:

Código Delphi [-]
 Cadena := ValorOriginal + ' cambiado';

Código Delphi [-]
 Showmessage(ValorOriginal);

OJO: Cambia solo una de las dos, si cambias las dos, el resultado será el mismo.
Hablas de funcion y de punteros, pero en tu código no estas utilizando nada de esto y, segun parece, para lo que quieres hacer no los necesitas, con ese procedimiento tienes.
Lo que pasaba es que estabas mostrando el valor de cadena, y en realidad estabas modificando el de ValorOriginal, entonces lo que tienes que hacer es mostrar el valor que modificas.