anchor.diff:    Note: THelpNote;
     NotesFile: TStringList;
     TopicIndex: integer;
  -  s: TfpgString;
   begin
     ProfileEvent('Save notes for ' + AHelpFile.Filename);
     if not AHelpFile.NotesLoaded then
  
positive.code:   if not fpgFileExists( BookmarksFileName ) then
      Exit;
  
    FileMode := fmInput;
    AssignFile( BookmarksFile, BookmarksFileName );
    try
  
negative.code: var
    lText: String;
    ImageIndices: TList;
    HelpFile: THelpFile;
    Topic: TTopic;
    HighlightWordSequences: TList;
  