[编程申请]：lwpline

aeo

一条多个转折的lwpline
entsel点这线,怎么得到所选那一小段的两端点, lisp的, 可以吗?

e2002

完全可以，这是一个比较妙的地方....hehe....

前生

>>>?????????????

aeo

[U]完全可以，这是一个比较妙的地方....hehe....[/U]

不想回答就让它空着好了,什么好显的

e2002

Sorry ,我不是这个意思。

XDSoft

下面是XDRX_API关于POLYLINE对象的全部的ARX解决方法，看看，组合其中几个，就可以做到。

利用xdrx_polyline_numVerts求得顶点数，遍历所有顶点，利用xdrx_polyline_onSegAt判断点是否在曲线段上。

1. 
   
2. [FONT=courier new]
   
3. 268. xdrx_polyline_numVerts
   
4. 
   
5. 功能：获得LWPOLYLINE的顶点数
   
6. 
   
7. 调用格式： (xdrx_polyline_numVerts < LWPOLYLINE对象名>)
   
8.            (xdrx_polyline_numVerts)
   
9.            
   
10. 返回值：成功返回整数，否 NIL
    
11. 
    
12. 说明：不给参数，使用当前系统对象栈顶的对象。
    
13. 
    
14. 269. xdrx_polyline_segtype
    
15. 
    
16. 功能：返回POLYLINE上的顶点下面曲线段的类型
    
17. 
    
18. 调用格式：(xdrx_polyline_segtype < LWPOLYLINE对象名> < 顶点位置>)
    
19.           (xdrx_polyline_segtype < 顶点位置>)
    
20. 
    
21. 返回值：字符串
    
22. 
    
23. 说明：顶点类型－ "kLine" ，"kPoint"，"Kempty"，"kArc"
    
24. 
    
25. 270. xdrx_polyline_getArcSegAt
    
26. 
    
27. 功能：获得一个弧段顶点的弧数据
    
28. 
    
29. 调用格式：(xdrx_polyline_getArcSegAt < LWPOLYLINE对象名> < 顶点位置>)
    
30.           (xdrx_polyline_getArcSegAt < 顶点位置>)
    
31.          
    
32. 返回值：  (圆心 半径 起始角 终止角)
    
33. 
    
34. 例子：Command: (xdrx_polyline_getarcsegat 2) ;;计算对象堆栈顶的LWPOLYLINE对象
    
35.                ((42260.6 17638.3 0.0) 5260.35 6.09389 1.66863)        
    
36. 
    
37. 
    
38. 271. xdrx_polyline_getLineSegAt
    
39. 
    
40. 功能：获得一个直线段顶点的直线段数据
    
41. 
    
42. 调用格式：(xdrx_polyline_getLineSegAt < LWPOLYLINE对象名> < 顶点位置>)
    
43.           (xdrx_polyline_getLineSegAt < 顶点位置>)
    
44.          
    
45. 返回值：  (起点 终点)
    
46. 
    
47. 例子 Command: (xdrx_polyline_getlinesegat (car (entsel)) 1)
    
48.      Select object: ((45221.1 5134.88 0.0) (47427.0 16648.4 0.0))
    
49.      
    
50. 272. xdrx_polyline_getPointgAt
    
51. 
    
52. 功能：获得指定顶点位置的点
    
53. 
    
54. 调用格式：(xdrx_polyline_getPointgAt < LWPOLYLINE实体名> < 顶点索引位置>)
    
55.           (xdrx_polyline_getPointgAt < 顶点索引位置>)   
    
56.          
    
57. 返回值：点
    
58. 
    
59. 273. xdrx_polyline_getWidthsAt
    
60. 
    
61. 功能：获得顶点索引位置后曲线段的起始宽度，终止宽度。
    
62. 
    
