[编程申请]：求助如何在面状中自动加点的程序

playboy · 发表于 2003-12-5 14:10:06

您需要登录才可以下载或查看，没有账号？立即注册

×

求助如何在面状中自动加点的程序
请大家帮帮忙

lsjjm · 发表于 2003-12-5 14:48:45

什么是面状呀? 建筑行业?

playboy · 发表于 2003-12-5 17:39:31

不是建筑业的是水利的，只要自动得给一个面内加一个点就可以了。然后根据点加一些注记明白了吗？
我以前曾经想过一个办法就是求对角线然后取中点的坐标可是只能对规则的有用，如果不规则的怎么办。

eachy · 发表于 2003-12-6 15:57:21

最初由 playboy 发布
[B]不是建筑业的是水利的，只要自动得给一个面内加一个点就可以了。然后根据点加一些注记明白了吗？
我以前曾经想过一个办法就是求对角线然后取中点的坐标可是只能对规则的有用，如果不规则的怎么办。 [/B]

发个图详细说明

playboy · 发表于 2003-12-6 17:10:06

斑竹问题在这里。
小弟对你的热心帮助在这里说声谢谢了。

eachy · 发表于 2003-12-7 10:06:26

最初由 playboy 发布
[B]斑竹问题在这里。
小弟对你的热心帮助在这里说声谢谢了。 [/B]

先回答第二个问题，对拾取点生成边界可以使用CAD 命令 BOUNDARY ，如果有不封闭部分，本论坛曾经有个工具输入一个距离即可生成边界。

playboy · 发表于 2003-12-7 14:09:02

谢谢斑竹
我试过了你给的提供的那个方法我们不能用。
只有程序能够解决这个问题。
我现在正在做，但是我的能力和时间有限。
就麻烦您了

eachy · 发表于 2003-12-7 15:58:11

最初由 playboy 发布
[B]谢谢斑竹
我试过了你给的提供的那个方法我们不能用。
只有程序能够解决这个问题。
我现在正在做，但是我的能力和时间有限。
就麻烦您了 [/B]

好了，第一个在Polyline内布点程序。
程序要求闭合的轻量多义线（LwPolyline），点样式请事先设定好，为了排除点重合的情况，多义先与点做成了匿名组。

playboy · 发表于 2003-12-8 16:59:05

谢谢斑竹大人
可是我不知道如何运行呀敲什么命令啊
还有什么叫做匿名组啊我不太懂

eachy · 发表于 2003-12-8 18:11:02

最初由 playboy 发布
[B]谢谢斑竹大人
可是我不知道如何运行呀敲什么命令啊
还有什么叫做匿名组啊我不太懂 [/B]

命令： Ea:PolyPt

playboy · 发表于 2003-12-8 18:52:34

不行呀斑竹您是拿我的那幅图调试的吗。我这个怎么不好使呢。
能把代码给我吗是不外传

eachy · 发表于 2003-12-9 15:17:25

最初由 playboy 发布
[B]不行呀斑竹您是拿我的那幅图调试的吗。我这个怎么不好使呢。
能把代码给我吗是不外传 [/B]

看了下你的图，不能用的原因是Pline 的组码是 129 ，还有一部分的Pline 画的不规范，有重合点或者两点的距离非常近，这种情况下程序也会出错，改进中。

playboy · 发表于 2003-12-9 16:41:58

谢谢斑竹大人，让您费心了。我刚才又试过一下还是有一些问题。
你看可否这样做分别去坐标然后比较其距离球对角线然后再求交点
交点处加点

eachy · 发表于 2003-12-10 02:08:49

最初由 playboy 发布
[B]谢谢斑竹大人，让您费心了。我刚才又试过一下还是有一些问题。
你看可否这样做分别去坐标然后比较其距离球对角线然后再求交点
交点处加点 [/B]

再试试这个，Appload加载，命令：Ea:polypt

playboy · 发表于 2003-12-10 13:27:35

斑竹我又测试了一下这个程序还是有一点得问题。有的时候算出来的点是错误的。
而且有的时候可能跟线的节点有关系，出了一些问题，能否改进一下。
谢谢了

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