Escape sequenzen ersetzen

[Photoner]

Zitat von himitsu:

PS: Versuch mal abc<32>def<60>ghi zu deescapen.

Ergebnis wie gewünscht: "abc def<ghi"

Die leere Exception bitte als imaginäres //TODO verstehen. Ich kommentiere nicht immer alle Baustellen. Schlechte Angewohnheit...
Sollte ich tatsächlich durch ein TryStrToInt ersetzen. Das ist deutlich besser.

Zitat von himitsu:

Delphi-Quellcode:

p1:= PosExW('<',AInputString,1);
p2:= PosExW('>',AInputString,1);
if (p1>0) and (p2>0) and (p2>p1+1) then begin

Das ist gekauft. (p2>p1+1) Sollte man testen; ein "<>" zu parsen ergibt keinen Sinn.
Du hast mich aber damit darauf aufmerksam gemacht, dass ich noch prüfen sollte ob vielleicht nach der "<>" Kombination noch ein "<XYZ>" folgt. Das wird verschluckt.