delphi中怎么使用xmlhttp

delphi中如何使用xmlhttp
如题，有组件吗，怎么用？

[解决办法]
var
url:string;
xmlHttp:Olevariant;
responseText:Widestring;
begin
url:= 'http://.............. ';
xmlHttp:=CreateOleObject( 'Msxml2.XMLHTTP ');
xmlHttp.open( 'POST ',url,false);
xmlHttp.send(............);
responseText:=xmlHttp.responseText;
if xmlHttp.status= '200 ' then
....................
else .......................;