anchor.diff:  begin
     inherited Create(AOwner);
     FDecimals := 2;
  -  FShowThousand := True;
   end;
   
   
  
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 }
  