Asmxygen
Websvn
Builds
Bugs
FTP
Wiki
Telegram
Discord
Reddit
-
lmenu.png (5.05 KiB)Viewed 107870 times
Code: Select all
#define MENU_ALIGN_TOP_LEFT 0
#define MENU_ALIGN_TOP_RIGHT 1
#define MENU_ALIGN_BOT_LEFT 2
#define MENU_ALIGN_BOT_RIGHT 3
:dword shared_mem = NULL;
:char shared_name[] = "LMENU";
void open_lmenu(dword _x, _y, _position, _selected, _text1)
{
if (!shared_mem) {
shared_mem = memopen(#shared_name, 16, SHM_CREATE + SHM_WRITE);
if (EDX) shared_mem = memopen(#shared_name, 16, SHM_WRITE);
}
ESDWORD[shared_mem ] = _selected;
ESDWORD[shared_mem + 4] = _x;
ESDWORD[shared_mem + 8] = _y;
ESDWORD[shared_mem + 12] = _position;
menu_process_id = RunProgram("/sys/develop/menu", _text1);
}Code: Select all
open_lmenu(Form.left+mouse.x+5, Form.top+mouse.y+skin_height, MENU_ALIGN_TOP_RIGHT, 1, "Пункт1\nПункт2");Code: Select all
open_lmenu(Form.left + mouse.x+4, Form.top + skin_height + mouse.y,MENU_ALIGN_TOP_LEFT, NULL, #folder_actions);
char folder_actions[]=
"Open |Enter
-
Copy |Crl+C
Cut |Crl+X
Paste |Crl+V
-
Delete |Del
Properties |F8";Code: Select all
:dword get_menu_click()
{
if (menu_process_id) && (GetProcessSlot(menu_process_id)) {
return NULL;
} else {
menu_process_id = NULL;
EAX = ESDWORD[shared_mem];
ESDWORD[shared_mem] = 0;
return EAX;
}
}