Hallo,
habe Probleme mit einer ClientSocket Verbindung in Delphi. Ich versuche auf einen Chatserver eines Games zu connecten, per PHP klappt es auch soweit, nur wenn ich dann versuche mit dem Delphi Socket eine Verbindung aufzubauen, bekomme ich keine antwort vom Server.
Ich habe keine Ahnung warum ich keine Daten beziehen kann per Delphi, da es mit PHP klappt.
Code:
TCP/
IP Verbindung
SOCKET >> Resource id #2 >> OK.
Versuche, eine Verbindung zu 'chat.dt.funcom.com' auf Port '7013' aufzubauen >> OK.
Receive >> " f1d52ec909af0c55739af5e823b5ccc8
Socket schliessen >> OK.
Delphi-Quellcode:
procedure TForm1.btnClick(Sender: TObject);
begin
CSocket.Port := 7013;
CSocket.Host := 'chat.dt.funcom.com';
CSocket.Open;
end;
procedure TForm1.CSocketConnect(Sender: TObject; Socket: TCustomWinSocket);
begin
Log.Items.Add('[' + TimetoStr(now) + '] --> Connection established');
end;
procedure TForm1.CSocketConnection(Sender: TObject; Socket: TCustomWinSocket);
begin
Log.Items.Add('[' + TimetoStr(now) + '] --> Connection to ' + CSocket.Port);
end;
procedure TForm1.CSocketRead(Sender: TObject; Socket: TCustomWinSocket);
begin
Log.Items.Add('[' + TimetoStr(now) + '] --> Receive --> ' + CSocket.ReceieText');
end;
Da kommt nun aber garnichts, eigentlich müsste er wie oben den Key schicken, oder versteh ich da was falsch? Wenn ich dagegen die Daten z.B. eines
IRC-Servers eintrage bekomme ich Antwort.
Wäre nett wenn mir da jemand helfen könnte.