小
小雨哥
Unregistered / Unconfirmed
GUEST, unregistred user!
MSXML 就是解析 XML 数据的，XML 应该在样式表支持下工作。在 Delphi 中直接导入
MSXML 类型库，生成 MSXML2_TLB.PAS 文件可以解析 XML 数据：
procedure TForm1.Button1Click(Sender: TObject);
var
Obj:IXMLDOMDocument2;
begin
Obj:=CreateComObject(CLASS_DOMDocument) as IXMLDOMDocument2;
Obj.load('simple.xml');
Memo1.Text:=WideCharTOString(PWideChar(Obj.Text));
end;
如果使用 MSXML 应该不需要自己做 OCX 了吧。
MSXML 类型库，生成 MSXML2_TLB.PAS 文件可以解析 XML 数据：
procedure TForm1.Button1Click(Sender: TObject);
var
Obj:IXMLDOMDocument2;
begin
Obj:=CreateComObject(CLASS_DOMDocument) as IXMLDOMDocument2;
Obj.load('simple.xml');
Memo1.Text:=WideCharTOString(PWideChar(Obj.Text));
end;
如果使用 MSXML 应该不需要自己做 OCX 了吧。
]
]）