TCPConnect bremst Message-Routine aus

    Hi,
    ich möchte während der Message-Routine einen Server per TCPConnect verbinden.
    Dies passiert in der Routine um bei Verbindungsverlust, diese wieder herzustellen.

    Nun ist das Problem, dass das Verbinden stellenweise bis zu 10sek dauert und das Programm in der Zeit nicht reagiert.

    Hat jmd ne Idee wie man das verhindern kann???

    Danke schonmal.
    Lg

    Beispiel:

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Include <Timers.au3>

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

    Global $Socket

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

    $hWnd = GUICreate("Test",150,200)
    $login = GUICtrlCreateButton("Login",10,10,50,20)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()

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

    If $msg = $GUI_EVENT_CLOSE Then Exit
    If $msg = $login Then
    Init()
    GUICtrlDelete($login)
    EndIf
    WEnd

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

    Func Init()
    TCPStartUp()
    $Socket = TCPConnect(TCPNameToIP("toc.oscar.aol.com"), 9898)
    _Timer_SetTimer($hWnd, 80, "GetMsg")
    EndFunc

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

    Func GetMsg($hWnd, $Msg, $iIDTimer, $dwTime)
    #forceref $hWnd, $Msg, $iIDTimer, $dwTime
    TCPRecv($Socket, 8192)
    EndFunc

    [/autoit]

    Hi,
    ich habe kein Problem mit dem Programm. Sofort nach dem Drücken des Buttons ist er wieder weg.....
    Wenn es bei dir "hängt" dann liegt es m.E. am Connect....
    ciao
    Andy

    /*EDIT*/ ggf hilft dir dieser Thread auch nicht weiter, aber es erklärt die (nicht vermeidbare) Wartezeit

    ciao
    Andy


    "Schlechtes Benehmen halten die Leute doch nur deswegen für eine Art Vorrecht, weil keiner ihnen aufs Maul haut." Klaus Kinski
    "Hint: Write comments after each line. So you can (better) see what your program does and what it not does. And we can see what you're thinking what your program does and we can point to the missunderstandings." A-Jay

    Wie man Fragen richtig stellt... Tutorial: Wie man Script-Fehler findet und beseitigt...X-Y-Problem

    Einmal editiert, zuletzt von Andy (8. Oktober 2009 um 14:02)