带记忆的连续复制

Lispboy

st788796 发表于 2013-7-16 00:04
调整了下程序，适应第二次应用时直接回车打开 Ortho 模式情况，楼上的帖子保留，可以对比看看改了哪些

用晓东API提供的DRAG函数，很方便的。

(xdrx_drag_move "\n提示" ss pj)

第一次复制后，(xdrx_drag_getlastpoint) 得到上次鼠标点，就能确定和开始的基点的方向了。

(xdrx_drag_getlastmatrix) ;  获得上次的变换矩阵，这个矩阵可以得到很多需要的信息。

eachy

Lispboy 发表于 2013-7-16 00:34
用晓东API提供的DRAG函数，很方便的。

(xdrx_drag_move "\n提示" ss pj)

用拖动那几个函数应该可以写出和2014版一样的copy，有一个单向阵列选项，不过这个帖子中可能transformedcopy就适合楼主了，单向可变间距"阵列"，间隙记忆，有第一次的方向，后面是键盘操作，不需要鼠标的拖动效果
这里大家讨论lisp多些，外挂分坛有个C#写的Copy，和2014的标准copy一样，a选项为单向阵列，然后恢复可以自由copy，用netload加载，适合2007以上版本

清风明月10

谢谢众位坛友代码分享！

--@-----

eachy 发表于 2013-7-16 06:53
用拖动那几个函数应该可以写出和2014版一样的copy，有一个单向阵列选项，不过这个帖子中可能transforme ...

不用加载  xdrxapi
可以吗？  我说的不是变间距 只要记忆上次的距离，和能拖动确定方向就可以了{:soso_e100:}

eachy

--@----- 发表于 2013-7-16 13:06
不用加载  xdrxapi
可以吗？  我说的不是变间距 只要记忆上次的距离，和能拖动确定方向就可以了{:soso_e ...

30楼的程序不是LZ的要求吗？