Drawing a cylinder using Method ActiveX.

[Alex_Miller]

I am trying to draw a cylinder using the method vla-AddCylinder.

(vl-load-com)
(setq center (vlax-3d-point 0 0 0)
      cylRadius 5
      cylHeight 50)

(setq modelSpace (vla-get-ModelSpace (vla-get-ActiveDocument (vlax-get-acad-object))))
(vla-AddCylinder modelSpace center cylRadius cylHeight)

The cylinder is extruding along axis Z.
I would make the cylinder be directed along another axis, for example X.

 

[Lee Mac]

Construct the cylinder relative to the WCS plane and then transform as required - here is an example.

[Alex_Miller]

Lee Mac Okay. Thank you. I'll look with interesting.

[BIGAL]

Just another use rotate3d after making object or set a ucs then draw object in that plane.

[Alex_Miller]

 BIGAL Yes. I guess that sometimes using the function entmake must be easier.