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[0] );
  jo.S['a'] := '455-444';
  ja.AsArray.Add( jo.AsObject.GetValues.AsArray[0] );
  jo.S['a'] := '455-666';
  ja.AsArray.Add( jo.AsObject.GetValues.AsArray[0] );

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