Forum: Netzwerke
Delphi
by hugo1990,
2. Mär 2008
Das der Code noch nicht ganz perfekt ist, ist mir schon klar, das habe ich noch nicht weiter gemacht gehabt, da der Fehler der aufgetretten ist gar nichts damit zu tun hatte. Ich wollte erst den Fehler behoben haben, bevor ich das dann weitermache. Aber trotzdem danke für den Hinweis.
Forum: Netzwerke
Delphi
by hugo1990,
1. Mär 2008
Ok, das ganze liegt nicht am Quellcode sondern am Rechner oder Betriebssytem. Ich habe das ganze nähmlich jetzt auf meinem alten rechner mit XP getestet und der Fehler tritt nicht auf, bei meinem neuen mit Vista tritt der Fehler auf.
Edit: Ich habs, es liegt an der Windows-Firewall, die hab ich nämlich auf dem Vista-Rechner laufen, auf dem XP-Rechner hab ich ne andere. Als ich jetzt die...
Forum: Netzwerke
Delphi
by hugo1990,
29. Feb 2008
Als Empfangsereignis nutze ich vom Server das OnClientRead-Ereignis, das müsste doch richtig sein, oder liege ich da falsch?
Forum: Netzwerke
Delphi
by hugo1990,
28. Feb 2008
Also ich habe das jetzt so umgeschrieben, das es Stückenweise verschickt wird, aber der Fehler tritt trotzdem noch bei großen Dateien (so um die 90 KB, also eigentlich nicht wirklich groß) auf. Also es tritt der Socket-Fehler 10053 auf, was woll so viel bedeutet, wie das der Server den Clienten gekickt hat, aber warum, ist das so ne art timeout?
Edit: Ok ich habe jetzt nochmal ein wenig...
Forum: Netzwerke
Delphi
by hugo1990,
27. Feb 2008
Wenn ich folgendermaßen mit TClientSocket und TServerSocket Dateien versende:
Client:
procedure TFileClient.SendData;
begin
FClient.Socket.SendStream(FileStream);
end;
Server:
procedure TFileServer.ReceiveData(Sender: TObject; Socket: TCustomWinSocket);
var