Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Посылка файла на сервер с помощью IdHttp... [D7, WinXP]


ilka ©   (2003-10-22 23:03:00) 

Надо переслать файл с IdHttp на IdHttpServer. Простые файлы(обычный txt) у меня перечылаются нормально проблема возникает когда пересылаются архивы.

//client
var:
Source: TMemoryStream;
Response: TStringStream;
//
Source.LoadFromFile("5.txt");
client.Post(" http://localhost:110", Source, Response);

//server
procedure TForm1.SERVERCommandGet(AThread: TIdPeerThread;
RequestInfo: TIdHTTPRequestInfo; ResponseInfo: TIdHTTPResponseInfo);
var
s:TStrings;
begin
s:=TStringList.Create;
s:=RequestInfo.Params;
s.SaveToFile("3.txt");


иногда при отправке возникакет ошибка
"project ... raised exception EConvertError with message "$kJ" is not a valid integer value"."
при чем сдесь <integer value>?

если даже ошибки не будет то данные в конце обрезаны.?
как исправить баг?


ilka   (2003-10-23 16:18:00) [1]

спасибо всем за помощь...

правельный ответ:
IdHttpServer получает данные методом DoExecute, потоковые данные записывались в TStringStriam -> вот он и обрезал данные

Всем спасибо всем пока.


Наверх

Титульная страница Поиск, карта сайта Написать письмо