【odcl程序】修订云线【升级为2.2版···20180708】
本帖最后由 masterlong 于 2018-7-8 12:12 编辑本程序用于绘制修订云线并添加文字标记。欢迎任意修改，仅修改作者名称除外
同学们若修改了程序，并且自认比较满意的，欢迎上传源码，大家共同学习，共同提高
需要说明的是，某些看似很简单的修改要求，实际可能需要对代码进行大量修改
由于本人工作比较忙，所以基本上不会对“程序修改请求”进行响应，请理解
==========================================================================
简要说明：
1.本程序需doslib、opendcl支持。下面有下载地址
2.程序文件夹需设置为CAD支持路径
3.命令：YX
doslib、opendcl运行库下载地址
http://bbs.mjtd.com/thread-173225-1-1.html
程序运行流程：
1.指定两点绘制云线
2.指定文字标记点时，按默认设置添加文字标记，并启动非模式对话框
3.对话框中，可调整云线样式、颜色以及标记文字内容等
4.除标记文字内容外，其余调整均作为下次运行本程序时的默认选项
5.可建立和保存不同的配置
程序使用要点
1.创建配置时，图层关键字用于创建配置专用图层。图层名=
其中hide、view由图层打印可见性决定
————程序思路中，可见性是可调整的，调整同时自动修改图层名称
————由于时间关系，暂不提供图层打印可见性的调整代码
2.预设文字列表编辑时，注意单行条目可设置分行显示，采用分行符/p进行分隔（注意对话框中不可见）
程序未完善功能（也不一定会去修改完善，因为自用是没问题了。有强迫症又有能力的同学可自行完善）
1.代码及程序流程未优化
2.出错处理代码未添加
3.部分辅助功能代码未添加
a.“配置删除功能”（————需要时，可手动修改配置文件）
b.“打印可见性修改功能”（————需要时，可手动修改配置文件）
c.“当前标记文字入库功能”（————需要时，可使用预设编辑）
4.未添加“已创建云线编辑功能”
5.部分预设按钮可能不再需要
6.暂不支持UCS
==========================================================================
程序源码下载
若缺少子函数的说一下
------------更新说明------------2018年07月08日
v2.2改进更新内容
1.修正v2.1版发现的图层显示不正确的BUG
2.置顶、置底文字，支持转义字符串。如：“today”转换为当天日期“2018.07.08”
可用转义字符：todaynowtimenow 。需要其它转义字符的，可在源码中自行增加
=============================================================== 2018年07月08日
v2.1改进更新内容
1.根据实际使用情况，将对话框分为云线样式调整(非模式)和文字编辑(模式)两个
2.文字编辑对话框根据鼠标位置自动调整，操作更便捷
3.增加“清空”按钮，适用多个云线指向同一标记文字的情况
4.字高对话框加入倍数选项
5.添加对支持函数库文件的检查和加载代码
已发现问题
1.切换配置时，偶尔出现“专属图层名称实际已更改，但对话框中未更新显示”的情况，原因未明
注：问题原因已搞清楚
opendcl里ComboBox控件设为layers类型时
它的列表排序与CAD的字符串排序不同
=============================================================== 2018年06月28日
谢谢楼主的分享！
错误: no function definition: DCL-FORM-ISACTIVE
本帖最后由 masterlong 于 2018-7-4 12:05 编辑
已升级到2.1版
附件见首贴
v2.1改进更新内容
1.根据实际使用情况，将对话框分为云线样式调整(非模式)和文字编辑(模式)两个
2.文字编辑对话框根据鼠标位置自动调整，操作更便捷
3.增加“清空”按钮，适用多个云线指向同一标记文字的情况
4.字高对话框加入倍数选项
5.添加对支持函数库文件的检查和加载代码
已发现问题
1.切换配置时，偶尔出现“专属图层名称实际已更改，但对话框中未更新显示”的情况，原因未明
注：问题原因已查清
详见首贴
附件暂不修改
待程序升版时更新
----------------------------------2018年07月04日备注
==============================================================2018年06月28日
针对前面某些朋友反映不能使用的情况
这次更新特意增加了支持函数库的检查和加载代码
本帖最后由 hf423 于 2023-6-20 22:49 编辑
masterlong 发表于 2021-9-2 15:41
搜一下"附件修复"
龙大侠好，网络发布版中，点击面板中的翻转按钮，文字没有翻转
看代码本应该是执行c:my_yx_mark/markyxmode/chttjust#OnClicked
但实际上测试了一下，好像翻转按钮未关联任何操作
知道原因了
c:my_yx_mark/markyxmode/chttjust#OnClicked
改为
c:my_yx_mark/markttdcl/chttjust#OnClicked
就好了
整合到一块可以吗？不懂编程啊 这个功能好，支持一下，谢谢 那两个支持的放到那？用安装吗 方便留个联系方式吗？QQ:77386072 谢谢分享，这功能很好，普通云线还得再画个线来备注，这一步到位了。 很好的程序，加精 不错不错 学习了 本帖最后由 masterlong 于 2018-6-22 21:27 编辑
今天用这个程序实际来进行校审
发现还是有一些问题
手感不是很舒服
主要是非模式对话框
鼠标必须在框内
实际上很容易就滑出去
初步设想文字编辑和选项分开这两天出差在外
回来再改