anchor.diff:  var
     p: TProcess;
   begin
  +  Result := False;
     p := TProcess.Create(nil);
     try
       if fpgFileExists(HelpFile) then
  
positive.code:     end
      else
        p.CommandLine := GetHelpViewer;
      p.Execute;
    finally
      p.Free;
  
negative.code:     end
      else
        p.CommandLine := GetHelpViewer;
      Result := True;
      p.Execute;
    finally
      p.Free;
  