Delphi-Quellcode:
NewString := Copy(OldString, PosEx('{', OldString, Pos('{', OldString)+1), Length(OldString));
NewString := Copy(NewString,1, Length(NewString)-3);
Vermutlich kommt es so nicht ganz hin, ist ungetestet, musst noch ein wenig mit rumexperimentieren. PosEx ist in der
Unit StrUtils, die musst du noch einbinden.