anchor.diff:  
     {FlatButton}
     TKMButtonFlat = class(TKMButtonFlatCommon)
  -  private
     public
  +    Down: Boolean;
       procedure Paint; override;
     end;
   
  
positive.code: 
    if (csOver in State) and fEnabled and not HideHighlight then
      TKMRenderUI.WriteShape(AbsLeft+1, AbsTop+1, Width-2, Height-2, $40FFFFFF);
  
    if Down then
      TKMRenderUI.WriteOutline(AbsLeft, AbsTop, Width, Height, 1, $FFFFFFFF);
  end;
  
  
  
negative.code:     TexOffsetY: Shortint;
      CapOffsetY: Shortint;
      Caption: UnicodeString;
      CapColor: TColor4;
      FlagColor: TColor4;
      Font: TKMFont;
  