关于多段线修剪的问题？

hgo1984924 · 发表于 2011-1-12 16:11:50

本帖最后由 hgo1984924 于 2011-1-12 16:15 编辑

如下图所示

多段线与两条直线有交点，需通过VBA程序将多段线
在两直线外侧的部分修剪掉，现交点坐标可以通过
IntersectWith函数求得，问如何修剪

问题详解：上图中多段线的定点个数不定而且很多上千个

，交点位置不一定在多段线顶点处，如何实现修剪。
我用SendCommand函数传入tr命令无法实现后台修剪，
只能通过get系列函数从屏幕获得，不知怎么解决。

请各位高手出手相帮，本人才疏学浅实在是没办法了。。。

chmenf087 · 发表于 2011-1-12 18:40:37

sendcommond 也可以，需要用到handle：即<图元名: 7ef95400>
可以建一个动态数组来存放图元名。然后用lisp表达式来进行修剪
但是用sendcommond会出现一个问题就是修剪得方向是哪一侧不确定，所以建议用修改beganpoint和endpoint 的方法

hgo1984924 · 发表于 2011-1-13 14:37:36

楼上的兄弟说的很好用send命令后可以通过利用起终点坐标来定位修剪的方向
可是总是出错我自己写的测试程序可以通过但嵌套进主程序就不行了
要是能有别的一个思路就好 send函数用的总是很不爽啊

hgo1984924 · 发表于 2011-1-13 14:48:15

回复 chmenf087 的帖子

修改beginpoint和endpoint 的方法具体怎么操作呢

账号		自动登录	找回密码
密码			注册

关于多段线修剪的问题？

本帖子中包含更多资源