serg557

Тема закрыта, решение нашлось благодаря теме в соседней ветке. приведу весь кусок кода- может спасу кому-то день 
#include <IdURI.hpp> ... 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=TIdURI::URLDecode(HTTP1->Post("http://...", PostFile)); Memo1->Text=SL2->Text; PostFile->Free(); SL2->Free(); HTTP1->Request->ContentType="application/x-www-form-urlencoded"; изменение в 11 строке и добавление include

Выдавал  клиент, но спасибо  krapotkin -натолкнул на мысль что компоненты IdTCPClient и IdTCPServer тут не причем и искать дальше.
Нашел компонент - IdHTTP - который действительно неправильно формировал запрос.
А так компоненты IdTCPClient и IdTCPServer  полностью адекватно друг с другом связываются.
Так что тема закрыта.

Вопрос решен!
Всем спасибо за советы.
Конечный кусок кода прилагаю-вдруг кому пригодится.
String Page; Form1->Page=IdHTTP1->Get("http://minfin.com.ua/currency/mb/"); Page.Delete0(0,Page.Pos0("<td class=\"active\">")+20); Memo1->Text=Page.SubString0(0,Page.Pos0("<")-1);