>The following worked for me:
>
>In the app, put something like this:

>On Key Label F1 do HtmlHelp
>
>procedure HtmlHelp
>*
>DECLARE INTEGER ShellExecute IN Shell32 ;
>    INTEGER @HWND,;
>    STRING @lpOperation,;
>    STRING @lpFile,;
>    STRING @lpParameters,;
>    STRING @lpDirectory,;
>    INTEGER @nShowCmd
>
>hWind = 0
>lcOperation = "OPEN"
>lcFile = "HH.EXE"
>lcParameter = "MyHelp.CHM"
>lcDirectory = "C:\WINDOWS"
>liShow = 0
>lnResult = ;
>   ShellExecute(@hWind,@lcOperation,@lcFile,@lcParameter,@lcDirectory,liShow)
>clear DLLS

Have been away for a while, but wanted to say THANKS VERY MUCH, worked like a charm.

Laurisa