buscar una cadena en un memo y cambiarla

[[Héctor Randolph]]

Si ya conoces en que línea está la palabra prueba con esto.

Código Delphi [-]
AnsiReplaceStr(Memo1.Lines[nCont],Uppercase(Edit1.Text),'ABCDERTE');

Es decir, envía como parámetro sólo una línea y no todo el texto.

Tal vez ese sea el problema.

Un saludo.

[roman]

Pues bueno, si nada más se pone

Código Delphi [-]
AnsiReplaceStr(Memo1.Text, 'ALCALDE1', 'ABCDERTE');

seguro que no se reemplaza nada. Habría que poner

Código Delphi [-]
Memo1.Text := AnsiReplaceStr(Memo1.Text, 'ALCALDE1', 'ABCDERTE');

// Saludos

[[Héctor Randolph]]

Empezado por roman

AnsiReplaceStr(Memo1.Text, 'ALCALDE1', 'ABCDERTE');

seguro que no se reemplaza nada. Habría que poner

Memo1.Text := AnsiReplaceStr(Memo1.Text, 'ALCALDE1', 'ABCDERTE');

ups!, es verdad.

Además de esta forma no habrá que leer línea por línea, pues se reemplazan todas las ocurrencias de una sola vez.

Saludos

[perico]

muchas gracias era ahi donde tenia el error, es que se me escapo ese detalle

muchas gracias por su ayuda y tomarce el tiempo de responder