Eliminar Caracteres

[ZayDun]

wenas!!

me gustaria saber alguna forma de como poder borrar el contenido de una string..


ejemplo: NICK!datosaleatorios@masdatos :mensaje

me gustaria que se kedara "NICK mensaje" y eliminar la direccion del centro ya que depende del usuario varian los caracteres y no puedo eliminar sin saber los caracteres exactos, lo que si quiero comentar es que si hubiese alguna forma de decir que elimine desde "!" hasta ":" que esos datos siempre llegan y es justo lo que no me vale.GRACIAS!

[[egostar]]

A reserva de que los que saben digan algo mas coherente.

Porque no mejor concatenas las cadenas, algo así

Código Delphi [-]
Cadena := 'NICK!' + Variable + ':mensaje';

y así solo reinicias la Variable

Salud OS.

Edito: Estoy suponiendo que lo haces con Delphi.

[Albano]

Código Delphi [-]
  s := edit1.Text;
  Delete(s,pos('!',s),pos(':',s)-5);
  label1.Caption := s;

En Edit1 puse el texto que decías y con este código funciona bien.
"s" es una variable de tipo string;

[[egostar]]

Muy bien, solo hay que modificar algo en tu función

Delete()

Código Delphi [-]
Delete(s,pos('!',s)+1,pos(':',s)-6);

De otra forma quedaria NICK:mensaje y se requiere NICK!:mensaje

Ahora la parte inversa, agregar el correo entre NICK! y :mensaje

Código Delphi [-]
correo := 'datosaleatorios@masdatos';   
s := Label1.Caption;   
insert(correo,s,6);   
Label1.Caption := s;

PD: Sigo pensando que es mas fácil tener 'NICK!' y ':mensaje' como constantes.

Salud OS.