发信人: foxzz()
整理人: hunter__fox(2002-03-16 22:47:22), 站内信件
|
请参考：
在rightclick():
DEFINE POPUP GridPopup ;
FROM MROW(), MCOL() ;
MARGIN
DEFINE BAR 1 OF GridPopup PROMPT ADDITEM_LOC
DEFINE BAR 2 OF GridPopup PROMPT REMOVEITEM_LOC
ON SELECTION POPUP GridPopup _screen.activeform.GridPop(BAR(),'2')
ACTIVATE POPUP GridPopup
RELEASE POPUP GridPopup
--------------------------------------------------------------------------------
当前位置:
Netease BBS
|
|