Question

帮忙解决一个delphi中字符串转TStringList的问题，高分相求。。。大侠请进

现在在delphi中有这样的一个字符串：str:=‘{a=1,b=2,c=3},{a=11,b=22,c=33},{a=111,b=222,c=333}’；我想要的结果是：将这条字符串循环截取每个{。。}之间的字符串，然后通过一个TStringList对象 strList的add方法添加进去，通过strList.commatext显示的结果为‘a=1,b=2,c=3’，后面{}和前面的一样。补充一点，TStringList中是以键=值形式存储数据，例如a=1，b=2。。。

Answer 1

一句搞定：
ExtractStrings([',', '}'], [' ', '{' ], PChar(str), strList);

Answer 2

完全是菜鸟问题

Answer 3

低级