[Pytanie] menu główne

[Bobson.]

Witam.

Zrobiłem sobie takie menu głowne do bota i mam takie pytanie

jak zrobić aby

Misja>>mroczne lasy>>szczur

(chodzi mi o pozycje szczur )

uruchamiało przeglądarkę np run("chrome.exe")

 

tutaj macie moje menu

 

 

 

 
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=d:\bot\forma1.kxf
$Form1_1 = GUICreate("Form1", 615, 438, 192, 124)
$MenuItem1 = GUICtrlCreateMenu("&Misja")
$MenuItem2 = GUICtrlCreateMenu("Mroczne lasy", $MenuItem1)
$MenuItem3 = GUICtrlCreateMenuItem("Szczur", $MenuItem2)
$MenuItem4 = GUICtrlCreateMenuItem("Ryś", $MenuItem2)
$MenuItem5 = GUICtrlCreateMenuItem("Wilk", $MenuItem2)
$MenuItem6 = GUICtrlCreateMenuItem("Niedźwieź", $MenuItem2)
$MenuItem7 = GUICtrlCreateMenu("Port piratów", $MenuItem1)
$MenuItem8 = GUICtrlCreateMenuItem("Zbiegły niewolnik", $MenuItem7)
$MenuItem9 = GUICtrlCreateMenuItem("Skorumpowany żołdak", $MenuItem7)
$MenuItem10 = GUICtrlCreateMenuItem("Morderca", $MenuItem7)
$MenuItem11 = GUICtrlCreateMenuItem("Kapitan", $MenuItem7)
$MenuItem12 = GUICtrlCreateMenu("Mgielne góry", $MenuItem1)
$MenuItem13 = GUICtrlCreateMenuItem("Zbiegły rekrut", $MenuItem12)
$MenuItem14 = GUICtrlCreateMenuItem("Harpia", $MenuItem12)
$MenuItem15 = GUICtrlCreateMenuItem("Cerber", $MenuItem12)
$MenuItem16 = GUICtrlCreateMenuItem("Meduza", $MenuItem12)
$MenuItem17 = GUICtrlCreateMenu("Wilcza jama", $MenuItem1)
$MenuItem18 = GUICtrlCreateMenuItem("Dzika świnia", $MenuItem17)
$MenuItem19 = GUICtrlCreateMenuItem("Stado wilków", $MenuItem17)
$MenuItem20 = GUICtrlCreateMenuItem("Wilk alfa", $MenuItem17)
$MenuItem21 = GUICtrlCreateMenuItem("Wilkołak", $MenuItem17)
$MenuItem22 = GUICtrlCreateMenu("Lochy")
$MenuItem23 = GUICtrlCreateMenuItem("Walcz", $MenuItem22)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
 
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        
 
    EndSwitch
WEnd
 

 

 

z góry dzięki daje lajki

[kaje11]

 

 

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $MenuItem3

MsgBox(64, "Test", "Test")

EndSwitch

WEnd

[Bobson.]

 

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $MenuItem3
            MsgBox(64, "Test", "Test")
    EndSwitch
WEnd
 

Nie działa

i chyba nawet nie o to mi chodziło _

[kaje11]

Musisz podstawić moją pętlę pod twoją:

 

 

 

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=d:\bot\forma1.kxf
$Form1_1 = GUICreate("Form1", 615, 438, 192, 124)
$MenuItem1 = GUICtrlCreateMenu("&Misja")
$MenuItem2 = GUICtrlCreateMenu("Mroczne lasy", $MenuItem1)
$MenuItem3 = GUICtrlCreateMenuItem("Szczur", $MenuItem2)
$MenuItem4 = GUICtrlCreateMenuItem("Ryś", $MenuItem2)
$MenuItem5 = GUICtrlCreateMenuItem("Wilk", $MenuItem2)
$MenuItem6 = GUICtrlCreateMenuItem("Niedźwieź", $MenuItem2)
$MenuItem7 = GUICtrlCreateMenu("Port piratów", $MenuItem1)
$MenuItem8 = GUICtrlCreateMenuItem("Zbiegły niewolnik", $MenuItem7)
$MenuItem9 = GUICtrlCreateMenuItem("Skorumpowany żołdak", $MenuItem7)
$MenuItem10 = GUICtrlCreateMenuItem("Morderca", $MenuItem7)
$MenuItem11 = GUICtrlCreateMenuItem("Kapitan", $MenuItem7)
$MenuItem12 = GUICtrlCreateMenu("Mgielne góry", $MenuItem1)
$MenuItem13 = GUICtrlCreateMenuItem("Zbiegły rekrut", $MenuItem12)
$MenuItem14 = GUICtrlCreateMenuItem("Harpia", $MenuItem12)
$MenuItem15 = GUICtrlCreateMenuItem("Cerber", $MenuItem12)
$MenuItem16 = GUICtrlCreateMenuItem("Meduza", $MenuItem12)
$MenuItem17 = GUICtrlCreateMenu("Wilcza jama", $MenuItem1)
$MenuItem18 = GUICtrlCreateMenuItem("Dzika świnia", $MenuItem17)
$MenuItem19 = GUICtrlCreateMenuItem("Stado wilków", $MenuItem17)
$MenuItem20 = GUICtrlCreateMenuItem("Wilk alfa", $MenuItem17)
$MenuItem21 = GUICtrlCreateMenuItem("Wilkołak", $MenuItem17)
$MenuItem22 = GUICtrlCreateMenu("Lochy")
$MenuItem23 = GUICtrlCreateMenuItem("Walcz", $MenuItem22)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
 
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $MenuItem3
MsgBox(64, "Test", "Test")
EndSwitch
WEnd

 

 

 

Po kliknięciu pozycji 'Szczur' pojawia się MsgBox. Uruchomienie chrome podałeś jako przykład, więc dałem swój.

Podmień MsgBox, na ShellExecute("chrome.exe") i będzie tak jak chciałeś.