乐筑天下

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

【自用小程序】插入图框及修改图框比例,源码。

[复制链接]

2

主题

9

帖子

4

银币

初来乍到

Rank: 1

铜币
15
发表于 2018-10-31 23:24:00 | 显示全部楼层 |阅读模式
调试平台:cad2014+天正T20V4,其余自测
功能一:插入图框

4awfiff4heq.gif

4awfiff4heq.gif


1.点选一个图框图块(自动辨别图幅及方向,如图框图幅不正确会进行提示)
2.点选对角点后生成图框(自动识别方向和比例,比例小于20识别精度为1,比例大于20识别精度为5。)
3.如果是属性块则修改属性字标记为“比例”的值
3.修改框选内天正对象的比例为识别后的比例值(有判断,有无对象都行)
4.修改天正全局比例为识别后的比例值(无判断,不需要可删除代码)
------------------------------------------------------------------------------------
功能二:修改图框比例

g4dh0r11kfh.gif

g4dh0r11kfh.gif


选择多段线
1.点选一个多段线(跳出图幅选项后计算当前比例)
2.修改多段线内天正对象的比例为识别后的比例值(有判断,有无对象都行)
3.修改天正全局比例为识别后的比例值(无判断,不需要可删除代码)
选择图框
1.点选一个图框(识别图框图幅及当前比例,如图框图幅不正确会进行提示)
2.输入要修改的比例值或者不输入保持当前识别比例
3.图框比例小于20识别精度为1,比例大于20识别精度为5。(如原图框比例为103,则会自动修改为105)
4.如果是属性块则修改属性字标记为“比例”的值
5.修改图框内天正对象的比例为识别后的比例值(有判断,有无对象都行)
6.修改天正全局比例为识别后的比例值(无判断,不需要可删除代码)
------------------------------------------------------------------------------------
只发布在乐筑天下,未经允许不得转发。
回复

使用道具 举报

93

主题

786

帖子

15

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1153
发表于 2018-11-1 09:59:00 | 显示全部楼层
1:100的A0和1:200的A2请问如何精确区分
考虑过有的图框外框线还带4个对齐点的情况吗
还有变图幅的动态块形式的图框能正确识别包围盒吗
另外自动改比例的功能设置
考虑过布局中视口比例不是1:1的情况没有
其实我想表达的意思是
这个程序可能对绝大多数图框是有效的
但就程序文件的大小推测
通杀应该还做不到吧
回复

使用道具 举报

0

主题

10

帖子

5

银币

初来乍到

Rank: 1

铜币
9
发表于 2022-7-8 02:00:00 | 显示全部楼层
当前图框短边长度为【31.5000mm】,建议修改图块!
请选取第一个角点:
请选取第二个角点:; 错误: ActiveX 服务器返回错误: 无效索引。
回复

使用道具 举报

2

主题

9

帖子

4

银币

初来乍到

Rank: 1

铜币
15
发表于 2018-11-6 09:53:00 | 显示全部楼层

该错误已修复
回复

使用道具 举报

15

主题

644

帖子

20

银币

中流砥柱

Rank: 25

铜币
698
发表于 2018-11-1 10:51:00 | 显示全部楼层
谢谢! 1、2、3、三枪 分享程序!!!!!
回复

使用道具 举报

2

主题

49

帖子

10

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
56
发表于 2018-11-2 13:56:00 | 显示全部楼层
lselsetp nil  错误提示
回复

使用道具 举报

2

主题

9

帖子

4

银币

初来乍到

Rank: 1

铜币
15
发表于 2018-11-7 18:45:00 | 显示全部楼层
顺便问个问题,编译成vlx之后载入会出现nil是什么情况
回复

使用道具 举报

0

主题

16

帖子

7

银币

初来乍到

Rank: 1

铜币
15
发表于 2018-11-9 12:17:00 | 显示全部楼层
好码,学习学习!
回复

使用道具 举报

2

主题

43

帖子

7

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
50
发表于 2018-11-9 22:43:00 | 显示全部楼层
这个想法不错
回复

使用道具 举报

2

主题

104

帖子

8

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
110
发表于 2018-11-10 16:41:00 | 显示全部楼层
棒棒的
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-5-25 05:09 , Processed in 1.262329 second(s), 76 queries .

© 2020-2025 乐筑天下

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