anchor.diff:    WindowPosition := wpUser;
     MinWidth := 430;
     MinHeight := 300;
  +  DNDEnabled := True;
     OnCloseQuery  := @MainFormCloseQuery;
   
     bvlStatusBar := TfpgBevel.Create(self);
  
positive.code:   btnNext.Click;
  end;
  
  procedure TMainForm.Splitter1DoubleClicked(Sender: TObject;
    AButton: TMouseButton; AShift: TShiftState; const AMousePos: TPoint);
  begin
  
negative.code:     ScrollWheelDelta := 60;
      ShowImages := True;
      TabOrder := 0;
      AcceptDrops := True;
      OnChange  := @tvContentsChange;
      //OnDoubleClick  := @tvContentsDoubleClick;
      OnDragEnter := @tvContentsDragEntered;
      OnDragDrop := @tvContentsDragDrop;
    end;
  
    btnGo := TfpgButton.Create(tsContents);
  