Text ersetzen

[Klaus01]

Delphi-Quellcode:

for i := 0 to Memo1.Lines.Count - 1 do begin
  if Pos('RFU', Memo1.Lines[i] = 1) then
    Memo1.lines[i]:=StringReplace(Memo1.lines[i],'RFU','RFU_CON',[rfIgnoreCase]);
end;

So sollte es ungefähr funktionieren.
Weil, Du willst ja nur den Text in der Zeile ersetzen wo er denn auch aufgetaucht ist.

Und, if-Schleifen gibt es nicht.

Grüße
Klaus