anchor.diff:      property    Hint;
       property    MultiSelect: Boolean read FMultiSelect write SetMultiSelect;
       property    ParentShowHint;
  +    property    ScrollBarWidth: Integer read FScrollBarWidth write SetScrollBarWidth;
       property    SelectionFollowsFocus: Boolean read FSelectionFollowsFocus write FSelectionFollowsFocus;
       property    SubItemImages: TfpgImageList index Ord(lisNoState) read SubItemGetImages write SubItemSetImages;
       property    SubItemImagesSelected: TfpgImageList index Ord(lisSelected) read SubItemGetImages write SubItemSetImages;
  
positive.code:   FSelectionFollowsFocus := True;
    FItemIndex := -1;
    FScrollBarNeedsUpdate := True;
  end;
  
  destructor TfpgListView.Destroy;
  
negative.code:     FUpdateCount: Integer;
      FVScrollBar: TfpgScrollBar;
      FHScrollBar: TfpgScrollBar;
      FScrollBarWidth: integer;
      FColumns: TfpgLVColumns;
      FItems: TfpgLVItems;
      FOnPaintItem: TfpgLVPaintItemEvent;
  