Probiers doch mal mit den WinSock-Komponenten und dann als Client:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var FStream:TFilestream;
begin
FStream:=TFileStream.Create('C:\Test1.txt',fmOpenRead);
ClientSocket1.Socket.SendStream(FStream);
end;
Julian J. Pracht