Delphi ---POST запрос idHTTP ---Не отправляет спец символы, как исправить?
delphi 2009
проблема в спец символах, которые почему то обрабатываются
в итоге запрос не доходит и не работает
функция отправки
function TForm1.SendData(url:string;url_str:string):string;
var
data: TStringStream;
dump:TStream;
dump_txt:TStringList;
otv:string;
begin
RandHeader;
//dump := TStringStream.Create('', TEncoding.UTF8);
dump_txt:=TStringList.Create;
dump:=TMemoryStream.Create;
otv:='';
IdHTTP1.Request.ContentType:='application/x-www-form-urlencoded; charset=UTF-8';
data:=TStringStream.Create;
data.WriteString(url_str);
try
IdHTTP1.Post(url,data,dump);
except
end;
dump.Seek(0, soFromBeginning);
dump_txt.LoadFromStream(dump);
otv:=dump_txt.Text;
dump.Free;
dump_txt.Free;
data.Free;
SendData:=otv;
end;
отправка запроса
SendData('http://site.xx/',
'&url='+url+
'&str_title='+str_title+
'&str_price='+str_price+
'&str_logo='+str_logo+
'&str_company='+str_company+
'&str_name='+str_name+
'&str_phone='+str_phone);
Смотрите вот тут