4 Replies Latest reply on Dec 1, 2014 11:08 PM by Bill Florac

    Setting custom property fails with swCustomInfoNumber and number with decimals

    Bill Florac

      I can't seem, to add a custom property using the Add3() function if the type is number and the number has a decimal in it.  The following code works if the number is "123" but does not work if the number is "123.456". As a work around, it does seem to work if I add it as an integer "0" and then use the set2() function to modify it.

       

          Dim swModel As ModelDoc2

          Dim cusPropMgr As CustomPropertyManager

          Dim ModelExt As ModelDocExtension

          Dim lRetVal As Integer

       

          Public Sub main()

              swModel = swApp.ActiveDoc

              ModelExt = swModel.Extension

              cusPropMgr = ModelExt.CustomPropertyManager("") '

       

              ' This fails with swCustomInfoAddResult_GenericFail

              lRetVal = cusPropMgr.Add3("ANUMBER", swCustomInfoType_e.swCustomInfoNumber, "123.456", swCustomPropertyAddOption_e.swCustomPropertyDeleteAndAdd)

       

              ' This seems to work if I use "0" as the value above first

              ' lRetVal = cusPropMgr.Set2("ANUMBER", "123.100000")

          End Sub

       

       

      Am I doing something wrong here?