Dateien Versenden mit Indy TCP

[jonny]

So ich hab ein klitzekleines Problem
und zwar hab ich das Beispiel von DataCool gelesen wie man Dateien über die TCP Komponente verschicken kann und ich fand es cool wie er das gelöst hat also mit der Anzeige der Übertragung und einfach mit allen. Hier ist der Thread. So jetzt tritt aber Folgendes Problem auf wenn ich die Datei mit Delphi 7 öffne und Compiliere (Bei der Compilierung keine Fehler) funktioniert das Programm nicht mehr genauer gesagt der Server tut nicht mehr. Es werden vom Client zum Server genau 20KB übertragen und dann friert der Server ein. Ich füge mal mein Projekt hier mit bei könnt ihr euch ja mal ansehen. Ich brauche unbedingt eine Lösung aber ich komme irgendwie nicht drauf woran es liegt. Bitte helft mir.