[试用]：推荐一个非常好用的建筑标高标注程序。

ydf7332462

F8正交；块的方向依选到的实体，第二点仅用于判别块的翻转方向

njshf

只要F8功能？

柔柔

可怜！没钱下载不了。能请教一个问题吗？
用lisp什么语句实现图形随鼠标变动？或者说用什么语句截取鼠标位置（XY坐标值）？

XDSoft

最初由 柔柔 发布
[B]可怜！没钱下载不了。能请教一个问题吗？
用lisp什么语句实现图形随鼠标变动？或者说用什么语句截取鼠标位置（XY坐标值）？ [/B]

XDRX_API

1. [font=courier]
   
2. 145.xdrx_drawing_lastpts
   
3. 
   
4. 功能：返回最近两次用鼠标左键拾取过的点。
   
5. 
   
6. 调用格式：(xdrx_drawing_getlastptss)
   
7. [/font]

复制代码

1. [font=courier]
   
2. xdrx_drawing_GetCPoint
   
3. 
   
4. 功能： 返回鼠标当前位置的WCS坐标
   
5. 
   
6. 调用格式：(xdrx_drawing_getcpoint)
   
7. 
   
8. 返回值：点
   
9. [/font]

复制代码

njshf

我用的是(Grread)

柔柔

谢谢各位，下载不了我就试着自己编，学习学习。

XDSoft

最初由 柔柔 发布
[B]谢谢各位，下载不了我就试着自己编，学习学习。 [/B]

精神可嘉，奖励你10个爱心币，去下载吧。

自己写好后，欢迎贴到论坛来和大家分享。

柔柔

谢谢，既然我决定自己编，就不下载了。
我的思路是这样：在要求指示标准位置时显示当前的比例因子，第一次使用可以把系统变量dimscale作为缺省值，容许用户设置（正常情况下这个尺寸标注全局比例因子能代表图纸比例因子，但象天正建筑尺寸标注的设置就不能用了），设置后作为下次的缺省值。第一次指示的点与输入的标高值的差值记录在案（用户全局变量，包括取几位小数也由此时决定），以后的标注位置的坐标值减去这个差值作为标高输入的缺省值，当标高为0 时前面加±符号。这样，如果严格按1：1绘图的话基本不用输入而是用右键就行。这是我的想法，还请高手指教。再次表示感谢！

johnhill

到时候下载用用看

ydf7332462

我是说，块的方向：
第一点如已选到的实体. 第二点如回车，就是第一点已选实体的切线方向，第二点如不回车
        则由一二两点定方向；
第三点用于判别块的翻转方向.
打开F8就正交，

柔柔

我现在还没时间编，没编就很难说一定能编出来。不过，我不太同意用F8 键，其一，按F8 键让其正交也只能画角度为0 的水平方向，垂直方向呢？ 其二， 为何不能用角度来判断呢？比如，与坐标轴线夹角小于多少便取与轴线相同，这样不是可以省掉一个按键吗？自己编程的目的就是要省掉作图步骤，让人轻松，否则插入一个图块不照样解决问题？
另外，(grread) 我还是不会用，我在一本书上看到“Autodesk 公司建议在用grread 之前用getxxx ”，但getxxx (如getpoint) 它是等待用户输入，这个时候系统不运行的呀，不用 getpoint ，用循环语句 加grread 可以获得光标的坐标值，但如何控制让它停下？我对这个问题特别感兴趣，象ACAD 的移动、旋转命令，它能使对象随光标而变化，非常直观。楼主能否教教我呀？

njshf

不用F8键，任意角度的情况就不好办了。

XDSoft

最初由 柔柔 发布
[B]我现在还没时间编，没编就很难说一定能编出来。不过，我不太同意用F8 键，其一，按F8 键让其正交也只能画角度为0 的水平方向，垂直方向呢？ 其二， 为何不能用角度来判断呢？比如，与坐标轴线夹角小于多少便取与轴线... [/B]

LISP 对脱拽选择集，动态显示没有办法解决。

这个要使用ARX的AcEdJig 类来实现。

如果你使用XDRX_API，提供了函数接口给LISP，可以动态脱拽选择集，因为使用了AcEdJig，因此显示速度非常块。因为ACAD的一些命令本身就是这么用的。

你可以看看晓东工具箱里面的“自由拷贝”，“自由移动”等，去看看晓东工具箱里面相关的LISP程序，看看API是如何使用的。

可以拖动任意选择集，“拖动的过程中”做旋转、缩放、对齐等变换。

下面看演示：


下载地址：http://www.xdcad.net/tech/xd_tbox/xdtb_xcopy.swf

<embed src=/tech/xd_tbox/xdtb_xcopy.swf quality=high width=800 height=482 loop=true type="application/x-shockwave-flash">
</embed>

柔柔

初来乍到，晓东工具箱也没下载，更不懂 API 为何物，见笑见笑。
我怎么觉得诸位讲的函数都是XDxxx，如：
xdrx_drawing_GetCPoint
功能： 返回鼠标当前位置的WCS坐标
调用格式：(xdrx_drawing_getcpoint)
返回值：点

这是不是一定要安装晓东工具箱后才行？如果编程时要用，执行时可以不用，那就像VB，只是一个开发平台，这我能接受，如果执行通过晓东工具箱编制的程序也要安装晓东工具箱才能用，那就没意思了，我追求的是在ACAD下，不安装任何其他二次开发的软件独立使用的功能。说实话，这个建筑标高，天正上有，但我就是不喜欢那种成为“某个软件”的二次开发，一直拒绝使用。
看楼主的bg.vlx 演示好像达到了我想要的功能，vlx 不是lsp 的执行程序吗？

ZHPCUAN

先用看看不过看你的演示挺好的