insertar texto en cadena de texto
 

hola foro tengo una cadena llamada c1: string;
quiero agregar en la posicion 70 una cadena que contiene por ejemplo "Hola"
como puedo escribir en una cadena de texto en una posicion especifica ?

Saludos y gracias de antemano.

:)

Utiliza copy.
Tomas la parte anterior a la posicion y la parte posterior a esa posicion.
Luego concatenas las tres partes.

Código Delphi [-]
var
   c1 : string;
   c2 : string;
begin
   c1 := 'abcdefghij';
   c2 := 'Hola';
   c1 := copy(c1, 1, 5) + c2 + copy (c1, 6, Length(c1) - 5);
end;

ok gracias duilioisola, pero no existe algo como insert
 

acaso alguien sabe si existe algo parecido a insert o algo asi en donde se especifique el texto a agregar y la posicion ? , saludos.

Hola.
Si, el procedimiento Insert.

Código Delphi [-]
var
  Cad: string;
begin
   Cad:= 'UN TEXTO';
   Insert('Hola', Cad, 3);
   ...

Saludos.

solucionado con la aportacion de ecfisa
 

Gracias ecfisa, quedo perfecto como tu lo mostraste, mucho mas facil tu codigo
saludos.