hi ertselle gerade einen chat und hab das editfenster mit read only gemacht schaffe es jezt aber nicht das er nach jedem senden eine neue zeile anfängt hoffe ihr könnt mir helfen hier mal der skript vom clienten
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$KompletterChat = ""
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 630, 435, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 625, 409, BitOR($GUI_SS_DEFAULT_EDIT,$ES_READONLY))
$Input1 = GUICtrlCreateInput("", 0, 408, 553, 21)
$Button1 = GUICtrlCreateButton("senden", 552, 408, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
TCPStartup()
[/autoit] [autoit][/autoit] [autoit]$mainsocket = TCPListen("127.0.0.6", 4321)
[/autoit] [autoit][/autoit] [autoit]While 1
$socket = TCPConnect("127.0.0.2", 4321)
$socket2 = TCPConnect("127.0.0.3", 4321)
$acceptedSocket = TCPAccept($mainsocket)
If $acceptedSocket <> -1 Then
$receivedData = TCPRecv($acceptedSocket, 1024)
$KompletterChat = $KompletterChat & $ReceivedData
GUICtrlSetData($Edit1, $KompletterChat)
TCPCloseSocket($acceptedSocket)
EndIf
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$ReadInput = GUICtrlRead($Input1)
$sendedBytes = TCPSend($socket2,"Nachricht")
$sendedBytes = TCPSend($socket, $ReadInput)
EndSwitch
WEnd
