Hallo,
Ich bekomme bei dem
Indy TCPClient einen Fehler, den ich mir nicht erklären kann...
Delphi-Quellcode:
procedure Tfo_main.bt_nachrichtsendenClick(Sender: TObject);
var
nachrichtenport: integer;
host, textout: string;
begin
nachrichtenport:=ini01.ReadInteger('einstellungen','stdnachrichtenport',50000);
host:=ini01.ReadString('einstellungen','stdhost','hostname');
tcpclientnachricht.Port:=nachrichtenport;
tcpclientnachricht.Host:=host;
tcpclientnachricht.Connect;
if tcpclientnachricht.Connected=true then //Im Debugmodus ist das Programm in dieser Zeile abgeschmiert
begin
textout:=memo_nachricht.Text;
tcpclientnachricht.IOHandler.WriteLn(textout);
tcpclientnachricht.Disconnect;
end;
end;
Und zwar kommt beim klicken auf den Button ein einfacher Error mit dem Text: "Socket Error #11004"
Was stimmt denn da nicht??
Infos:
-> Der Server ist aktiv auf Port 50000
-> Der Client sollte auch Port 50000 benutzen
-> Beim Server läuft noch ein zweiter TCPServer auf Port 60000 <- kann das der Grund sein...
Naja auf jeden Fall hat die Vorversion des Programms noch funktioniert und jetzt ind er neuen nicht mehr....
