TIdTCPServer (Indy) und TClientSocket

[Schwedenbitter]

Hallo,

ich stehe vor folgendem Problem:
ich benötige einen TCP-Server, der auf einem Linux-System mit wine laufen kann. Das funktioniert offenbar mit den Indys. Ich habe breits diesen Code gefunden, der fast funktioniert. Ich kann eine Verbindung herstellen zwischen dem Server-Programm und dem TClientSocket herstellen. Und Daten, die ich mit AContext.Connection.IOHandler.WriteLn('Willkommen'); vom Server sende, kommen am Client auch an.

Ich habe aber das Problem, dass es umgekehrt nicht klappt. Wenn ich also mit TClientSocket.Socket.SendText('Hello World'); etwas vom Client sende, kommt nichts beim Server an. Es wird noch nicht einmal das Ereignis TIdTCPServer.OnExecute(AContext: TIdContext); ausgelöst.

Kann mir jemand erklären, woran das liegt?
Falls ja, gibt es Abhilfemöglichkeiten?

Den Quellcode habe ich angehängt. Es sind meine Anfänge mit den Indys und ich habe mitbekommen, dass es da diverse Unterschiede in den Versionen gibt, die zu Problemen führen. bei diesem Projekt benutze ich Delphi XE5.

Gruß, Alex