Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Indy 10 TCP Client Server -> MemoryStreams übertragen (https://www.delphipraxis.net/170904-indy-10-tcp-client-server-memorystreams-uebertragen.html)

bernhard_LA 23. Okt 2012 15:25

AW: Indy 10 TCP Client Server -> MemoryStreams übertragen
 
für svn > tortoise installieren und dann der Anleitung im Projekt befolgen.... bin mittlerweile ein großer Fan von svn + Tortoise

Thread Safe : welche Punkte im Code sind Dir aufgefallen ?
VCL Ausgaben im Indyserver.execute muss ich noch entfernen
mein ziel ist schon Thread Safe samples zu erstellen

stahli 23. Okt 2012 23:24

AW: Indy 10 TCP Client Server -> MemoryStreams übertragen
 
Liste der Anhänge anzeigen (Anzahl: 1)
So, ich bin doch wieder bei Indy. Das erscheint mir komfortabler und das Problem mit der GUI-Syncronisation besteht bei der flachen Variante ja auch.

Die Übertragung mit dem Ende-Kennzeichen ist gelöst.
Die Lösung habe ich hier gefunden: http://stackoverflow.com/questions/1...nd-line-breaks
-> IdTCPClient.IOHandler.Write Ln (S + #0);
Man darf beim Schreiben nicht WriteLn verwenden, da sonst ein #13#10 angehängt wird. Beim Lesen wird dann bis zum Endekennzeichen gelesen und der Zeilenumbruch verbleibt im Puffer. Dadurch hakt im weiteren Verlauf die Kommunikation.
In gewisser Weise macht das Sinn. ;)

Die Übertragung per Stream funktioniert grundsätzlich auch - ABER!
Die Größe des eingehenden Streams kann ich noch nicht ermitteln. Im Test kürze ich den Steam jetzt auf 14 Byte und lese 14 Byte aus. So ist erkennbar, dass die Übertragung perfekt funktioniert.
Jetzt müsste ich noch eine Möglichkeit finden, InputStream.Size vor dem Lesen des Streams zu ermitteln. Dann wären alle Übertragungsvarianten fertig.


Die syncronisierte Ausgabe in die Memos werde ich dann in einem Tread versuchen, der dazu auf die Syncronisation mit dem MainThread wartet.

Bummi 24. Okt 2012 07:18

AW: Indy 10 TCP Client Server -> MemoryStreams übertragen
 
Du schickst einfach vorneweg die Länge des Streams z.B. in einem DWord/Cardinal und liest das als erstes aus.

bernhard_LA 24. Okt 2012 07:29

AW: Indy 10 TCP Client Server -> MemoryStreams übertragen
 
Das problem mit de Länge des Streams sollte eigentlich in meinem samples gelöst sein

(einfach mal das Video Play Badminton) als *.swf Datei ansehen


Zum Thema VCL syncro folgender Link http://stackoverflow.com/questions/9...ng-application

In meiner eigene app habe ich ein TTHread.syncronize(nil, meineGUIupdate); eingebaut
Dieses Thema ist heute noch nicht in den samples eingebaut

bernhard_LA 24. Okt 2012 17:26

AW: Indy 10 TCP Client Server -> MemoryStreams übertragen
 
in den source forge INDY 10 TCP Client Server Demos ist die ganz GUI interaction immer mit IDNotify( GUIprocedure) ; abgeschottet. vermutlich reicht es aus nur


Delphi-Quellcode:
TCPserver.Onexecute(----);
     

     .....
    GUIProcedure;
    TTHreadSyncronize(nil, GUIProcedure);
    ....

end;
als Strickmuster zu befolgen.

stahli 24. Okt 2012 21:56

AW: Indy 10 TCP Client Server -> MemoryStreams übertragen
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo Bernhard,

vielen Dank schon mal für Deine Demos!
Ich habe mir mal 4 Funktionen ausgeliehen ;-)

Die 4 Varianten der Datenübertragung funktionieren jetzt einwandfrei. :)

Die GUI-Syncronisation habe ich jedoch noch nicht hin bekommen.
Eine IdAntiFreeze verhindert zwar ein Einfrieren, verzögert aber den gesamten Ablauf EXTREMST.

Deinen Hinweis kann ich leider nicht genau einordnen. Kannst Du das konkretisieren?

Ich hätte von mir aus einen Thread gestartet, dem ich im Execute einen "Modus" und einen "String" übergebe.
Im Syncronisize würde ich den String dann je nach Modus an eine der 4 Log-Funktionen geben.
Ist das zu kompliziert?

bernhard_LA 24. Okt 2012 22:28

AW: Indy 10 TCP Client Server -> MemoryStreams übertragen
 
ich habe mich bei meiner Lösung an diesem Thema orientiert http://stackoverflow.com/questions/1...-safe-vcl-code;

Der Trick war bei mir TTHtread.syncronize ( Nil -> hält den server execute Thread an, Meine GUI Funktion -> bitte zuerst hier alle Ausgaben); ich habe meine Demos noch nicht mit dieser Technik getested, ich verwende dieser Schema bei meiner Produktiven Anwendung.

Kennst du diesen link http://stackoverflow.com/questions/9...ng-application

stahli 25. Okt 2012 21:07

AW: Indy 10 TCP Client Server -> MemoryStreams übertragen
 
Liste der Anhänge anzeigen (Anzahl: 2)
SEHR SCHÖN!

Also jetzt funktioniert (fast) alles wunderbar und ist m.E. ein sehr schönes Demoprojekt, um Indy-Streams nachzuvollziehen.

Zwei kleine Schönheitsmankos:
-> InfoClientIn wird an 4. Stelle aufgerufen, aber schon an zweiter dargestellt. (Das ist aber ja in einer realen Client/Server-Anwendung kein Problem.)
-> Die MemoServerOut.Scrollbar wird nicht an´s Ende gesetzt.

Die VCL-Syncronisation für Client-Infos ist nicht erforderlich, kann aber dennoch durchgeführt werden.
Syncronisation ist immer beim Server notwendig wenn man VCL-Ausgaben durchführt.

Jetzt kann ich mal schauen, ob ich das so auf mein eigentliches Projekt umsetzen kann... :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:18 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz