|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Присвоение идентификаторов пунктам контекстного меню. |
|
[решено] Присвоение идентификаторов пунктам контекстного меню.
|
Новый участник Сообщения: 37 |
Профиль | Отправить PM | Цитировать
Привет.
У меня есть GUI, и в нём создаётся динамическое контекстное меню. Проблема в том, что не получается присвоить к пунктам меню идентификаторы. Как можно присвоить идентификаторы? Что здесь можно придумать? Local $hGUI = GUICreate('111', 350, 400) Local $m000 = GUICtrlCreateContextMenu() Local $m001 = GUICtrlCreateMenu("111", $m000) Local $m002 = GUICtrlCreateMenu("222", $m001) Local $m003 = GUICtrlCreateMenu("333", $m002) Local $m004 = GUICtrlCreateMenu("444", $m003) Local $t1, $t2, $t3, $t4, $kk, $m , $mm For $i = 1 To 10 $m = GUICtrlCreateMenuItem('A' & $i, $m001, 3) ; Local Assign("m & $i = GUICtrlCreateMenuItem('a' & $i, $m001) Assign($m, 'mm' & $i, 2) ; Local $zv = $m & $i ; $t1 = $t1 & 'm' & $i Next For $i = 11 To 20 Local $m = GUICtrlCreateMenuItem('B' & $i, $m002, 12) $t2 = $t2 & 'm' & $i Next For $i = 21 To 30 Local $m = GUICtrlCreateMenuItem('C' & $i, $m003) $t3 = $t3 & 'm' & $i Next For $i = 31 To 40 Local $m = GUICtrlCreateMenuItem('D' & $i, $m004) $t4 = $t4 & 'm' & $i Next GUISetState() While 1 Local $hMsg = GUIGetMsg(1) Select Case $hMsg[0] = -3 Exit Case $hMsg[0] = $m MsgBox(0, '', $m) EndSelect WEnd |
|
Отправлено: 08:26, 05-07-2017 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать Цитата Атос:
P.S. Ещё раз настоятельно советую подумать над переходом к иной модели диалога — по привязанным событиям. |
|
Отправлено: 09:35, 05-07-2017 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Разное - Доработка программы: добавить действия по пунктам меню - PascalABC.NET | AndriyBig | Программирование и базы данных | 1 | 31-05-2017 10:57 | |
Разное - [решено] Каскадное меню контекстного меню рабочего стола | JeWgIeNiJ | Microsoft Windows 10 | 5 | 30-01-2017 13:46 | |
Интерфейс - Добавление иконок к уже существующим пунктам контекстного меню | BadStealth | Microsoft Windows 7 | 5 | 14-02-2016 23:14 | |
Система - Редактирование контекстного меню | kapitanvagin | Программное обеспечение Windows | 5 | 10-05-2011 18:38 | |
Интерфейс - лаги контекстного меню | pribl | Microsoft Windows 2000/XP | 3 | 29-08-2010 23:10 |
|