Nabend,
ich möchte ein simples Tool coden, das via
TCP Verbindung RCON Befehle an meinen Server sendet.
Dazu folgender Code:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var Antwort: string;
begin
idTCPClient1.Host := '46.XX.211.XX';
idTCPClient1.Port := 27015;
idTCPClient1.Connect;
//Antwort := idTCPClient1.IOHandler.ReadLn();
//showmessage(Antwort);
idTCPClient1.IOHandler.WriteLn('#255#255#255#255 status');
Antwort := idTCPClient1.IOHandler.ReadLn();
showmessage(Antwort);
idTCPClient1.Disconnect;
end;
Doch wenn ich auf den Button 2 klicke, bekomme ich sofort die Meldung "Die Verbindung wurde erfolgreich geschlossen".
Ohne auch nur einmal eine Messagebox zu bekommen.
Es liegt an der Zeile "Antwort := idTCPClient1.IOHandler.ReadLn();".
Könnt ihr mir verraten, warum ich keine Antwort vom Server bekomme, bzw. wieso die Verbindung an dieser Stelle schon geschlossen wird?