Cita:
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