TCP Chat Hilfe/Tipps

Naja, du hast unn�tige Variablen / Abfragen, Platzverbrauch.

Warum nicht aus

Code:

Global  $iPort,$iSocket1, $iSocket

$iPort= "XXXX"
$iSocket1 = -1
$iSocket = -1

einfach

Code:

Global $iPort = "XXXX", $iSocket1 = -1, $iSocket = -1

machen, oder aus

Code:

if  TCPSend($iSocket1,"x"&StringReplace(GUICtrlRead($InputLabel),Chr(1),"")&Chr(1)) == 0

einfach

Code:

If Not TCPSend($iSocket, "x" & StringReplace(GUICtrlRead($InputLabel), Chr(1), "") & Chr(1)) Then ;...