main menu help

[corey822]

G'day yall

ok i hope somone can help me here but ive created a program that has a menu bar up the top for example the file,help but i want to be able to link the submenus when clicked on to an help file that is external and not in the actual script.

CODE

#include <guiconstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Form1", 424, 64, 228, 180)

$MenuItem3 = GUICtrlCreateMenu("MenuItem3")

$MenuItem2 = GUICtrlCreateMenuItem("link this", $MenuItem3)

$MenuItem5 = GUICtrlCreateMenu("MenuItem5", $MenuItem3)

$MenuItem8 = GUICtrlCreateMenuItem("link this", $MenuItem5)

$MenuItem7 = GUICtrlCreateMenu("MenuItem7", $MenuItem5)

$MenuItem9 = GUICtrlCreateMenuItem("link this aswell", $MenuItem7)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

EndSwitch

WEnd

i hope that gives u an idea of wat i mean

just for the count i have searched the help file and forum but too no avail did i find anything i searched in programs but too no avail did i mangage to dld one that had the script set out so all the gui was in one spot

sorry for the truble

cheers C.W

[corey822]

bump

[PsaltyDS]

G'day yall

ok i hope somone can help me here but ive created a program that has a menu bar up the top for example the file,help but i want to be able to link the submenus when clicked on to an help file that is external and not in the actual script.

i hope that gives u an idea of wat i mean

just for the count i have searched the help file and forum but too no avail did i find anything i searched in programs but too no avail did i mangage to dld one that had the script set out so all the gui was in one spot

sorry for the truble

cheers C.W

Try it like this as a demo:

#include <guiconstants.au3>

$Form1 = GUICreate("Form1", 424, 64, 228, 180)
$Menu1 = GUICtrlCreateMenu("Menu1")
$MenuItem1_1 = GUICtrlCreateMenuItem("AutoIt Help", $Menu1)
$Menu2 = GUICtrlCreateMenu("Menu2", $Menu1)
$MenuItem2_1 = GUICtrlCreateMenuItem("AutoIt Beta Help", $Menu2)
$Menu3 = GUICtrlCreateMenu("Menu3", $Menu2)
$MenuItem3_1 = GUICtrlCreateMenuItem("Pick a help file", $Menu3)
GUISetState(@SW_SHOW)

Global $sAuotItReg = "HKEY_LOCAL_MACHINE\SOFTWARE\AutoIt v3\AutoIt"
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $MenuItem1_1
            $sAutoItInstallDir = RegRead($sAuotItReg, "InstallDir")
            If $sAutoItInstallDir <> "" Then ShellExecute($sAutoItInstallDir & "\AutoIt3.chm")
        Case $MenuItem2_1
            $sAutoItBetaDir = RegRead($sAuotItReg, "betaInstallDir")
            If $sAutoItBetaDir <> "" Then ShellExecute($sAutoItBetaDir & "\AutoIt3.chm")
        Case $MenuItem3_1
            $sHelpFile = FileOpenDialog("Help File", "", "Compiled Help Files (*.chm)|All Files (*.*)", 1)
            If Not @error Then ShellExecute($sHelpFile, "", "", "Open")
    EndSwitch
WEnd

P.S. You bumped after only 37 minutes...?

That's a bad habit that could get you into trouble around here.

Edited December 26, 2007 by PsaltyDS

[corey822]

Try it like this as a demo:

#include <guiconstants.au3>

$Form1 = GUICreate("Form1", 424, 64, 228, 180)
$Menu1 = GUICtrlCreateMenu("Menu1")
$MenuItem1_1 = GUICtrlCreateMenuItem("AutoIt Help", $Menu1)
$Menu2 = GUICtrlCreateMenu("Menu2", $Menu1)
$MenuItem2_1 = GUICtrlCreateMenuItem("AutoIt Beta Help", $Menu2)
$Menu3 = GUICtrlCreateMenu("Menu3", $Menu2)
$MenuItem3_1 = GUICtrlCreateMenuItem("Pick a help file", $Menu3)
GUISetState(@SW_SHOW)

Global $sAuotItReg = "HKEY_LOCAL_MACHINE\SOFTWARE\AutoIt v3\AutoIt"
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $MenuItem1_1
            $sAutoItInstallDir = RegRead($sAuotItReg, "InstallDir")
            If $sAutoItInstallDir <> "" Then ShellExecute($sAutoItInstallDir & "\AutoIt3.chm")
        Case $MenuItem2_1
            $sAutoItBetaDir = RegRead($sAuotItReg, "betaInstallDir")
            If $sAutoItBetaDir <> "" Then ShellExecute($sAutoItBetaDir & "\AutoIt3.chm")
        Case $MenuItem3_1
            $sHelpFile = FileOpenDialog("Help File", "", "Compiled Help Files (*.chm)|All Files (*.*)", 1)
            If Not @error Then ShellExecute($sHelpFile, "", "", "Open")
    EndSwitch
WEnd

P.S. You bumped after only 37 minutes...?

That's a bad habit that could get you into trouble around here.

lol at 2:07 am everything looks good to do

hmmm still doesnt seem to be clicking in my head

Edited December 26, 2007 by corey822