您的位置:首页 > 其它

数组元素是 字符串 类型,并且包含 -等 特殊字符

2015-08-27 08:44 537 查看
var
s,ss,ds,qx,dz,sn,biosstr:string;
I:Integer;
ja,jo:ISuperObject;
begin
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]]);
ShowMessage(jo.AsString+''+ja.AsArray[0].AsString);
forI:=0tojo.AsArray.Length-1do
ShowMessage(jo.AsArray[I].AsString);
Exit;

ShowMessage(SA([ja.AsArray[0]]).AsString);
ShowMessage(SA([ja.AsArray[1]]).AsString);
ShowMessage(SA([ja.AsArray[2]]).AsString);
//ShowMessage(ja.AsArray[0].AsArray[0].AsString);
Exit;


//不能直接用
jo:=so('444-555');
ja.asArray.Add(jo);

//否则,中间的-后的内容会消失,而且没有引号

ShowMessage(ja.AsString);//[444]

先构建一个名值对象,然后,取值的数组第一个元素

jo.AsObject.GetValues.AsArray[0];

--------------------------------------

jo:=SO();
jo.S['aaa']:='444/*+-.~!@#$%^&()=555';
ja:=SA([]);
ja.AsArray.Add(jo.AsObject.GetValues.AsArray[0]);
ShowMessage(ja.AsString);




                                            
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: