🚀 go-pugleaf

Remy Lebeau (TeamB) �����:
> <zetsoft@mail.ru> wrote in message
> news:op.tlqplrqfc1j1tk@cheater.arc-net.ru...
> 
>> On the server which I work with were the Headers were completely
>> taking off.
> 
> What are you referring to exactly?  Please be more specific.
> 
>> Now my program gives a lot of errors now and doesn`t work.
> 
> Please provide more details.  What does your code actually look like?
> What error are you seeing?  Where is it occuring exactly?
> 
> 
> Gambit
> 
> 
Code:
	TIdHTTP*html= new TIdHTTP(NULL);
	TStringList*out= new TStringList;
	TStream *cstr=new  TMemoryStream() ;

	html->Request->Accept = "text/html, */*" ;
	html->Request->UserAgent="Opera/8.50 (Windows NT 5.1; U; ru)";
	html->Request->BasicAuthentication =1;
	html->AuthRetries=1;
	html->ConnectTimeout =FConnectTimeOut;
	html->ReadTimeout 	 =FReadTimeOut;
	
	if(UseProxy)
	{
			html->ProxyParams-> ProxyPassword 	= svProxy.Pass;
			html->ProxyParams-> ProxyPort       = svProxy.Port;
			html->ProxyParams-> ProxyServer		= svProxy.Server;
			html->ProxyParams-> ProxyUsername   = svProxy.UserName;
			if(svProxy.UserName!="")
				html->ProxyParams->BasicAuthentication =1;
	}
		html->Post(Url,Data,cstr);
		if(cstr->Size)
		{
			cstr->Seek(0,soFromBeginning);
			out->LoadFromStream(cstr);

	
		}



		delete html;
		delete cstr;

The error always return a first string of html-page, look like 
"<body>bla-bla<html>..."
-- 

Regards.
  - Cheater