* Help Menu * ******* Hacker's Guide by Tamar Granor ************************************ lnBarHlp = cntbar('_MSM_SYSTM') + 1 define bar m.lnBarHlp of _msm_systm prompt "\-" lnBarHlp=m.lnBarHlp+1 define bar m.lnBarHlp of _msm_systm prompt "Hackers Guide" key alt+F1 lcTemp = 'DO ' + m.tcUtilityPath + 'FoxToolsHelp\HackFox WITH "' + m.tcUtilityPath + ; 'FoxToolsHelp\"' on selection bar m.lnBarHlp of _msm_systm &lcTempAnd here is the program used:
* PROGRAM: HackFox.prg * AUTHOR: Nadya Nosonovsky 12/15/2000 11:23:08 AM * DATE: * PURPOSE: Activates Hacker Guide help lparameter tcUtilityPath, tcTopic if vartype(tcUtilityPath)'C' tcUtilityPath='d:\Utilities\FoxToolsHelp\' endif if empty(tcTopic) tcTopic=_cliptext endif local lchelp lchelp = set('HELP', 1) set help to tcUtilityPath+'HackFox.CHM' help &tcTopic set help to (lchelp) return