999999 发表于 2023-4-30 16:02:52

(求助)请教一下各位大神，能否实现批量改铺砖比例呢

本帖最后由 999999 于 2023-4-30 16:06 编辑

批量改铺砖比例
求助各位大神

是否可以实现批量选择填充图案后，输入一下比例值，然后选择的铺砖，不管是什么不一样比例的，全部都变成那个统一的比例呢

麻烦各位大神，帮忙看看有没有时间解决一下呢，谢谢啦


提前祝大家五一快乐啦

yshf 发表于 2023-4-30 16:02:53

;;; 批量改图案填充比例
(defun c:plgtcbl()
    (setvar "cmdecho" 0)
    (command "_undo" "be")
    (if (progn
          (princ "\n 请选取填充图案:")
            (setq ssa (ssget'((0 . "HATCH"))))
        )
      (progn
            (if (= (setq newbl (getreal "\n 请输入新比例<1.0>=")) nil)
                (setq newbl 1.0)
          )
          (vlax-for obj (vla-get-ActiveSelectionSet (vla-get-ActiveDocument (vlax-get-acad-object)))
               (vlax-put-property obj "PatternScale" newbl)
                 (vla-update obj)
          )
        )
    )
    (command "_undo" "e")
    (setvar "cmdecho" 1)
    (princ)
)

kozmosovia 发表于 2023-4-30 17:29:37

属性面板或者ma

999999 发表于 2023-4-30 19:38:29

yshf 发表于 2023-4-30 17:36
;;; 批量改图案填充比例
(defun c:plgtcbl()
    (setvar "cmdecho" 0)

感谢大神出手，一出手就解决了太赞啦，谢谢大神啦   大神辛苦啦

999999 发表于 2023-4-30 19:40:06

kozmosovia 发表于 2023-4-30 17:29
属性面板或者ma

主要我的很多铺砖是改了角度的，用MA会改铺砖的样式和角度会变成统一呢
页: [1]
查看完整版本: (求助)请教一下各位大神，能否实现批量改铺砖比例呢