und wo liegt das problem???
Delphi-Quellcode:
var
Flags : TReplaceFlags;
OK : boolean;
S : string;
begin
S:='xxDasxxxxxLebenx ist schön';{x = ggf. Leer-Zeichen}
Flags := [rfReplaceAll, rfIgnoreCase];
S := StringReplace(S,'xx','x',Flags); // Erg = xDasxxxLebenx ist schön
// xDasxxxLebenx ist sch÷n
writeln(s);
readln;
end.
das macht delphi doch optimal und genau richtig
. je zwei xx werden mit einem x ersetzt... also beispiel
xxDas --> xDas
und das kommt doch genau raus, oder brauch ich eine brille?
übrigens xxxxx = 5 x = 2x ersatz plus 1x übrig also xxx