anchor.diff:  procedure TKMListBox.SetVisible(aValue:boolean);
   begin
     Inherited;
  -  fScrollBar.Visible := fVisible; //Hide scrollbar and its buttons
  +  fScrollBar.Visible := fVisible and (not fAutoHideScrollBar or fScrollBar.Enabled); //Hide scrollbar and its buttons
   end;
   
   
  
positive.code:   TKMListBox = class(TKMControl)
    private
      fFont: TKMFont; //Can't be changed from inital value, it will mess up the word wrapping
      fBackAlpha:single; //Alpha of background (usually 0.5, dropbox 1)
      fItemHeight:byte;
      fItemIndex:smallint;
  
negative.code: 
    //In FullScreen mode P initialized already with offset (P.Top <> 0)
    fList := TKMListBox.Create(P, Left-P.Left, Top+aHeight-P.Top, aWidth, 0, fFont);
    fList.AutoHideScrollBar := True; //A drop box should only have a scrollbar if required
    fList.BackAlpha := 0.85;
    fList.fOnClick := ListClick;
  
  