anchor.diff:      Align := alLeft;
     end;
   
  +  //Memo1 := TfpgMemo.Create(bvlBody);
  +  //with Memo1 do
  +  //begin
  +  //  Name := 'Memo1';
  +  //  SetPosition(276, 36, 244, 232);
  +  //  FontDesc := '#Edit1';
  +  //  TabOrder := 2;
  +  //  Align := alClient;
  +  //end;
     Memo1 := TRichTextView.Create(bvlBody);
     with Memo1 do
     begin
       Name := 'Memo1';
       SetPosition(276, 36, 244, 232);
  -//    FontDesc := '#Edit1';
       TabOrder := 2;
       Align := alClient;
     end;
  
positive.code:     tvContents: TfpgTreeView;
      Splitter1: TfpgSplitter;
      Memo1: TRichTextView;
      MainMenu: TfpgMenuBar;
      miFile: TfpgPopupMenu;
      miSettings: TfpgPopupMenu;
  
negative.code:     ScrollWheelDelta := 60;
      ShowImages := True;
      TabOrder := 0;
          OnChange  := @tvContentsChange;
      //OnDoubleClick  := @tvContentsDoubleClick;
    end;
  
    Splitter1 := TfpgSplitter.Create(bvlBody);
  