anchor.diff:    FAlignment := taRightJustify;
     FDecimalSeparator := DecimalSeparator;
     FThousandSeparator := ThousandSeparator;
  +  FShowThousand := True;
     FNegativeColor := clRed;
     FOldColor := TextColor;
     FMaxLimit := False;
  
positive.code: constructor TfpgEditInteger.Create(AOwner: TComponent);
  begin
    inherited Create(AOwner);
    FShowThousand := True;
    FDecimals := 0;
  end;
  
  
negative.code:   inherited Create(AOwner);
    FDecimals := -1;
    FFixedDecimals := -1;
  end;
  
  { TfpgEditCurrency }
  