这个字符串用正则表达式怎么分解？

Question

程序传入一个字符串如下：'a,a,
1',1,*c, 3
请问用正则表达式如何分解出每个部分？，就是用,分解，但字符串内的,不作为分解条件。
谢谢

Answer 1

不需要用正则啊，TStringList就能满足你的要求。

Answer 2

StringList是不行嘀，如果这么简单那就不需要这里问了

Answer 3

看看对不对procedure TForm1.FormCreate(Sender: TObject);
var
  sl: TStringList;
  s: string;
  i: integer;
begin
  sl := TStringList.Create;
  s := '''a,a, 1'',1,*c, 3';
  sl.CommaText := StringReplace(s, '''', '"', [rfReplaceAll]);
  for i := 0 to sl.Count - 1 do
  begin
    ShowMessage(sl.Strings[i]);
  end;
  sl.Free;
end;