TempXml := TXMLDocument.Create(nil);
TempXml.Active := false;
TempXml.XML.Text:=strXml;
TempXml.Active := true;
TempXml.Version:='1.0';
TempXml.Encoding :='gb2312';當運行到此處,總是報錯誤,哪里設定不對嗎?請高手幫忙看一下吧。
TempXml.SaveToFile(ExtractFilePath(paramstr(0))+sNewOrdrTBTyp+'.xml');
try
XMLNode1:= TempXml.DocumentElement;
if XMLNode1.NodeName <> 'trades_sold_get_response' then exit;
try
XMLNode1:= TempXml.ChildNodes.Nodes['trades_sold_get_response'];
except
end;
uj5u.com熱心網友回復:
急急急!!!uj5u.com熱心網友回復:
TempXml.Encoding :='gb2312';當運行到此處,總是報錯誤,哪里設定不對嗎?請高手幫忙看一下吧。這種寫法我在DELPHI7中也報錯。
我的解決方案是:
TempXml.Encoding :='gb2312'---洗掉
TempXml.XML.Text:=AnsiToUtf8(strXml);
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/143618.html
標籤:VCL組件開發及應用
上一篇:RTSP/GB28181/HIKSDK/Ehome協議視頻平臺EasyCVR級聯兩個上級平臺通道數不一致的BUG解決
下一篇:記憶體泄露問題!
