当我左键单击oracle表单中的按钮时显示一个弹出菜单

时间:2017-07-17 13:43:28

标签: oracle oracleforms

当我右键单击时,我创建了一个弹出菜单并将其分配到一个按钮中 按钮弹出菜单将显示。如果我通常点击该按钮,我想要 左键单击要显示的弹出菜单

2 个答案:

答案 0 :(得分:1)

适用于Oracle Forms 6:

declare
  w_id pls_integer;
begin
  w_id := GET_ITEM_PROPERTY(Find_Item('CONTROL.B_REPORTS'), WINDOW_HANDLE);
  WIN_API_SHELL.SendMessage( w_id, 516 );  -- WM_RBUTTONDOWN
  WIN_API_SHELL.SendMessage( w_id, 517 );  -- WM_RBUTTONUP
end;

答案 1 :(得分:0)

我完全赞同上面的@APC;这不是标准的UI约定。并且无法覆盖Forms中右键菜单的默认功能。 你可以,构建一个小窗口/画布/块,看起来像右键菜单,默认它的起始窗口位置是鼠标X,Y坐标。