anchor.diff:      Result.Height := TfpgEditCurrency(Result).FFont.Height + 4 + (Result.FHeightMargin * 2)
     else
       Result.Height:= h;
  +  Result.UpdateWindowPosition;
   end;
   
   
  
positive.code:     Result.Height := TfpgEditInteger(Result).FFont.Height + 4 + (Result.FHeightMargin * 2)
    else
      Result.Height:= h;
  end;
  
  function CreateEditFloat(AOwner: TComponent; x, y, w, h: TfpgCoord; AShowThousand: boolean= True;
  
negative.code:     Result.Height := TfpgEdit(Result).FFont.Height + 4 + (Result.FHeightMargin * 2)
    else
      Result.Height:= h;
    Result.UpdateWindowPosition;
  end;
  
  function CreateEditInteger(AOwner: TComponent; x, y, w, h: TfpgCoord; AShowThousand: boolean= True): TfpgEditInteger;
  