They conform with the current version of theDIN Standards concerned (December 1, 2007, Autodesk)The JIS symbols in this product are used by Autodesk under permission from JIS.ISA Symbols © ISA© Process Industry Practices (PIP), Construction Industry Institute, The University of Texas at AustinISO 10628:1997 Symbols © The International Organization for Standardization (ISO)ISO 14617-5:2002 Symbols © The International Organization for Standardization (ISO)ISO 14617-6:2002 Symbols © The International Organization for Standardization (ISO)ISO 3511-1:1977 Symbols © The International Organization for Standardization (ISO)ISO 3511-2:1984 Symbols © The International Organization for Standardization (ISO)ISO 3511-3:1984 Symbols © The International Organization for Standardization (ISO)DIN 2481:1979-06 Symbols © Deutsches Institut für Normung e. ![]() The data from DIN Standards are used by permission of DIN Deutsches Institut für Normung e. Certain materials included in this publication are reprinted with the permission of the copyright holder. Except as otherwise permitted by Autodesk, Inc., this publication, or parts thereof, may not bereproduced in any form, by any method, for any purpose. (setq vector (vlax-make-safearray vlax-vbDouble '(0. (setq uprRight (list (+ (nth 0 (getvar "viewctr")) (/ vWidth 2)) (+ (nth 1 (getvar "viewctr")) (/ vHeight 2)) 0)) (setq lwrLeft (list (- (nth 0 (getvar "viewctr")) (/ vWidth 2)) (- (nth 1 (getvar "viewctr")) (/ vHeight 2)) 0)) (setq vWidth (* (/ (nth 0 (getvar "screensize")) (nth 1 (getvar "screensize"))) vHeight)) ![]() Get the corners of the screen display to build our selection set (if (/= (setq pick (vlax-3d-point (getpoint "\nSelect Cell to START sum from: "))) nil) (defun SelectTableCell ( / pick vHeight vWidth lwrLeft uprRight vector I have found a solution for now, it needs user interaction but its ok for now, i will keep studying this code to make the same thing code does but without user interaction. "\n:: SumAttributes.lsp | Version 1.1 | \\U+00A9 Lee Mac " (eval (list 'defun 'LM:acdoc 'nil (vla-get-activedocument (vlax-get-acad-object)))) (while (= 8 (logand 8 (getvar 'undoctl))) (setq sty (cadr (assoc -3 (entget sty '("acadannotative"))))) Returns T if the given Textstyle is annotative (apply 'max (mapcar '(lambda ( str ) (LM:addtable:textwidth str hgt stn)) col)) (setq hgt (/ hgt (cond ((getvar 'cannoscalevalue)) (1.0)))) (if (LM:annotative-p (setq stn (vla-gettextstyle sty acdatarow))) (setq hgt (vla-gettextheight sty acdatarow)) ![]() (dictsearch (cdr (assoc -1 (dictsearch (namedobjdict) "acad_tablestyle"))) lee, but it allows me to pick a block, my intention is to pick the excel table that comes out when i run isometrics in plant 3DĪnd pick the field where weight is shown and sum those values.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |