anchor.diff:      tsNotes: TfpgTabSheet;
       tsHistory: TfpgTabSheet;
       tvContents: TfpgTreeView;
  -    tvIndex: TfpgTreeView;
       Splitter1: TfpgSplitter;
       Memo1: TfpgMemo;
       MainMenu: TfpgMenuBar;
  
positive.code:   f: THelpFile;
  begin
    f := THelpFile(Files[0]);
    tvIndex.RootNode.Clear;
    for i := 0 to f.Index.Count-1 do
    begin
      tvIndex.RootNode.AppendText(f.Index[i]);
    end;
  end;
  
  procedure TMainForm.btnGoClicked(Sender: TObject);
  
negative.code:     //    OnChange  := @tvContentsChange;
    end;
  
    Splitter1 := TfpgSplitter.Create(bvlBody);
    with Splitter1 do
    begin
  