请教:type
TArrayString = array of string; //定义数组var
tpyaoqc:TArrayString;
fillchar(tpyaoqc,sizeof(tpyaoqc),0); //初始化
tpyaoqs:=Copy(Buffer, 9, Size-9); //客户端播放图片时的要求,除掉 '&'
tpyaoqc:=ParseString(tpyaoqs,'##'); //得到 客户端播放图片时的要求
//************************赋值,每个图片的每个属性*******************
for i:=Low(tpyaoqc) to High(tpyaoqc) do
begin
showmessage(tpyaoqc[i]); TpPlayR[i].ID:=copy(tpyaoqc[i],1,2); //ID
TpPlayR[i].SFQY:=copy(tpyaoqc[i],3,1); //是否启用
TpPlayR[i].JPXG:=copy(tpyaoqc[i],4,2); //进屏效果
TpPlayR[i].JPSD:=copy(tpyaoqc[i],6,1); //进屏速度
TpPlayR[i].TLSJ:=copy(tpyaoqc[i],7,5); //停留时间
TpPlayR[i].CPXG:=copy(tpyaoqc[i],12,2); //出屏效果
TpPlayR[i].CPSD:=copy(tpyaoqc[i],14,1); //出屏速度
TpPlayR[i].SFSF:=copy(tpyaoqc[i],15,1); //是否缩放
showmessage(copy(tpyaoqc[i],3,1)); end;现在问题是:
showmessage(tpyaoqc[i]) show 出的是 '01是01300005003'
可是 showmessage(copy(tpyaoqc[i],3,1)) show 出的是 '[' 各位大哥,这是什么原因啊?
谢谢!
TArrayString = array of string; //定义数组var
tpyaoqc:TArrayString;
fillchar(tpyaoqc,sizeof(tpyaoqc),0); //初始化
tpyaoqs:=Copy(Buffer, 9, Size-9); //客户端播放图片时的要求,除掉 '&'
tpyaoqc:=ParseString(tpyaoqs,'##'); //得到 客户端播放图片时的要求
//************************赋值,每个图片的每个属性*******************
for i:=Low(tpyaoqc) to High(tpyaoqc) do
begin
showmessage(tpyaoqc[i]); TpPlayR[i].ID:=copy(tpyaoqc[i],1,2); //ID
TpPlayR[i].SFQY:=copy(tpyaoqc[i],3,1); //是否启用
TpPlayR[i].JPXG:=copy(tpyaoqc[i],4,2); //进屏效果
TpPlayR[i].JPSD:=copy(tpyaoqc[i],6,1); //进屏速度
TpPlayR[i].TLSJ:=copy(tpyaoqc[i],7,5); //停留时间
TpPlayR[i].CPXG:=copy(tpyaoqc[i],12,2); //出屏效果
TpPlayR[i].CPSD:=copy(tpyaoqc[i],14,1); //出屏速度
TpPlayR[i].SFSF:=copy(tpyaoqc[i],15,1); //是否缩放
showmessage(copy(tpyaoqc[i],3,1)); end;现在问题是:
showmessage(tpyaoqc[i]) show 出的是 '01是01300005003'
可是 showmessage(copy(tpyaoqc[i],3,1)) show 出的是 '[' 各位大哥,这是什么原因啊?
谢谢!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货