Delphi中的XML-RPC庫 不支援中文的解決方案

最近在網上看了一個文章： 主題:   用戶端用delphi寫，伺服器端用java寫，這樣的模式是否可行呢？

其中使用者 greateWei  的思路 提醒了我：使用 XML_RPC的方式 進行不同語言的互動。以前在某軟體公司做過 JAVA => XML => HTTP  = >XML => DELPHI 的 系統，沒有使用其他的技術，僅使用了 IDHTTP組件來擷取XML。唯一的感覺就是構造過程比較麻煩，特別是構造 XML 時。現在用於有個組件了XML-RPC。

系統架構實現基於幾點考慮：
1、XML-RPC同SOAP比較：由於Delphi SOAP用戶端存在一些效能問題和同Java實現存在一些相容性問題，因此考慮採用XML-RPC實現，而且XML-RPC實現同SOAP實現相比較，效能要好很多；
2、XML-RPC同SOCKET比較：採用HTTP協議可以有效穿透不同網路防火牆；
3、採用XML格式交換資料，而不採用XML-RPC標準格式交換資料，主要是由於XML-RPC格式比較簡單，複雜的資料格式很難滿足需求，直接使用對象XML資料流方式，有利於系統擴充；

今天小試了Apache XML-RPC：http://ws.apache.org/xmlrpc/，與 Delphi XML-RPC：http://sourceforge.net/projects/delphixml-rpc/ ，使用 Apache的  在 伺服器 使用，而 Delphi 地作為用戶端使用。發現了一個問題：使用 Delphi  XML-RPC庫時，不不支援中文。

通過GOOGLE 各種 資訊，和 察看 Delphi  XML-RPC庫 的原始碼，發現 其中的XML解析單元 LibXmlParser.pas 不支援 亞洲 字元集。於是產生了修改 XML解析單元 LibXmlParser.pas 的念頭。

最後發現 問題出現在這幾句：

CurContent := CurContent + CHR (StrToIntDef ('$'+Copy (Name, 3, MaxInt), 32))

和 CurContent := CurContent + CHR (StrToIntDef (Copy (Name, 2, MaxInt), 32));

當 存在多位元組字元 時，使用 CHR  就有問題。是用 WideChar 即可解決問題。