标题在FoxPro中利用热键设置动态帮助功能

　　下面示意性地给出一个范例结构，供用户参考。在主程序中包含下列语句：
　　set fullpath off
　　on key label F1 do myhelp with program()，varread()
　　define window help from 13，4 to 20，51 color scheme 5
　　程序中设置F1为帮助热键，myhelp为帮助主过程，help为帮助信息显示窗口。
　　procedure myhelp
　　parameters mypro，myvar
　　active window help
　　do case
　　case mypro='PRO1'&&假设PRO1为某一程序名称
　　do case
　　case myvar='VAR1'　 &&假设VAR1为某一变量名称
　　do HelpProForVar1　 &&执行相应的帮助文件
　　case myvar='VAR2'
　　…　 &&程序省略
　　endcase
　　case mypro='PRO2'
　　…　 &&程序省略
　　endcase
　　wait "请按任意键继续" window
　　deac window help
　　return
　　procedure HelpPro1ForVar1
　　@1，1 say "帮助信息如下所示"
　　…　 &&程序省略
　　return
　　用户参照此范例结构，举一反三，便可设计出灵活地适应自己程序结构和用户需求的动态帮助信息。(北京　 王国红)