anchor.diff:      procedure   HandleHide; override;
       function    GetDrawText: String;
       property    AutoSelect: Boolean read FAutoSelect write SetAutoSelect default True;
  -    property    AutoSize: Boolean read FAutoSize write FAutoSize default True;
  +    property    AutoSize: Boolean read FAutoSize write SetAutoSize default False;
       property    BorderStyle: TfpgEditBorderStyle read FBorderStyle write SetBorderStyle default ebsDefault;
       property    FontDesc: String read GetFontDesc write SetFontDesc;
       property    HideSelection: Boolean read FHideSelection write SetHideSelection default True;
  
positive.code:     procedure   DefaultPopupInsertFromCharmap(Sender: TObject);
      procedure   SetDefaultPopupMenuItemsState;
      procedure   SetReadOnly(const AValue: Boolean);
    protected
      FFont: TfpgFont;
      FSideMargin: integer;
  
negative.code:   if FReadOnly = AValue then exit;
    FReadOnly := AValue;
    RePaint;
  end;
  
  procedure TfpgBaseEdit.SetAutoSize(const AValue: Boolean);
  var
    r: TRect;
  begin
    if FAutoSize = AValue then
      exit;
    FAutoSize := AValue;
    if FAutoSize then
    begin
      r := fpgStyle.GetControlFrameBorders;
      FHeight := FFont.Height + (FHeightMargin*2) + (r.Top+r.Bottom);
      UpdateWindowPosition;
    end;
  end;
  
  function TfpgBaseEdit.GetMarginAdjustment: integer;
  