線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1497
推到 Plurk!
推到 Facebook!

關於XML是NULL的問題

答題得分者是:smallfox
chjunsen
一般會員


發表:38
回覆:15
積分:10
註冊:2006-10-25

發送簡訊給我
#1 引用回覆 回覆 發表時間:2011-08-06 12:04:23 IP:59.125.xxx.xxx 訂閱
這是我的XML的格式
<?xml version="1.0" encoding="big5"?>
1update


我的程式
SHOWMESSAGE(XML.ChildNodes[1].ChildNodes[2].NodeValue);

這樣會發生問題錯誤訊息
COULD NOT CONVERT VARIANT OF TYP(NULL) INTO TYPE(STRING)




[code delphi]
FUNCTION TfrmMAIN.MODIFY_MSG(SIV_XML:STRING;VAR SRV_PAR1,SRV_PAR2:STRING):STRING;
VAR
XML:IXMLDocument;
BEGIN
[/code]


XML := TXMLDocument.Create(Self);
MO_XML.CLEAR;
MO_XML.Lines.ADD('<?xml version="1.0" encoding="big5"?>');
MO_XML.Lines.ADD(SIV_XML);
frmMain.appendLog('EMG19:' SIV_XML);
MO_XML.Lines.SAVETOFILE('C:\RPT\1.XML');
XML.LoadFromFile('C:\RPT\1.XML');

RESULT:=XML.ChildNodes[1].ChildNodes[0].NodeValue;
SRV_PAR1:=XML.ChildNodes[1].ChildNodes[1].NodeValue;
{
IF XML.ChildNodes[1].ChildNodes[2].NodeValue<> NULL THEN BEGIN
SRV_PAR2:=XML.ChildNodes[1].ChildNodes[2].NodeValue;
END
ELSE BEGIN
SRV_PAR2:='NO_MSG';
END;
}
{
IF XML.ChildNodes[1].ChildNodes[2].NodeValue isnull THEN BEGIN
SHOWMESSAGe('有進來');
END;
}

SHOWMESSAGE(XML.ChildNodes[1].ChildNodes[2].NodeValue);

SHOWMESSAGE(XML.ChildNodes[1].ChildNodes[2].NodeValue);
END;

smallfox
高階會員


發表:2
回覆:113
積分:128
註冊:2003-02-19

發送簡訊給我
#2 引用回覆 回覆 發表時間:2011-08-08 23:58:12 IP:203.73.xxx.xxx 訂閱
判斷式改成這樣如何:

if (Variants.VarIsNull(XML.ChildNodes[1].ChildNodes[2].NodeValue)) then
ShowMessage('NULL')
else
ShowMessage(XML.ChildNodes[1].ChildNodes[2].NodeValue)
chjunsen
一般會員


發表:38
回覆:15
積分:10
註冊:2006-10-25

發送簡訊給我
#3 引用回覆 回覆 發表時間:2011-08-16 07:02:13 IP:111.252.xxx.xxx 訂閱
感謝大大
smallfox
高階會員


發表:2
回覆:113
積分:128
註冊:2003-02-19

發送簡訊給我
#4 引用回覆 回覆 發表時間:2011-08-16 22:17:45 IP:211.74.xxx.xxx 訂閱
不客氣.
系統時間:2024-03-28 23:00:23
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!