Mouse reactors?

I'd like to click on something and hold the pick button down while dragging it.
When the button is released it would be dropped at that point. Grread, by
itself, isn't enough. Vlr-mouse-reactor doesn't seem to offer click on - click
off .

Here's my quick move function -- and it's not bad, but the effort of clicking
twice is tiring:

(defun c:n(/ ob pnt ) ;quick move
(princ "\nEnter M for regular move")
(while
(setq ob (entsel "\nPick Object: ")
pnt(cadr ob)
)
(princ "\nMove it: ")
(command "move" ob "" pnt pause)
)
(princ))

rs

 

Bob:

What happens when you try that (with no command active)?

 

2005 does that already. What ver do you have?
If you press ctrl while dragging it will copy.

Rick

 

It highlights and some grips appear. Selecting the correct grip will move it
unless it's a complex object. Selecting any grip and highlighting it will invoke
the move-rotate-scale-mirror-stretch cycle (and very handy it is). But it will
not drag of its own accord while the button is depressed.

Aside from my gross laziness, it seems that there would be a good use for
button-down and button-up reactors.

rs

 

2004. And, by golly, if you press alt it will move. But you have to click it
twice to get it started. Live and learn.

rs

 

It highlights and some grips appear. Selecting the correct grip will

Yes, you have to select the object where there is no grip, else the grip
edit operation will start.

In ObjectARX you can use windows hooks or window subclassing to intercept
mouse events, but interfering with mouse events can be a lot more
complicated than it first appears, and I wouldn't want to try that from
lisp.

 

If I *really* needed it I could probably invoke a windows macro program like Quick Macros but I wanted to keep it in the family.
Ah, well.

rs