Всем приятного времени суток-столкнулся собственно с проблемой при загрузке файла на сервер ответ выдается в кодировке ISO-8859-1, которая в программе естественно не воспринимается.
TStringList *SL2= new TStringList;
SL2->Clear();
OpenDialog1->Execute();
TIdMultiPartFormDataStream *PostFile= new TIdMultiPartFormDataStream;
PostFile->Clear();
PostFile->AddFormField("FileName",ExtractFileName(OpenDialog1->FileName));
PostFile->AddFile("Filedata",OpenDialog1->FileName);
PostFile->AddFormField("Upload","Submit Query");
SL2->Text=HTTP1->Post("http://...", PostFile);
Memo1->Text=SL2->Text;
PostFile->Free();
SL2->Free();
HTTP1->Request->ContentType="application/x-www-form-urlencoded";
Отсюда два вопроса: есть ли возможность штатными средствами перекодировать ISO-8859-1 в UTF-8, или как-то изменить кодировку
HTTP1->Request->ContentType="multipart/form-data; boundary= --";
запрос веб-браузера
Запрос IdHTTP
Пример ответа сервера
Можно конечно сделать запрос на онлайн сервис - но как -то это