关于多段线修剪的问题?
本帖最后由 hgo1984924 于 2011-1-12 16:15 编辑如下图所示
多段线与两条直线有交点,需通过VBA程序将多段线
在两直线外侧的部分修剪掉,现交点坐标可以通过
IntersectWith函数求得,问如何修剪
问题详解:上图中多段线的定点个数不定而且很多上千个
,交点位置不一定在多段线顶点处,如何实现修剪。
我用SendCommand函数传入tr命令无法实现后台修剪,
只能通过get系列函数从屏幕获得,不知怎么解决。
请各位高手出手相帮,本人才疏学浅实在是没办法了。。。
sendcommond 也可以,需要用到handle: 即<图元名: 7ef95400>
可以建一个动态数组来存放图元名。然后用lisp表达式来进行修剪
但是用sendcommond会出现一个问题就是修剪得方向是哪一侧不确定,所以建议用修改beganpoint和endpoint 的方法 楼上的兄弟说的很好 用send命令后 可以通过利用起终点坐标来定位修剪的方向
可是总是出错 我自己写的测试程序可以通过 但嵌套进主程序就不行了
要是能有别的一个思路就好 send函数用的总是很不爽啊 回复 chmenf087 的帖子
修改beginpoint和endpoint 的方法 具体怎么操作呢
页:
[1]