anchor.diff:    private
       FChecked: boolean;
       FOnChange: TNotifyEvent;
  +    FReadOnly: Boolean;
       FText: string;
       FFont: TfpgFont;
       FBoxLayout: TBoxLayout;
  
positive.code:     property    MinHeight;
      property    MinWidth;
      property    ParentShowHint;
      property    ShowHint;
      property    TabOrder;
      property    Text;
  
negative.code:     property    Checked: boolean read FChecked write SetChecked default False;
      property    FontDesc: string read GetFontDesc write SetFontDesc;
      property    BoxLayout: TBoxLayout read GetBoxLayout write SetBoxLayout default tbLeftBox;
      property    ReadOnly: Boolean read FReadOnly write SetReadOnly default False;
      property    Text: string read FText write SetText;
      property    OnChange: TNotifyEvent read FOnChange write FOnChange;
    public
  