anchor.diff:    UnlistPublishedProperty(TIWBSCustomRegion, 'OnAlignInsertBefore');
     UnlistPublishedProperty(TIWBSCustomRegion, 'OnAlignPosition');
   
  +  RegisterComponents('IW BootsTrap', [TIWBSInput]);
  +  RegisterComponents('IW BootsTrap', [TIWBSMemo]);
  +  RegisterComponents('IW BootsTrap', [TIWBSSelect]);
     UnlistPublishedProperty(TIWBSCustomInput, 'SkinId');
     UnlistPublishedProperty(TIWBSCustomInput, 'StyleRenderOptions');
   
  -  RegisterComponents('IW BootsTrap', [TIWBSInput]);
  -  RegisterComponents('IW BootsTrap', [TIWBSMemo]);
  -
  -  RegisterComponents('IW BootsTrap', [TIWBSSelect]);
  -
     RegisterComponents('IW BootsTrap', [TIWBSCheckBox]);
  -  UnlistPublishedProperty(TIWBSCheckBox, 'Style');
  -
     RegisterComponents('IW BootsTrap', [TIWBSRadioButton]);
   
     RegisterComponents('IW BootsTrap', [TIWBSRadioGroup]);
  
positive.code:     end;
  
    if LGlyp <> '' then begin
      LIcon := Rect(0, 0, 18,Control.Height);
      ControlCanvas.Font.Name := CNST_GLYPHICONSFONT;
      s := Char(StrToIntDef(slGlyphicons.Values[LGlyp],78));
      DrawTextEx(ControlCanvas.Handle, PChar(s), 1, LIcon, DT_SINGLELINE+DT_VCENTER, nil);
    end;
  
    if LCaption <> '' then begin
      LRect := Rect(20, 0, Control.Width, Control.Height);
      ControlCanvas.Font.Name := CNST_DEFAULTFONTNAME;
      DrawTextEx(ControlCanvas.Handle, PChar(LCaption), Length(LCaption), LRect, DT_SINGLELINE+DT_VCENTER, nil);
    end;
  end;
  
negative.code:   IWRegisterPaintHandler('TIWBSMemo',TIWBSPaintHandlerCustomInput);
    IWRegisterPaintHandler('TIWBSSelect',TIWBSPaintHandlerCustomInput);
    IWRegisterPaintHandler('TIWBSCheckBox',TIWBSPaintHandlerCustomCheck);
    IWRegisterPaintHandler('TIWBSRadioButton',TIWBSPaintHandlerCustomCheck);
    IWRegisterPaintHandler('TIWBSRadioGroup',TIWBSPaintHandlerRadioGroup);
  
    IWRegisterPaintHandler('TIWBSButton',TIWBSPaintHandlerButton);
  