SIZE POPUP 命 令

更改用 DEFINE POPUP 命令创建的菜单大小

语 法

SIZE POPUP MenuName TO nRow1 , nColumn1 | BY nRow 2 , nColumn2

参 数 描 述

MenuName

需 要 更 改 大 小 的 菜 单 名

TO nRow1 , nColumn1

把 菜 单 更 改 为 指 定 大 小 nRow1 和 nColumn1 分 别 指 定 了 菜 单 右 下 角 的 新 行和 新 列 的 坐 标

BY nRow 2 , nColumn2

相 对 于 当 前 菜 单 尺 寸 更 改 大 小 nRow2 和 nColumn2 指 定 菜 单 的 行 和 列 的 改变 值 它 们 相 对 于 菜 单 右 下 角 的 当 前 行 和 当 前 列 坐 标

说 明

如果创建了用户自定义菜单 就可以更改它的大小 菜单不必是活动或可见的

示 例

本示例创建了包含带有 .prg 扩展名文件的菜单 并且在关闭前移动 扩大和收缩菜

单

CLEAR

DEFINE POPUP popMovIn FROM 2,2 TO 7, 14 PROMPT FILES LIKE *.PRG ;

TITLE 'Programs'

ACTIVATE POPUP popMovIn NOWAIT

=CHRSAW(2)

MOVE POPUP popMovIn BY 5,5 && 下移 popup

=CHRSAW(2)

SIZE POPUP popMovIn BY 5,5 && 扩大 popup

=CHRSAW(2)

SIZE POPUP popMovIn BY -5,-5 && 缩小 popup

=CHRSAW(2)

MOVE POPUP popMovIn BY -5,-5 && 上移 popup

=CHRSAW(2)

DEACTIVATE POPUP popMovIn RELEASE POPUP popMovIn

请 参 阅

ACTIVATE POPUP