Moin,
man kann das auch ein wenig übersichtlicher schreiben (ich hoffe, ich vertu mich da nicht):
Delphi-Quellcode:
// Position der 1. '{':
geschwKlammerAuf1 := Pos('{', OldString);
// Position der 2. '{' (gesucht wird ab dem Folgeindex der 1. '{'):
geschwKlammerAuf2 := PosEx('{', OldString, geschwKlammerAuf1 + 1);
// Kopiert die Zeichen ab der 2. '{' bis zum Stringende:
NewString := Copy(OldString, geschwKlammerAuf2, Length(OldString));
// Kopiert die Zeichen vom Anfang des Strings bis zum drittletzten Zeichen:
NewString := Copy(NewString, 1, Length(NewString)-3);
Wobei man die letzten beiden Code-Zeilen auch zusammenfassen könnte zu:
NewString := Copy(OldString, geschwKlammerAuf2, Length(OldString) - 3);
wenn ich das richtig sehe. Hab's aber nicht getestet.
Grüße