anchor.diff:      CurrentTopic: TTopic; // so we can get easy access to current topic viewed
   
       procedure   RichViewClickLink(Sender: TRichTextView; Link: string);
  +    procedure   IndexSearchEditKeyPress(Sender: TObject; var KeyCode: word; var ShiftState: TShiftState; var Consumed: boolean);
       procedure   MainFormShow(Sender: TObject);
       procedure   MainFormDestroy(Sender: TObject);
       procedure   miFileQuitClicked(Sender: TObject);
  
positive.code: 
  end;
  
  procedure TMainForm.MainFormShow(Sender: TObject);
  begin
    bvlBody.Realign;
  
negative.code:     procedure   lbIndexDoubleClick(Sender: TObject; AButton: TMouseButton; AShift: TShiftState; const AMousePos: TPoint);
      procedure   lbSearchResultsDoubleClick(Sender: TObject; AButton: TMouseButton; AShift: TShiftState; const AMousePos: TPoint);
      procedure   btnSearchClicked(Sender: TObject);
      procedure   IndexSearchEditOnChange(Sender: TObject);
      procedure   DisplaySelectedSearchResultTopic;
      procedure   UpdateLocationPanel;
      procedure   EnableControls;
  