anchor.diff:      property    Align;
       property    AllowAllUp;
       property    AllowDown;
  +    property    AllowMultiLineText;
       property    BackgroundColor default clButtonFace;
       property    Default;
       property    Down;
  
positive.code:   lBtnFlags: TFButtonFlags;
    clr: TfpgColor;
    img: TfpgImage;
  begin
  //  inherited HandlePaint;
    Canvas.ClearClipRect;
  
negative.code:   FDefault      := False;
    FAllowAllUp   := False;
    FState        := 0;
    FAllowMultiLineText := False;
  end;
  
  destructor TfpgBaseButton.Destroy;
  