Is the command: _AeccProjectObjectsToProf It can be used through the lisp

hosneyalaa — Sun, 11 Oct 2020 04:55:18 GMT

Hello all

I'm creating civil point on the ALIGNMENT when I click on the profile Using the lisp

Is it possible to show this point on the profile through the command AeccProjectObjectsToProf

this is lisp

(defun c:test ( / ELEV ENT ENTALIGNMENT: OBJ PNT POINTLIST PT PTLIST PTLST STA TESTPNTTT VLAOBJ X Y) (vl-load-com) ;;; Jeff Mishler (defun getC3D () (vl-load-com) (setq C3D (strcat "HKEY_LOCAL_MACHINE\\" (if vlax-user-product-key (vlax-user-product-key) (vlax-product-key) ) ) C3D (vl-registry-read C3D "Release") C3D (substr C3D 1 (vl-string-search "." C3D (+ (vl-string-search "." C3D) 1) ) ) C3D (vla-getinterfaceobject (vlax-get-acad-object) (strcat "AeccXUiLand.AeccApplication." C3D) ) ) (setq C3Ddoc (vla-get-activedocument C3D)) ) (getC3D) (setq points (vlax-get C3Ddoc 'points)) (setq ent (entsel "\nSelect profile view:")) (setq obj (vlax-ename->vla-object (car ent))) (setq vlaobj (vlax-get-property obj 'parent)) (while (SETQ pt (GETPOINT "\n-> Specify a point :")) (progn (vlax-invoke-method obj 'FindStationAndElevationAtXY (CAR pt) (CADR pt) 'sta 'elev 'inside);; OK (setq testpnttt (list sta elev));;OK (vlax-invoke-method vlaobj 'PointLocation sta 3 'x 'y) (setq pntAL (list x y));;OK (setq oCogo(vlax-invoke points 'add (LIST (car pntAL) (cadr pntAL) elev))) ;;;; command: _AeccProjectObjectsToProf ) ) (princ));;;;

thank you

Re: Is the command: _AeccProjectObjectsToProf It can be used through the lisp

hosneyalaa — Wed, 04 Nov 2020 13:10:11 GMT

HI MR @Jeff_M

Is it possible to show CIVIL points on the profile?
ProjectObjectsToProf BY the LISP

http://docs.autodesk.com/CIV3D/2012/ENU/API_Reference_Guide/com/AeccXLandLib__IAeccProfileProjection.htm

topic Re: Is the command: _AeccProjectObjectsToProf It can be used through the lisp in Civil 3D Customization Forum

Is the command: _AeccProjectObjectsToProf It can be used through the lisp

Re: Is the command: _AeccProjectObjectsToProf It can be used through the lisp