anchor.diff:      function KeyEventHandled(Key: Word; Shift: TShiftState): Boolean; virtual;
       function CanChangeSelection: Boolean; virtual;
     public
  -    constructor Create(aParent: TKMPanel; aLeft, aTop, aWidth, aHeight: Integer; aPaintLayer: Integer = 0);
  -
       procedure SetTopIndex(aIndex: Integer; aStayOnList: Boolean); overload;
       property ItemIndex: Integer read GetItemIndex write SetItemIndex;
       property TopIndex: Integer read GetTopIndex write SetTopIndex;
  
positive.code: function TKMSearchableList.CanChangeSelection: Boolean;
  begin
    Result := True;
  end;
  
  
  function TKMSearchableList.GetHintBackColor: TKMColor3f;
  begin
    Result := fHintBackColor;
  end;
  
  
  procedure TKMSearchableList.SetHintBackColor(const aValue: TKMColor3f);
  begin
    fHintBackColor := aValue;
  end;
  
  
  
negative.code:     fOnChange: TNotifyEvent;
      function GetHintKind: TKMHintKind; override;
      function GetHintFont: TKMFont; override;
      function IsHintSelected: Boolean; override;
  
      function CanSearch: Boolean; virtual; abstract;
  