Bräuchte mal wieder hilfe bei Main Menu aus einer ini laden

Sirocool

Und zwar haut das nicht so hin bei mir mit den unterbefehlen der ladet nur das hauptmenü oben und mach das hauptmenü als unter befehle.

.ini

Spoiler anzeigen

Code

[Datei]
1=Speichern
2=Beenden


[Extra]
1=download


[Help]
1=Support

Alles anzeigen

Script

Spoiler anzeigen

[autoit]

#cs ----------------------------------------------------------------------------

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

AutoIt Version: 3.3.6.1
Author: myName

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

Script Function:
Template AutoIt script.

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

#ce ----------------------------------------------------------------------------

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

; Script Start - Add your code below here

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

$INI = @ScriptDir & "\tab.ini"

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

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 318, 126, 192, 124)
$Menu = IniReadSectionNames ($INI)
$MenuItem1 = GUICtrlCreateMenu($Menu[1])
$Tabmenu = $Menu[1]
For $1 = 1 To $Menu[0]
GUICtrlCreateMenuItem($Menu[$1], $MenuItem1)
GUICtrlCreateMenuItem("", $MenuItem1)
Next
GUICtrlCreateMenu("|")
GUICtrlSetState(-1, $GUI_DISABLE)
$MenuItem2 = GUICtrlCreateMenu($Menu[2])
GUICtrlCreateMenu("|")
GUICtrlSetState(-1, $GUI_DISABLE)
$MenuItem3 = GUICtrlCreateMenu($Menu[3])
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $1
MsgBox(16,"test","dies ist ein test")
Case $1+1
MsgBox(16,"test","dies ist ein test 2")

EndSwitch
WEnd

[/autoit]

**autoBert**

Hallo sirocool,

du kannst es so machen:

Spoiler anzeigen

[autoit]

#cs ----------------------------------------------------------------------------

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

AutoIt Version: 3.3.6.1
Author: myName

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

Script Function:
Template AutoIt script.

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

#ce ----------------------------------------------------------------------------

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

; Script Start - Add your code below here

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

$INI = @ScriptDir & "\tab.ini"

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

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <array.au3>

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 318, 126, 192, 124)
$Menu = IniReadSectionNames ($INI)
Dim $MenuItem[$Menu[0]]
_ArrayDisplay($Menu)
$Tabmenu = $Menu[1]
For $1 = 1 To $Menu[0]
$MenuItem[$1-1] = GUICtrlCreateMenu($Menu[$1])
_CreateSub($MenuItem[$1-1],$Menu[$1])
Next
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $1
MsgBox(16,"test","dies ist ein test")
Case $1+1
MsgBox(16,"test","dies ist ein test 2")
case Else
if $nMsg > $1 then MsgBox(16,"test","dies ist ein test " & $nMsg) ;zum austesten welche ID das Item hat
EndSwitch
WEnd

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

Func _CreateSub($idMenu,$sName)
$Sub =IniReadSection($INI,$sName)
_ArrayDisplay($Sub)
for $2 = 1 to $Sub[0][0]
GUICtrlCreateMenuItem($Sub[$2][1],$idMenu)
Next
EndFunc

[/autoit]

Edit: Skript ausgetauscht

mfg (Auto)Bert

Sirocool

,deine Version war schneller wollte meine version gerade rein machen und sagen das es gelöst ist
Jetzt kann ich auch mein Browser mal nach lager zeit wieder weiter machen mit den neuen Wissen.

Script

Spoiler anzeigen

[autoit]

#cs ----------------------------------------------------------------------------

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

AutoIt Version: 3.3.6.1
Author: myName

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

Script Function:
Template AutoIt script.

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

#ce ----------------------------------------------------------------------------

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

; Script Start - Add your code below here

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

$INI = @ScriptDir & "\tab.ini"

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

Global $Sprache = "datei"
Dim $Obj[3]
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 318, 126, 192, 124)
$Menu = IniReadSectionNames($INI)
$MenuItem1 = GUICtrlCreateMenu($Menu[1])
$Tabmenu = $Menu[1]
For $1 = 1 To $Menu[0]
GUICtrlCreateMenuItem(IniRead($INI,$Sprache,$1 ,""),$MenuItem1)
Next

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

GUICtrlCreateMenu("|")
GUICtrlSetState(-1, $GUI_DISABLE)
$MenuItem2 = GUICtrlCreateMenu($Menu[2])

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

$MenuItem3 = GUICtrlCreateMenu($Menu[3])
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $1
MsgBox(16,"test","dies ist ein test")
Case $1+1
MsgBox(16,"test","dies ist ein test 2")

EndSwitch
WEnd

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