Einzelnen Beitrag anzeigen

Benutzerbild von Aenogym
Aenogym

Registriert seit: 7. Mär 2004
Ort: Schwerin
1.089 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: TidTCPServer/TidTCPClient und Delphi 7: freezing...

  Alt 19. Sep 2004, 20:48
ja, er empfängt die ersten 20KB (die datei wird immer in 20KB-stückchen nacheinander gesendet).

der code ist ziemlich lang....

der client sendet per:
Delphi-Quellcode:
TcpClient.OpenWriteBuffer;
TcpClient.WriteStream(TempMemoryStream,true,true);
TcpClient.CloseWriteBuffer;
und der server empfängt im onExecute so:
AThread.Connection.ReadStream(TempMemoryStream); in beiden fällen bezeichnet TempMemoryStream einen memorystream (wer hätte es gedacht...).

edit: am code ist nichts falsch. compiler kompiliert ohne murren und unter delphi 5 funktioniert es nach datacools aussage perfekt...

Aenogym
Steffen Rieke
Was nicht buzzt, wird buzzend gemacht!
http://blog.base-records.de
http://www.base-records.de
  Mit Zitat antworten Zitat