XML 파일을 만드는데 아래와 같은 부분에서 만들 수 가 없습니다.
delphi7 이고 XMLDoc, XMLIntf 을 이용해서 만들려고 합니다.
var
xmldoc: TXMLDocument;
xmlstr: widestring;
XMLNode, SubNode, SubNode2, SubNode3, SubNode4, SubNode5: IXMLNode;
RootNode: IXMLNode;
begin
XMLDoc := TXMLDocument.Create(Application);
XMLDoc.Options := [doNodeAutoIndent,doAttrNull];
XMLDoc.Active := True;
XMLDoc.Version := '1.0';
XMLDoc.Encoding := 'euc-kr';
RootNode := XMLDoc.AddChild('test_rule');
XMLNode := RootNode.AddChild('info');
XMLNode.Attributes['userid'] := '1234';
XMLNode.Attributes['systemcode'] := 'KC';
XMLNode.Attributes['date'] := '200909041200';
xmlNode := RootNode.AddChild('company');
SubNode := xmlNode.AddChild('data');
subNode.Attributes['pubcode'] := 'A1234567890ABC';
SubNode2 := SubNode.AddChild('compnayinfomation');
SubNode2.Attributes['xmlns'] := 'http://www.abc.com/company';
SubNode2.Attributes['xmlns:xsi'] := 'http://www.w3c.org/2001/XMLSchema-instance';
SubNode2.Attributes['xmlns:xmldsig'] := 'http://www.abccom.com/xmldsig';
SubNode2.Attributes['xsi:schemaLocation'] := 'http://www.abcsche.or.kr/kis http://www.abc.com/kis/companyinfo http://www.abccom.com/xmldsig http://www.abc.com/xmldsig/info-xmldsig-core-schema.xsd';
SubNode2.Attributes['revision'] := '1.0.0';
SubNode3 := SubNode2.AddChild('ApplicationArea');
SubNode4 := SubNode3.AddChild('Creation.DateTime');
SubNode4.NodeValue := '20090904';
SubNode5 := SubNode3.AddChild('Signature');
SubNode5 := SubNode5.AddChild('info:SignatureValue')';
문제는 subnode3 을 생성하는데
<ApplicationArea> 만 나와야 하는데
<ApplicationArea xmlns=""> 가 나옵니다. 즉 뒤부분의 xmlns="" 부분은 안나와야 하는데..
xmlns 를 xmlns1 로 수정하면 안 나옵니다.. xmlns 가 키워드 인가요?
알고계신분의 답변 부탁드립니다.
p.s: 참고로 콤포넌트(internet)에 있는 XML 콤포넌트와 위에서 사용한것과는 동일한 거죠?