乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 144|回复: 7

请教高手!!!如何将距离十分近的多段线连接起来

[复制链接]

1

主题

2

帖子

1

银币

初来乍到

Rank: 1

铜币
6
发表于 2009-10-17 22:42:00 | 显示全部楼层 |阅读模式
请高手帮忙出个办法解决,谢谢了!!
回复

使用道具 举报

11

主题

326

帖子

9

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
370
发表于 2009-10-18 21:20:00 | 显示全部楼层
pedit就可以的
回复

使用道具 举报

1

主题

2

帖子

1

银币

初来乍到

Rank: 1

铜币
6
发表于 2009-10-18 22:48:00 | 显示全部楼层
这位朋友是什么意思啊?   我现在用的算法是2个线段分别用首尾首首来找运行的速度十分慢,你有什么比较好的方法么?
回复

使用道具 举报

11

主题

326

帖子

9

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
370
发表于 2009-10-21 21:50:00 | 显示全部楼层
如果是直线或多线段的话,使用pedit这个命令就可以将它们连起来,如果自己编程的话,会很难的
你看一pedit这个命令的说明应该就能明白。
回复

使用道具 举报

25

主题

219

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
319
发表于 2009-10-22 18:26:00 | 显示全部楼层
  Dim mode As Integer
  mode = acSelectionSetAll
  line_line.Select mode, , , FilterType, FilterData
  line_line.Update
ThisDrawing.SendCommand "_pedit" & vbCr & "m" & vbCr & "p" & vbCr & vbCr & "Y" & vbCr & "J" & vbCr & "0.000" & vbCr & vbCr
回复

使用道具 举报

72

主题

2726

帖子

9

银币

社区元老

Rank: 75Rank: 75Rank: 75

铜币
3014
发表于 2009-10-22 21:55:00 | 显示全部楼层
按组码10做过滤器
回复

使用道具 举报

110

主题

324

帖子

10

银币

中流砥柱

Rank: 25

铜币
764
发表于 2009-10-30 10:05:00 | 显示全部楼层
雪山飞狐版主在说的明白一点;怎样使用组码10?哪里有关于过滤组码的说明呀,帮助中的文件看不等。谢谢
      Dim FilterType(0) As Integer
      Dim FilterData(0) As String
FilterType(0)=10
FilterData(0)=???
回复

使用道具 举报

27

主题

309

帖子

10

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
417
发表于 2009-10-30 18:49:00 | 显示全部楼层
线串连程序
使用方法:在命令行用appload成功加载cl1.vlx程序后,在命令行输入 cl  回车按提示操作即可。
请点击此处下载

请先注册会员后在进行下载

已注册会员,请先登录后下载

文件名称:c0wpksro33g.rar 
下载次数:0  文件大小:949 Bytes  售价:2银币 [记录]
下载权限: 不限 以上或 Vip会员   [开通Vip]   [签到领银币]  [免费赚银币]

回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-1 17:35 , Processed in 0.790584 second(s), 73 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表