Что нового

Проблема с созданием меню в GUI

koros

Новичок
Сообщения
32
Репутация
1
Есть меню, которое нормально работает:
Код:
Local $filemenu = GUICtrlCreateMenu('Файл')
Local $quititem = GUICtrlCreateMenuItem('Выход', $filemenu)
GUICtrlSetOnEvent($quititem, "GUI_Exit")

Поскольку в меню "Файл" только один пункт "Выход", решил его вынести не первый уровень: Удалил первую строку, вторую изменил:
Код:
Local $quititem = GUICtrlCreateMenuItem('Выход', -1)

Пункт "Выход" вообще не отображается.
Если так 2 строка так:
Код:
Local $quititem = GUICtrlCreateMenu('Выход')

то пункт отображается, но на нажатие не реагирует.
Прошу помощи в создании пункта меню нулевого уровня.
 

Smitis

Новичок
Сообщения
1
Репутация
0
[quote author=koros]
Прошу помощи в создании пункта меню нулевого уровня.
[/quote]
Похоже, нельзя создать простой пункт если в меню ещё нет ни одного подменю и нельзя создать меню, в котором не будет ни одного подменю.
А вот так работает:
Код:
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>

Opt("GUIOnEventMode",1)
Local $hGui = GUICreate("TEST", 300, 200)
Local $iFake = GUICtrlCreateMenu("Fake")
Local $iQuit = GUICtrlCreateMenuItem("Quit",-1)
GUICtrlSetOnEvent($iQuit,"GUI_Exit")
GUICtrlDelete($iFake)
GUISetState(@SW_SHOW)
While 1
	Sleep(10)
WEnd
GUIDelete()

Func GUI_Exit()
	GUIDelete()
	Exit
EndFunc
 
Верх