anchor.diff:  
   
   { TKMSearchableList }
  -constructor TKMSearchableList.Create(aParent: TKMPanel; aLeft, aTop, aWidth, aHeight, aPaintLayer: Integer);
  -begin
  -  inherited;
  -
  -  fHintBackColor := COLOR3F_BLACK;
  -end;
  -
  -
   procedure TKMSearchableList.KeyPress(Key: Char);
   var
     I, oldIndex: Integer;
  
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;
  