anchor.diff:      property Anchors: TKMAnchorsSet read fAnchors write SetAnchors;
       property Enabled: Boolean read fEnabled write SetEnabled;
       property Visible: Boolean read GetVisible write SetVisible;
  +    property IsPainted: Boolean read GetIsPainted;
       property IsFocused: Boolean read GetIsFocused;
       property IsClickable: Boolean read GetIsClickable;  // Control considered 'Clickabale' if it is Visible and Enabled
       property ControlIndex: Integer read fControlIndex;
  
positive.code: end;
  
  
  // Send caption to render
  procedure TKMLabel.Paint;
  var
  
negative.code: 
      fOnWidthChange: TObjectIntegerEvent;
      fOnHeightChange: TObjectIntegerEvent;
      fOnSizeSet: TNotifyEvent;
      fOnPositionSet: TNotifyEvent;
  
      function GetAbsLeft: Integer;
      function GetAbsTop: Integer;
  