hab mir selbst geholfen

[gandime]

so
ich hab mir jetzt selbst geholfen

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  FStream: TFileStream;
begin
  FStream := TFileStream.Create('C:\client.jpg', fmOpenRead);
  idtcpclient.Connect;
  try
    idtcpclientIOHandler.Write(Fstream,0,true);
  finally
    idtcpclient.Disconnect;
  end;
  FreeAndNil(FStream);
end;


procedure TForm1.idtcpserverExecute(AContext: TIdContext);
var
  FSTream: TFileStream;
begin
  FStream := TFileStream.Create('C:\server.jpg', fmCreate);
  try
    AContext.connection.IOHandler.ReadStream(fstream);
  finally
    AContext.connection.Disconnect;
  end;
  FreeAndNil(FStream);
end;

fals wer das selbe prob hatte hilft das hier hoffendlich

[Bernhard Geyer]

Ich denke bei diesem Titel kommt keiner darauf was du eigentlich gelößt hast.

Also bitte dem Thread einen eindeutigen Titel geben

[MaBuSE]

Zitat von Bernhard Geyer:

Ich denke bei diesem Titel kommt keiner darauf was du eigentlich gelößt hast.
Also bitte dem Thread einen eindeutigen Titel geben

Ich vermute wollte auf folgenden Thread antworten, hat aber aus Versehen den falschen Button erwischt und so ein neues Thema eröffnet.

Beitrag: daten via tcp indy 10 verschicken?

[gandime]

huch hab mich verklickt ich hatte schonmal nen tread aufgemacht und wollte auf mich selber antworten das ich das selber gelöst habe

http://www.delphipraxis.net/internal...=580902#580902

[mleyen]

Moin,

sobald ich den Code ausführe schmeißt der Client folgende Fehlermeldung:

_______________________________
Application.Name
_______________________________
Socket Error # 10053
Software caused connection abort.
_______________________________
[mbOK]
_______________________________

Und dabei diconnectet der Client auch noch.

Die Datei wird vom Server angelegt und ist dann dauerhaft 0KB groß, also nix drin, wenn ich versuche dann die zu löschen greift der Server noch auf die Datei zu, obwohl der Client längst disconnected ist.


Weiß jemand woran das liegen könnte? (Client und Server laufen auf dem gleichen PC)

Edit:
Arg hab den Fehler schonmal gefunden: Beim Server wurd noch ReadLN anstatt ReadStream aufgerufen!

[Christian Seehase]

Moin Zusammen,

damit's nicht völlig durcheinander geht, dann bitte, bei Bedarf, im Ursprungsthread weitermachen.
Danke.

Ich mach' dann hier mal zu.