Database 版 (精华区)

发信人: mengy (LEAR DLLS 命令时，将从内存中清除), 信区: Database
标  题: 用 好Visual Foxpro 的 菜 单 设 计 器
发信站: 哈工大紫丁香 (2000年12月13日09:18:41 星期三), 站内信件




用 好Visual Foxpro 的 菜 单 设 计 器 
中 国 矿 业 大 学（ 北 京） 
王 彤 
---- 在Visual Foxpro 中， 我 们 可 以 利 用 菜 单 生 成 工 具-- 菜 单 设
 计 器(Menu Designer) 很 方 便 地 构 造 出 与VFP 系 统 菜 单 风 格 一 致
 的 应 用 程 序 菜 单 栏。 但 由 于 系 统 风 格 的 菜 单 栏 在 其 界 面
 中 总 是 包 含 一 个 命 令 窗 口（Command）， 而 多 数 情 况 下, 在 应
 用 程 序 执 行 过 程 中 这 个 窗 口 不 但 没 有 任 何 用 处，反 而 干 
扰 视 线， 影 响 界 面 的 美 观。 因 此 我 们 可 以 采 取 下 面 方 法 在
 自 定 义 的 应 用 程 序 菜 单 栏 出 现 前 先 隐 藏 掉 命 令 窗 口， 然
 后 在 退 出 应 用 程 序 时 再 将 其 恢 复。 具 体 步 骤 如 下（ 以
Visual Foxpro 5.0 为 例）： 

---- 1. 进 入Visual Foxpro， 在 系 统 菜 单 栏 下 选 择“File” 菜 单 项
 下 的“New” 选 项， 在New 窗 口 中 选 中“Menu” 文 件 类 型， 按 下“
New file” 按 钮 后， 系 统 弹 出“Menu Designer-Menu1” 菜 单 设 计 器
 窗 口。 

---- 2. 选 中 系 统 菜 单 栏“View” 菜 单 项 下 的“General Options..”
 选 项， 弹 出“General Options” 窗 口。 

---- 3. 设 置 窗 口 中 的“Setup..” 复 选 框， 按 下“OK” 按 钮 后 进
 入“Menu1-Setup” 编 辑 窗 口, 并 键 入 以 下 命 令： 

    clear    
    define window HIDEWIN from 1,1 to 2,2
activate window Command in HIDEWIN
---- 这 里 定 义 了 一 个HIDEWIN 窗 口， 并 让Command 命 令 窗 口 作 为
 其 子 窗 口， 由 于HIDEWIN 未 被 激 活， 故Command 窗 口 隐 含 在 其 中
 不 被 显 示 出 来， 从 而 达 到 了 隐 藏 命 令 窗 口 的 目 的。 

---- 4. 按Ctrl+W 返 回 菜 单 设 计 器 窗 口， 根 据 实 际 需 要 定 义 用
 户 自 己 的 菜 单 项。 为 了 在 应 用 程 序 结 束 后 恢 复 原 来 的 系
 统 菜 单 和 命 令 窗 口， 这 里 设 一 返 回 项， 不 妨 命 名 为“Exit”
。 在 相 应 的“Prompt” 中 键 入“Exit”， 选 择“Result” 弹 出 式 菜
 单 中 μ 

---- ?ldquo;Procedure” 项， 按 下 旁 边 的“Create” 按 钮( 注： 对 应
 于 该 操 作 的 窗 口 在 附 件 中， 该 图 为.bmp 格 式)， 在 弹 出 的“
Menu1-Exit Procedure” 编 辑 窗 口 中 键 入： 

    activate window HIDEWIN
    activate window Command in window screen
    release window HIDEWIN
set sysmenu to default
---- 这 里 为 了 让Command 命 令 窗 口 恢 复 正 常， 先 激 活 其 父 窗 
口HIDEWIN， 然 后 重 新 将 它 激 活 到 屏 幕 上， 最 后 释 放HIDEWIN， 
并 恢 复Foxpro 系 统 菜 单 栏。 需 要 注 意 的 是，HIDEWIN 窗 口 定 义 
的 尺 寸 应 尽 量 小， 以 使 其 激 活 过 程 不 被 察 觉。 

---- 5. 按Ctrl+W 返 回 菜 单 设 计 器 界 面， 确 保 其 它 自 定 义 菜 单
 项 无 误 后， 选 择 系 统 菜 单“Menu” 中 的“Generate..” 项， 此 时
 系 统 提 示 给 菜 单 文 件 命 名( 默 认 的 文 件 名 是Menu1.MPR), 不 妨
 更 名 为XXX 后 按 下“Generate” 按 钮 即 可 生 成 相 应 的 菜 单 文 件
XXX.MPR。 

---- 6. 通 过 系 统 菜 单 或 命 令 窗 口 运 行 该XXX.MPR 菜 单 文 件， 
结 果 用 户 自 定 义 的 应 用 程 序 菜 单 栏 取 代 系 统 菜 单 栏， 并 
且 用 户 程 序 运 行 期 间 不 再 显 示 命 令 窗 口， 直 到 选 中“Exit”
 菜 单 项 退 出 用 户 应 用 程 序， 系 统 恢 复 正 常。 

---- 该 方 法 同 样 适 用 于Foxpro for DOS 及Foxpro for Windows 环 境。
 
 


------------------------------------------------------------------------
--------

中国计算机世界出版服务公司版权所有 


--

       大海无边天做岸
               山登绝顶我为风

※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.227.121]