anchor.diff:    { TODO -ograemeg -copen files : Implement ParseAndExpandFilenames }
     tmpFileNames.Add(AFileName);
   //  ParseAndExpandFileNames(FileName, tmpFileNames);
  -  Result := OpenFiles( tmpFileNames,
  -                       AWindowTitle,
  -                       DisplayFirstTopic );
  +  Result := OpenFiles( tmpFileNames, AWindowTitle, DisplayFirstTopic );
     tmpFileNames.Destroy;
   end;
   
  
positive.code:   { TODO -oGraeme : We do not support images yet }
    ImageIndices.Free;
  
  //  writeln(lText);
  //  writeln('-----------------------------');
    RichView.AddText(PChar(lText));
  end;
  
  
negative.code:   LogEvent(LogSettings, 'Loading settings');
    LoadSettings;
  
    ProcessCommandLineParams;
  end;
  
  procedure TMainForm.MainFormDestroy(Sender: TObject);
  