В инете есть "куча" примеров по тому как передавать файлы по сети с idTCPClient на idTCPServer...
Есть рабочий пример:
OnExecute сервера:
AnsiString C_Path = "Downloads\\" + ExtractFileName(AContext->Connection->Socket->ReadLn());
TFileStream *f;
if(!FileExists(C_Path)){
f = new TFileStream(C_Path,0xffff);
}
else
{
f = new TFileStream(C_Path,0xffff);
}
AContext->Connection->Socket->ReadStream(f,-1,true);
delete f;
On SendButton Клиента
IdTCPClient1->Connect();
IdTCPClient1->Socket->WriteLn("C:\\my.dll");
TFileStream *fs = new TFileStream("C:\\my.dll", 0x0);
IdTCPClient1->Socket->WriteBufferOpen();
IdTCPClient1->Socket->Write(fs);
IdTCPClient1->Socket->WriteBufferClose();
delete fs;
IdTCPClient1->Disconnect();
НО как сделать обратную передачу с Сервера на клиент?Ведь в idTCPClient нет события OnExecute...