Search the Community

Hi! Avid reader of the forums, first time poster. I have a code with which I'm trying to extract the x and y coordinate of the startpoint of a line to the clipboard for pasting into another program. The problem is that when I run the lisp in Civil 3D it spits out when running (caddr typelst) on line 6 in the code below. What could cause this. I'm having trouble understanding why it wouldn't be able to grab the type from the list. The code: (vl-load-com) (defun c:copyx1y1 () (setq choice (entsel "Choose the line whose start X and Y you want to copy \n")) (setq entname (car choice)) (setq typelst (assoc 0 (entget entname))) (if (= (caddr typelst) "LINE") (progn (setq startpnt (assoc 10 (entget entname))) (setq x1 (cadr startpnt)) (princ "\n") (princ x1) (princ "\n") (setq y1 (caddr startpnt)) (princ y1) (setq copiedtxt (strcat (rtos x1) "\t" (rtos y1))) (setq result (vlax-invoke (vlax-get (vlax-get (setq htmlfile (vlax-create-object "htmlfile")) 'ParentWindow) 'ClipBoardData) 'SetData "Text" copiedtxt) ) (vlax-release-object htmlfile) copiedtxt ) (progn (princ "The choice is not of type LINE") ) ) (princ) ) Regards, E

Good morning... I'm creating a set of new utility line types for our surveying department. Water lines, sewer, and so forth. They will all have a "W" or "SS" in them, depicting the type of line. I want them to look differently from our civil department's lines, so I am trying to make them with an oblique text style. I created a new text style called Simplex, and used the simplex.shx font type with it. However, the line styles I created don't recognize that I put an obliquing angle on the text style. And, of course, the simplex.shx doesn't allow you to put an obliquing font style on. My problem is that these drawings might be sent to clients who don't have civil 3D, but are using other software, so I don't want to stray from the simplex.shx too far. Anyone have any ideas?

Hey guys its my first thread out here so i hope i will find help..Well i 've currently create several layers and after i change in one of 'em the linetype from continuous to a "Dashed" , every new layer i made had a "dashed" linetype and when i tried to change it back to default , it didnt.. Help!

Hello everyone! Line cable tray. Maybe someone knows how to do this kind of dynamic line in lisp?linetype.dwg thanks in advance

Hey all, I've got a huge problem with my autocad 2011 Map 3d. When i create another viewport on paper space totaling 2 viewports, as soon as i zoom in on the new viewport i have created the line type scale goes smaller. (the ---LV--- turns into ------- LV -------). The only way i have to make the linetype the same way it was is to hold ctrl+z till basically everything i have done is gone (really fast). I've tried LTSCALE, PSLTSCALE, AUDIT, RECOVER ETC..... Its has been driving me crazy for the last dew months... Just FIY. The other computers in the office dont do this. I use the old school non-ribbon style and have customised my profile/layout of autocad. Any help on this would be fantastic.