[讨论]：在天正5.0的轴线绘制或坐标标注中，轴线或坐标能在当前鼠标处即时显示，这种

netbee

我在使用天正5.0的过程中，发现它的很多功能都有这种预览：
　　1、轴线绘制时，当你在轴线对话框确定后，轴线就能在当前的鼠标处即时显示，并随着鼠标的移动而移动，而且此时命令行中还有很多选项，当选中不同选项后，还能即时更新显示。
　　2、坐标标注时，当确定标注点后，就能即时的在不同象限出现提示
。。。。。。。。。。

　　我也想在程序中加入这种功能，不知有哪些方法能实现呢？

zhengliping

我想，他的轴线是一开始就会制完成了，然后使用移动命令即可实现！

aeo

最初由 netbee 发布
[B]我在使用天正5.0的过程中，发现它的很多功能都有这种预览：
　　1、轴线绘制时，当你在轴线对话框确定后，轴线就能在当前的鼠标处即时显示，并随着鼠标的移动而移动，而且此时命令行中还有很多选项，当选中不同选项... [/B]

用晓东api也可以.推荐你用一下.
写的方法就是工具箱里的“自由移动”的方法.

lisp--只能grread grdraw组合了，不是很好.

netbee

我想不是用的移动命令，因在移动命令状态下是不能有其他选项的！
    是不是命令回调函数呢？
      当命令运行后，就在当前鼠标绘制，并每隔一个时间段刷新一次！

aeo

肯定是"移动" ,工具箱里的“自由移动”也这样

重生成也行，没移动快.

因为，在过程中其实没移动实体，提供给你的只不过是"显示".确定了点才移动.
这个只有arx可办到,可以请教晓东.

eachy

ET工具也有这个函数

(acet-ss-drag-move ss pt [prompt] [highlight [cursor]])

Drag a selection set to change location.

Arguments
ss The selection set to drag.
pt The base point.
prompt A message to display before dragging is started.
highlight If given, causes a rubber-band line to be drawn from pt to the current cursor position while dragging; this parameter can be nil to draw a rubber-band line in the inverse of the screen color, or non-nil to draw a highlighted line.
cursor The cursor form to display while dragging (0=crosshairs, 1=no cursor, 2=target).

Return Values
Normally returns the selected point, but will honor initget settings and can return arbitrary text or keywords. Returns nil if the dragging operation is aborted.

Note:
The acet-ss-drag-move function does not move the selection set, but allows selection of a new position while showing how the result will appear.

e2002

ET中的这个函数做得不够完善,没有XD的那么完美.
如果非要这样的实现,只有使用arx的drag才能做到

aeo

最初由 e2002 发布
[B]ET中的这个函数做得不够完善,没有XD的那么完美.
如果非要这样的实现,只有使用arx的drag才能做到 [/B]

不过晓东的比起天正来，要慢一些。
在几十M的文件里，显示的不对,不知为什么.