Problem mit switch/case und TCPSend

    hi leute,

    ich hab das, dass wenn ich dne befehl tcpsend in einer switch/case schleife schreibt der befehl TCPSend nich funzt. wenn ich jedoch TCPSend einfach so ins script schreibe also ohne shcleife das funzt es. :(

    Spoiler anzeigen
    [autoit]


    #include <inet.au3>
    #include <GUIConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 326, 241, 193, 125)
    $Edit1 = GUICtrlCreateEdit("", 8, 8, 313, 193)
    GUICtrlSetData(-1, "Edit1")
    $Input1 = GUICtrlCreateInput("Input1", 8, 208, 217, 21)
    $Button1 = GUICtrlCreateButton("Button1", 248, 208, 75, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    [/autoit] [autoit][/autoit] [autoit]

    TCPStartup()

    [/autoit] [autoit][/autoit] [autoit]

    $Connect = TCPConnect(_GetIP(),6667)
    ;wenn ich die folgende schleife weg lass und hier TCPSend eintrage das funzt es.
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    _Close()
    Case $Button1
    TCPSend($Connect,"MSG|hallo")
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _Close()
    TCPCloseSocket($Connect)
    TCPShutdown()
    Exit
    EndFunc ;==>_Close

    [/autoit]

    Einmal editiert, zuletzt von .::Mignon::. (19. Januar 2008 um 13:39)

    nene, die is deklariert hab ich hier jetz nur weg gelassen. aber ich kann sie da gerne noch mal anhängen (siehe ersten post)