kann man die zeilen:
Delphi-Quellcode:
sMemo2:= StringReplace(sMemo2,'PRG','PRG4',[rfReplaceAll]);
sMemo2:= StringReplace(sMemo2,'prg','PRG4',[rfReplaceAll]);
nicht zu einer zusammenfassen:
sMemo2:= StringReplace(UpperCase(sMemo2),'PRG','PRG4',[rfReplaceAll]);
//Edit: nö, dann wird alles groß
is ja logisch...