delphi 解析特殊xml的方法
调用getDomInfo('brdh',WSC_virIdCardVerify,authKey);说明:brdh 要取的节点字段,WSC_virIdCardVerify 要解析的xml字符串,authKey 返回值。function TForm1.getDomInfo(const a: string;info:string;var strb:string): string;varhead_begi
调用 getDomInfo('brdh',WSC_virIdCardVerify,authKey);
说明:brdh 要取的节点字段,WSC_virIdCardVerify 要解析的xml字符串,authKey 返回值。
function TForm1.getDomInfo(const a: string;info:string;var strb:string): string;
var
head_begin,head_end,head_end1:Integer;
authKey1,authKey: string;
begin
head_begin := Pos(a+'>',info);
head_end := Pos('</'+a,info);
//showMessage(IntToStr(head_begin));
//showMessage(IntToStr(head_end));
authKey1 := copy(info,head_begin,head_end-head_begin);
head_end1 := pos('>',authKey1);
authKey := Copy(authKey1,head_end1+1,head_end-head_begin);
//showMessage(authKey);
Result := authKey;
{authKey1 := copy(WSC_getAuthKey,head_begin,48);
head_end1 := pos('>',authKey1);
authKey := Copy(authKey1,9,48);
result := authKey;
showMessage(authKey);}
end;
魔乐社区(Modelers.cn) 是一个中立、公益的人工智能社区,提供人工智能工具、模型、数据的托管、展示与应用协同服务,为人工智能开发及爱好者搭建开放的学习交流平台。社区通过理事会方式运作,由全产业链共同建设、共同运营、共同享有,推动国产AI生态繁荣发展。
更多推荐

所有评论(0)