Delphi代码转成Builder。关于MSXML4(100分)

我想在C++ Builder使用MSXML4，
Delphi 6中的代码是：
tempXMLDoc : OleVariant;
tempXMLDoc := CreateOLEObject('MSXML2.DOMDocument.4.0');
tempXMLDoc.async := False;
tempXMLDoc.load('example.xml');
showmessage(tempXMLDoc.selectSingleNode('//User/@ID').nodeTypedValue);
C++ Builder中有没有相应的方式实现以上代码？
最好能给出些代码。
不要使用导入类型库的方法，很不好用，能不能使用Delphi中的方式实现？
谢谢。

这个问题已经解决了。
请看http://www.delphibbs.com/delphibbs/dispq.asp?lid=2312187
回答的可以到这接分。
谢谢。

代码已发，请查收。

接受答案了.