Delphi中indy8设置Authentication验证不通过

[y_zp2010]

idHttp:= TIdHTTP.Create(nil);
RStream:=TStringStream.Create('');
idHttp.Host:=IpAddress;
idHttp.Port:=StrToInt(Port);
idHttp.Request.ProxyAuthenticate:='Basic MDowMDExMTExMTExMTE=';
idHttp.Request.ContentType:='text/xml';
idHttp.Request.ContentLength:=210;
idHttp.Request.Connection:='Keep-Alive';
idHttp.ProtocolVersion:=pv1_1;
if not idHttp.Connected then
idHttp.Connect;

WriteLog('上传xml:'+xmlstr);
sends:=tstringlist.Create;
sends.Add(xmlstr);
idhttp.Post(url,sends,RStream);
Result:=RStream.DataString;
WriteLog('Http返回:'+Result);

[y_zp2010]

有没有高人在，是不是写的有问题？
java语句是这样的
conn.setRequestMethod("POST");
conn.setRequestProperty("Authorization", "Basic YWRtaW46YWRtaW4=" );
conn.setRequestProperty("Content-Type", "text/xml" );

[y_zp2010]

没人吗？

[y_zp2010]

IdHTTP1.Request.ContentType:='text/xml';
IdHTTP1.Request.ContentLength:=210;
IdHTTP1.Request.Connection:='Keep-Alive';
IdHTTP1.ProtocolVersion:=pv1_1;
IdHTTP1.Request.CustomHeaders.Values['Authentication'] := 'Basic MDowMDExMTExMTExMTE=';

改问题 已通过INDY9实现，代码如上，indy8实现比较困难，没研究透