SA 的参数

SA 的参数也只能是常数数组.

http://www.cnblogs.com/del/archive/2009/10/27/1590692.html

  ja := SA([]);

  jo := SO();

  jo.S['a'] := '455-555';
  ja.AsArray.Add( jo.AsObject.GetValues.AsArray[] );
  jo.S['a'] := '455-444';
  ja.AsArray.Add( jo.AsObject.GetValues.AsArray[] );
  jo.S['a'] := '455-666';
  ja.AsArray.Add( jo.AsObject.GetValues.AsArray[] );

  jo := SA([ja.AsArray[]]);  //用 ISuperObject对象也能作为元素，构建数组
  ShowMessage( jo.AsString + ' ' + ja.AsArray[].AsString );
  for I :=  to jo.AsArray.Length -  do //构建后的数组，能正常循环
    ShowMessage( jo.AsArray[I].AsString);