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