anchor.diff:      if fpgFileExists(HelpFile) then
       begin
         p.CommandLine := GetHelpViewer + ' ' + HelpFile + ' -s ' + AHelpKeyword;
  -//writeln('DEBUG:  TfpgApplicationBase.ContextHelp > ', p.CommandLine);
  +      {$ifdef GDEBUG}
  +      senddebug(p.CommandLine);
  +      {$endif}
       end
       else
         p.CommandLine := GetHelpViewer;
  
positive.code:         p.CommandLine := GetHelpViewer + ' ' + HelpFile
        else
          p.CommandLine := GetHelpViewer + ' ' + HelpFile + ' -n ' + IntToStr(AHelpContext);
  //writeln('DEBUG:  TfpgApplicationBase.ContextHelp > ', p.CommandLine);
      end
      else
        p.CommandLine := GetHelpViewer;
  
negative.code:   fpg_form,  // needed for fpgApplication.CreateForms()
    typinfo,
    process,
    {$IFDEF GDEBUG}
    dbugintf,
    {$ENDIF}
    dateutils;
  
  
  