Scripting 如何在Inno设置中迭代MULTI_SZ字符串？

如何在Inno Setup Pascal脚本中迭代MULTI_SZ字符串？

---

e、 g.超过由

RegQueryMultiStringValue

返回的值以下是执行此操作的代码：

var
  I,StartPos:Integer;
  MultiSzStr,Element:String;

...

  StartPos := 1;
  for I:= 1 to Length(MultiSzStr) do
  begin
    if MultiSzStr[I] = #0 then
    begin
      Element := Copy(MultiSzStr, StartPos, I - StartPos);
      { do something with the element }
      StartPos := I + 1;
    end;
  end;