63. 调用格式：(xdrx_polyline_getWidthsAt < LWPOLYLINE实体名> < 顶点索引位置>
    
64.           (xdrx_polyline_getWidthsAt < 顶点索引位置>   
    
65.          
    
66. 返回值：(起始宽度 终止宽度)
    
67. 
    
68. 274. xdrx_polyline_getBulgeAt
    
69. 
    
70. 功能：获得指定索引位置弧段的凸度值。
    
71. 
    
72. 调用格式：(xdrx_polyline_getBulgeAt < LWPOLYLINE实体名> < 顶点索引位置>)
    
73.           (xdrx_polyline_getBulgeAt < 顶点索引位置>)
    
74.          
    
75. 返回值：实数
    
76. 
    
77. 275. xdrx_polyline_onSegAt
    
78. 
    
79. 功能：判断一个点是否在以指定的顶点索引开始的曲线段上，若是，返回该点的参数值。
    
80. 
    
81. 调用格式：(xdrx_polyline_onSegAt < LWPOLYLINE实体名> < 顶点索引值> < 测试点>)
    
82.           (xdrx_polyline_onSegAt < 顶点索引值> < 测试点>)
    
83.          
    
84. 返回值：若在，实数(该点处的曲线参数值),否NIL
    
85. 
    
86. 276. xdrx_polyline_elevation
    
87. 
    
88. 功能：获得POLYLINE的ELEV
    
89. 
    
90. 调用格式：(xdrx_polyline_elevation < LWPOLYLINE实体名>)
    
91.           (xdrx_polyline_elevation)  ;;对象栈顶
    
92.          
    
93. 返回值：实数
    
94. 
    
95. 277. xdrx_polyline_getConstantWidth
    
96. 
    
97. 功能：获得LWPOLYLINE的等宽度
    
98. 
    
99. 调用格式：(xdrx_polyline_elevation < LWPOLYLINE实体名>)
    
100.           (xdrx_polyline_elevation)  ;;对象栈顶
     
101.          
     
102. 返回值：实数
     
103. 
     
104. 278. xdrx_polyline_hasPlinegen
     
105. 
     
106. 功能：测试LWPOLYLINE实体是否是PLINEGEN      
     
107. 
     
108. 调用格斯：(xdrx_polyline_hasPlinegen < LWPOLYLINE实体名>)
     
109.           (xdrx_polyline_hasPlinegen)  ;;对象栈顶
     
110.          
     
111. 返回值：布尔值T或者NIL
     
112. 
     
113. 说明：如果LWPOLYLINE有PLINEGEN返回T,否NIL
     
114.       PLINEGEN是一个属性，引起线型生成是穿过整条POLYLINE，还是在每个单独的段起点终点闭合。
     
115.       
     
116. 279. xdrx_polyline_hasWidth
     
117. 
     
118. 功能：测试POLYLINE是否有宽度。
     
119. 
     
120. 调用格式：(xdrx_polyline_hasWidth < LWPOLYLINE实体名>)
     
121.           (xdrx_polyline_hasWidth)  ;;对象栈顶
     
122.          
     
123. 返回值：布尔值，有宽度T 否NIL
     
124. 
     
125. 280. xdrx_polyline_hasBulges
     
126. 
     
127. 功能：测试POLYLINE是否包含弧段
     
128. 
     
129. 调用格式：(xdrx_polyline_hasBulges < LWPOLYLINE实体名>)
     
130.           (xdrx_polyline_hasBulges)  ;;对象栈顶
     
131.          
     
132. 返回值：布尔值，有弧段T 否NIL
     
133. 
     
134. 281. xdrx_polyline_isOnlyLines
     
135. 
     
136. 功能：测试POLYLINE是否仅仅由直线段组成
     
137. 
     
138. 调用格式：(xdrx_polyline_isOnlyLines < LWPOLYLINE实体名>)
     
139.           (xdrx_polyline_isOnlyLines)  ;;对象栈顶
     
140.          
     
141. 返回值：布尔值，是T 否NIL
     
142. 
     
143. 282. xdrx_polyline_thickness
     
144. 
     
145. 功能：获得POLYLINE的thickness
     
146. 
     
147. 调用格式：(xdrx_polyline_thickness < LWPOLYLINE实体名>)
     
148.           (xdrx_polyline_thickness)  ;;对象栈顶
     
149.          
     
150. 返回值：实数
     
151. 
     
152. 283. xdrx_polyline_addVertexAt
     
153. 
     
154. 功能：在指定索引位置处增加一个顶点
     
155. 
     
156. 调用格式：(xdrx_polyline_addVertexat < LWPOLYLINE实体名> < index索引值> < 点> [bulge值] [起始宽度][结束宽度])
     
157.           (xdrx_polyline_addVertexat < index索引值> < 点> [bulge值] [起始宽度][结束宽度])
     
158.          
     
159. 返回值：成功T, 否 NIL
     
160. 
     
161. 说明：参数 [bulge值] [起始宽度][结束宽度]都为可选项，默认值都为0 ，后面的可选项若要设置必须前面的可选项也设置，但
     
162.       该可选项后面的若要默认值，可以省略。
     
163.       [bulge值]--实数，若加弧段给BULGE值。0退化为直线
     
164.       [起始宽度]，[结束宽度]--实数值或者整数值。
     
165.       
     
166. 284. xdrx_polyline_removeVertexAt
     
167. 
     
168. 功能：移去一个顶点
     
169. 
     
170. 调用格式：(xdrx_polyline_removeVertexAt < LWPOLYLINE实体名> < index索引值>)     
     
171.           (xdrx_polyline_removeVertexAt  < index索引值>)   
     
172.          
     
173. 返回值：成功T 失败NIL
     
174. 
     
175. 说明：移去一个定点，意味着该顶点后的曲线段也移去。
     
176. 
     
177. 285. xdrx_polyline_setBulgeAt
     
178. 
     
179. 功能：在指定的索引位置，设置BULGE值，即若该索引后的段是直线，则变成弧。
     
180.       若是弧，则改变到新的BULGE         
     
181.       
     
182. 调用格式：(xdrx_polyline_setBulgeAt < lwpolyline实体名> < index索引> < bulge值>)
     
183.           (xdrx_polyline_setBulgeAt < index索引> < bulge值>)
     
184. 
     
185. 返回值：成功T,失败NIL
     
186. 
     
187. 说明：参数bulge值为实数。
     
188. 
     
189. 286. xdrx_polyline_setConstantWidth
     
190. 
     
191. 功能：设置POLYLINE的等宽值
     
192. 
     
193. 调用格式：(xdrx_polyline_setConstantWidth < lwpolyline实体名> < 宽度值>)
     
194.           (xdrx_polyline_setConstantWidth  < 宽度值>)
     
195. 
     
196. 返回值：成功T ,失败NIL
     
197. 
     
198. 说明：参数< 宽度值>为实数或者整数
     
199. 
     
200. 287. xdrx_polyline_setElevation
     
201. 
     
202. 功能：设置POLYLINE的ELEV
     
203. 
     
204. 调用格式：(xdrx_polyline_setElevation < lwpolyline实体名> < ELEV值>)
     
205.           (xdrx_polyline_setElevation < ELEV值>)
     
206.          
     
207. 返回值：成功T ,否NIL
     
208. 
     
209. 288. xdrx_polyline_setNormal
     
210. 
     
211. 功能：设置POLYLINE的拉伸矢量
     
212. 
     
213. 调用格式：(xdrx_polyline_setNormal < lwpolyline实体名> < 向量>)
     
214.           (xdrx_polyline_setNormal < 向量>)
     
215. 
     
216. 返回值：成功T 否NIL
     
217. 
     
218. 说明：< 向量>以点的形式输入，如：(0 0 1)
     
219. 
     
220. 289. xdrx_polyline_setPlinegen
     
221. 
     
222. 功能：设置POLYLINE线型的PLINEGEN属性
     
223. 
     
224. 调用格式：(xdrx_polyline_setPlinegen < lwpolyline实体名> [plinegen flag])
     
225.           (xdrx_polyline_setPlinegen  [plinegen flag])
     
226. 
     
227. 返回值：成功T,否NIL
     
228. 
     
229. 说明：[plinegen flag]=T，线性穿过整条曲线，不给参数，线性在每个顶点起始，结束闭合线型。
     
230. 
     
231. 290. xdrx_polyline_setPointAt
     
232. 
     
233. 功能：修改指定索引处的顶点到新的顶点（不增加新顶点）
     
234. 
     
235. 调用格式：(xdrx_polyline_setPointAt < lwpolyline实体名> < indexs索引> < 新顶点>)
     
236.           (xdrx_polyline_setPointAt < indexs索引> < 新顶点>)
     
237. 
     
238. 返回值：成功T 失败返回NIL
     
239. 
     
240. 291. xdrx_polyline_setThickness
     
241. 
     
242. 功能：设置POLYLINE的THICKNESS
     
243. 
     
244. 调用格式：(xdrx_polyline_setThickness  < lwpolyline实体名> < thickness值>)   
     
245.           (xdrx_polyline_setThickness  < thickness值>)
     
246.          
     
247. 返回值：成功T 失败NIL
     
248. 
     
249. 292. xdrx_polyline_setWidthsAt
     
250. 
     
251. 功能：修改指定索引值处下面段的起始、结束宽度
     
252. 
     
253. 调用格式：(xdrx_polyline_setWidthsAt < lwpolyline实体名> < index索引> < 起始宽度>< 结束宽度>)
     
254.           (xdrx_polyline_setWidthsAt < index索引> < 起始宽度>< 结束宽度>)
     
255.          
     
256. 返回值：成功T 失败NIL
     
257. 
     
258. 说明：< 起始宽度>< 结束宽度>：实数或者整数
     
259. 
     
260. 293. xdrx_polyline_ConvertFrom
     
261. 
     
262. 功能：从2DPOLYLINE(R13老多义线)转换得到LWPOLYLINE
     
263. 
     
264. 调用格式：(xdrx_polyline_ConvertFrom < 2dpolyline实体>)
     
265. 
     
266. 返回值：成功T 失败返回NIL
     
267. 
     
268. 说明：转换后，删除原来老POLY,用新LWPOLY代替
     
269. [/FONT]

复制代码

雄啸

1.编程方法：同xd, 遍历实体顶点，判断取点的位置
2.炸开,取得线段端点后，删除炸开的部分

aeo

谢谢xd和雄啸
其实是这样的,最近做了一堆的坡屋顶,檐口标高是一样的,坡度一定,求屋脊
我檐口是用pl线画的, 好offset,line线的很好写,但炸开实在可惜.