Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Problem z buttonami


Rekomendowane odpowiedzi

Opublikowano

Pisałem na zagranicznym forum, tam mi jakos zbytnio nie potrafią pomóc. Może tu uda mi się zdobyć trochę informacji.

Mam taki skrypt:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 310, 437, 345, 194)
$Button2 = GUICtrlCreateButton("Pauza", 80, 128, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Exit", 80, 70, 75, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Count", 80, 95, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Global $i
Global $fPaused = False
HotKeySet("{p}", "_Pause")
Func _Pause()
    $fPaused = Not $fPaused
    If Not $fPaused Then
        ToolTip("Program is running", 0, 0)
        GUICtrlSetData($Button2, "Pause")
    Else
        ToolTip("Program is pause.", 0, 0)
        GUICtrlSetData($Button2, "Run")
    EndIf
    While $fPaused
        Switch GUIGetMsg()
            Case $Button2
                _Pause()
            Case $Button3
                _Exit()
            Case $Button4
                ToolTip("You can't run script while program is paused",0,0)
        EndSwitch
    WEnd
EndFunc   ;==>_Pause

Func _Count()
    While 1
        $i = $i+1
        ToolTip("Time: "&$i,0,0)
        sleep(1000)
    wend
EndFunc

Func _Exit()
    Exit
EndFunc   ;==>_Exit
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $Button2
            _Pause()
        Case $Button3
            _Exit()
        Case $Button4
            _Count()
    EndSwitch
WEnd

Przykładowy. No i jak widać są 3 guziki. Chce zrobić tak że jeżeli klikne guzik pause to skrypt jest pauzowany i wyswietlany komunikat. W tym czasie nie można kliknąc buttonu Count. To co napisałem wyżej już działa. Problem pojawia się gdy chcę kliknąć Count to zeby można było również kliknąć pause i exit w celu wyjscia lub zapauzowania w trakcie robienia tej funkcji Count. da rade?

Osobiście pomagam tylko na PW lub e-mail


-----------------------------------------------------------------


https://github.com/smietanka

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...