Problems editing 3d-curves (D3CurveColorRGB and D3CurveSpecLWid)

[fourteafive]

Hi,

I have some problems editing properties of 3d-curves in a script. Generating a 3D-curve works fine but I can not edit the 'D3CurveColorRGB' and the 'D3CurveSpecLWid' value. 

This is my code:

' The first part works just fine:

Call DataFileLoad("A:\myFile.TDM")

Call GraphObjNew("3D-Axis","my3DAxis")

Call GraphObjOpen("my3DAxis")

    CallGraphObjNew("3D-Curve","myCurve")

    D3CurveType(1) = "3D curve"

    CallGraphObjOpen("myCurve")

        D3CChnX = ChnPropValGet("x","number")

        D3CChnY = ChnPropValGet("y","number")

        D3CChnZ = ChnPropValGet("z","number")

    CallGraphObjClose("myCurve")

Call GraphObjClose("my3DAxis")

Call PicUpdate()

' The second part is beeing proceeded without any error messages but the curve's properties are not beeing changed ??????

Call GraphObjOpen("my3DAxis")

    CallGraphObjOpen("myCurve")

         D3CurveColorRGB = 10000

         D3CurveSpecLWid = 3

    CallGraphObjClose("myCurve")

Call GraphObjClose("my3DAxis")

Call PicUpdate()

Does anyone have an idea, what I am doing wrong and can help me to edit those properties?

Thank you in advance,

Martin

[Vince_CH · Accepted solution]

Hi Martin,

If you check the help for the function D3CurveSpecLWid and D3CurveColorRGB you could find the answer to your question!!!

For the D3CurveSpecLWid function:

The variable is a enumeration type and only the following Values are valid:

Scriptbegriff	Oberflächenbegriff, Erklärung
"min"	Minimal
"0.25"	0.25
"0.35"	0.35
"0.5"	0.5
"0.7"	0.7
"1.0"	1.0
"1.4"	1.4
"2.0"	2.0
"2.8"	2.8
"4.0"	4.0
"5.6"	5.6
"8.0"	8.0
"11.2"	11.2
"16.0"	16.0
"22.4"	22.4
"32.0"	32.0

For the D3CurveColorRGB function:

To assign a value to the variable D3CurveColorRGB, you must first assign the value “other colors” to  D3CurveColor .

So:

Call GraphObjOpen("3DAxis1")

  '------------------- Curve list -------------------------------

  Call GraphObjOpen("3DObj11_Curve1")

         D3CurveColor     = "other colors"

         D3CurveColorRGB = 1737451

         D3CurveSpecLWid = "32.0"

  Call GraphObjClose("3DObj11_Curve1")

Call GraphObjClose("3DAxis1")

Call PicUpdate()

Regards, 

Vince

[fourteafive]

Thank you. You solved my problem!