c9389437b7
WebView: fix space in the end of value menu: refine params git-svn-id: svn://kolibrios.org@8020 a494cfbc-eb01-0410-851d-a64ba20cac60
38 lines
949 B
C
38 lines
949 B
C
#ifndef INCLUDE_MENU_H
|
|
#define INCLUDE_MENU_H
|
|
|
|
:dword menu_process_id;
|
|
|
|
#define MENU_TOP_LEFT 0
|
|
#define MENU_TOP_RIGHT 1
|
|
#define MENU_BOT_LEFT 2
|
|
#define MENU_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 + Form.left + 5;
|
|
ESDWORD[shared_mem + 8] = _y + Form.top + skin_height;
|
|
ESDWORD[shared_mem + 12] = _position;
|
|
menu_process_id = RunProgram("/sys/develop/menu", _text1);
|
|
}
|
|
|
|
: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;
|
|
}
|
|
}
|
|
|
|
#endif |