anchor.diff:      fControlIndex: Integer; //Index number of this control in his Parent's (TKMPanel) collection
       fID: Integer; //Control global ID
       fHint: UnicodeString; //Text that shows up when cursor is over that control, mainly for Buttons
  +    fMouseWheelStep: Integer;
   
       fPaintLayer: Integer;
   
  
positive.code:     property ID: Integer read fID;
      function GetIDsStr: String;
      property Hint: UnicodeString read GetHint write SetHint; //Text that shows up when cursor is over that control, mainly for Buttons
  
      // "Self" coordinates - this is the coordinates of control itself.
      // For simple controls they are equal to normal coordinates
  
negative.code:   NewPos := Position;
  
    if WheelDelta <> 0 then
      NewPos := EnsureRange(NewPos - Step*fMouseWheelStep*Math.Sign(WheelDelta), fMinValue, fMaxValue);
  
    if NewPos <> Position then
    begin
  