Kein TCP Empfang auf Android

[Hallo-Delphi]

Hallo @all

Ich versuche grade eine App zu schreiben die Daten von einem Programm empfangen und auch senden soll (Embarcadero® RAD XE7).
Wenn ich das Programm auf Windows starte geht alles, Daten werden versendet und es kommen auch welche an.
Wenn ich das Programm auf Android starte gehen Daten zum Server aber es kommen keine Daten auf Android an.

Code:

procedure TForm1.IdTCPServer1Execute(AContext: TIdContext);
begin
Label1.Text:= AContext.Connection.IOHandler.ReadLn();
ShowMessage(Label1.Text);
end;

Wenn ich ein Stopp in Debug setze an der stelle Label wird diese Procedure nicht durchlauf auf Android auf Windows schon.
Wo kann der Fehler liegen ?

Ich danke für eure Mühe.

Mfg