Arc 3D

Arc 3D

Anonymous
Not applicable
251 Views
2 Replies
Message 1 of 3

Arc 3D

Anonymous
Not applicable
Hi,

I would like to trace in a part much arc 3D (~50) given by the co-ordinates
of the 3 points of each arc. This is possible to do it in VB.

Thank you.

Dom
0 Likes
252 Views
2 Replies
Replies (2)
Message 2 of 3

Anonymous
Not applicable
Hi,

I have tried this :

' Create a sketch line
Dim oSketchLine As SketchLine3D
Set oSketchLine = oSketch.SketchLines3D.AddByTwoPoints(oPoints(1),
oPoints(3))

' Create a sketch Arc
Dim oSketchArcs3D As SketchArcs3D
Set oSketchArcs3D = oSketch.SketchArcs3D.AddByThreePoints(oPoints(1),
oPoints(2), oPoints(3))

The line is ok but the Arc3D is correctly draw but I have an error Type 13
"incompatibilité de Type"

What's appends. Thx

Dom




"Dominique" a écrit dans le message de news:
5646062@discussion.autodesk.com...
Hi,

I would like to trace in a part much arc 3D (~50) given by the co-ordinates
of the 3 points of each arc. This is possible to do it in VB.

Thank you.

Dom
0 Likes
Message 3 of 3

Anonymous
Not applicable
Ok I have found the error.

Dim oSketchArcs3D As SketchArc3D

"Dominique" a écrit dans le message de news:
5647006@discussion.autodesk.com...
Hi,

I have tried this :

' Create a sketch line
Dim oSketchLine As SketchLine3D
Set oSketchLine = oSketch.SketchLines3D.AddByTwoPoints(oPoints(1),
oPoints(3))

' Create a sketch Arc
Dim oSketchArcs3D As SketchArcs3D
Set oSketchArcs3D = oSketch.SketchArcs3D.AddByThreePoints(oPoints(1),
oPoints(2), oPoints(3))

The line is ok but the Arc3D is correctly draw but I have an error Type 13
"incompatibilité de Type"

What's appends. Thx

Dom




"Dominique" a écrit dans le message de news:
5646062@discussion.autodesk.com...
Hi,

I would like to trace in a part much arc 3D (~50) given by the co-ordinates
of the 3 points of each arc. This is possible to do it in VB.

Thank you.

Dom
0 Likes