M O V E P O P U P 命 令
把用 DEFINE POPUP 命令创建的用户自定义菜单移动到新位置
语 法
MOVE POPUP MenuName TO nRow1 , nColumn1 | BY nRow2 , nColumn2
参 数 描 述
MenuName
指 定 要 移 动 的 菜 单
在 Visual FoxPro 中不能移动系统菜单
TO nRow1 , nColumn1
在 用 户 自 定 义 窗 口 或 Visual FoxPro 主 窗 口 中 把 菜 单 移 动 到 由 nRow1 nColumnl 指 定 的 新 位 置
BY nRow2 , nColumn2
相 对 于 当 前 位 置 移 动 菜 单 数 值 表 达 式 nRow2 指 定 了 移 动 菜 单 的 行 数 如 果nRow2 是 正 值 就 向 下 移 动 如 果 是 负 值 就 向 上 移 动 数 值 表 达 式 nColumn2 指 定 了 移 动 菜 单 的 列 数 如 果 nColumn2 是 正 值 就 向 右 移 动 如 果 是 负 值 就向 左 移 动
说 明
可以把菜单移动到指定位置 或者相对它的当前位置移动菜单 只要菜单已定义 就可以移动它 它不必是活动或可见的
示 例
下面的示例定义并激活了一个菜单 然后移动和更改其大小
CLOSE DATABASE CLEAR
DEFINE POPUP popMovIn FROM 2,2 TO 7, 14 PROMPT FILES LIKE *.PRG ;
TITLE 'Programs'
ACTIVATE POPUP popMovIn NOWAIT
=CHRSAW(2)
popMovIn 5,5 && 下移菜单
=CHRSAW(2)
SIZE POPUP popMovIn BY 5,5 && 扩大菜单
=CHRSAW(2)
SIZE POPUP popMovIn BY -5,-5 && 收缩菜单
=CHRSAW(2)
=CHRSAW(2)
popMovIn -5,-5 && 上移菜单
DEACTIVATE POPUP popMovIn RELEASE POPUP popMovIn
请 参 阅
ACTIVATE POPUP, DEFINE POPUP, SIZE POPUP