menu.prg

来自「自学考试实践管理信息系统之学生成绩关系信息系统」· PRG 代码 · 共 10 行

DEFINE POPUP popRight SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR _med_undo OF popRight PROMPT "撤消(\<U)" 
DEFINE BAR 2 OF popRight PROMPT "\-"
DEFINE BAR _med_cut OF popRight PROMPT "剪切(\<T)"
DEFINE BAR _med_copy OF popRight PROMPT "复制(\<C)"
DEFINE BAR _med_paste OF popRight PROMPT "粘贴(\<P)" 
DEFINE BAR _med_clear OF popRight PROMPT "删除(\<D)" 
DEFINE BAR 7 OF popRight PROMPT "\-" 
DEFINE BAR _med_slcta OF popRight PROMPT "全选(\<S)" 
ACTIVATE POPUP popRight