lht 发表于 2018-4-26 14:32:02

求助:怎样用entmake生成真彩色多段线

本帖最后由 lht 于 2018-4-26 18:58 编辑

已知:点P1和点P2,高程Z,线宽L,真彩色R、G、B值,请高手们用entmake帮写个生成多段线的函数。

ssyfeng 发表于 2018-4-27 09:14:23

试试这个:
(entmake (list '(0 . "LWPOLYLINE") '(100 . "AcDbEntity") '(100 . "AcDbPolyline") (cons 420 (logior (lsh (fix R) 16) (lsh (fix G) 8) (fix B))) (cons 90 2) (cons 43 L) (cons 38 Z) (cons 10 pt1) (cons 10 pt2)))

lht 发表于 2018-4-27 22:36:19

谢谢ssyfeng老师,函数很好用,达到了目的,真是高手!

longer1000 发表于 2018-4-27 23:25:14

怎么用啊?????????
页: [1]
查看完整版本: 求助:怎样用entmake生成真彩色多段线