微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题为FOXPRO系统菜单添加DOSSHELL选项
栏目软件操作与技巧
作者江西 罗南
发布1995-12-01
  FOXPRO为用户提供了多种修改系统菜单的方法,可以很方便地添加、删除或修改系统菜单中的主菜单和子菜单。据此,我们在File子菜单中添加了一个DOSSHELL选项。
  源程序如下,输入完毕,按CTRL+O将其编译为.FXP目标文件。
  *功能:在FOXPRO For DOS系统菜单的File子菜单中添加DOSSHELL选项
  SET TALK OFF
  CLEAR
  DEFINE BAR 1BEFORE _MEI_QUIT OF _MFILE PROMPT '\<DOS Shell'
  ON SELECT BAR 1 OF _MFILE DO SHELL IN DOSSHELL
  PROCEDURE SHELL
  ?'Please type EXIT to return t FOXPRO...'
  RUN COMMAND.COM
  CLEAR
  RETURN
  *功能:在FOXPRO For WINDOWS系统菜单中添加DOSSHELL选项
  SET TALK OFF
  CLEAR
  DEFINE BAR 1 BEFORD _MFI_QUIT OF_MSM_FILE PROMPT "\<DOS Shell'
  ON SELECT BAR 1 OF_MSM_FILE DO SHELL IN DOSSHELL
  PROCEDURE SHELL
  RUN DOSPRMPT.PIF
  CLEAR
  RETURN
  为了能够在启动FOXPRO时自动运行该程序,还需要在其配置文件CONFIG.FP(FOR DOS版本)或CONFIG.FPW(FOR WINDOWS版本)中加入下面一行:
  COMMADN=DO DOSSHELL.FXP
  (江西 罗南)