delphi‎ > ‎

IXMLNodeのNodeValue をString に変換する

2010/01/30 13:39 に いつかはちょうになる が投稿
値が存在しない場合Nullエラーになるので条件を追加している。

function getXMLNodeValue(ANode: IXMLNode): String;
begin
  if (ANode.NodeValue=null) then
    begin
      Result:='';
    end
  else
    begin
      Result:=ANode.NodeValue;
    end;
end;



Comments