ServerSocket fehler?? Wenn es ein Fehler ist

[tomate007]

Nichts für ungut... aber laut meiner bescheidenen Meinung nach sind fehler in deinem Code, habe nun den genommen:

Delphi-Quellcode:

daten := Socket.ReceiveText;
      repeat
      p := Pos('#10',daten);   // Suche nach Befehlstrenner
      if p <> 0 then
      begin
      Status_Nachricht := Copy(daten, 1, p-1);  // einzelnen Befehl rausziehen
      Delete(daten, 1, p+2);  // Befehl aus Puffer löschen
      showmessage(Status_Nachricht);  // Befehl ausführen
      end;
      until p=0;