odd behaviour for nentsel

Display the acad standard toolbar, then try this code:

(SETQ EPICK (vl-catch-all-apply '(lambda () (PROGN (INITGET "lEft Right") (NENTSEL "\nSelect line, arc, or bearing
[curve lEft/curve Right]:")))))

when it promps you "Select line, arc, or bearing [curve lEft/curve Right]:", pick the pan button from the standard
toolbar, do the pan (hit enter to continue), then enter E.

I expected to get a return of "lEft"
instead it asks for a window type selection.

Any ideas whats up? Does a transparent command mess up the initget?
thanks
James Maeding
Civil Engineer/Programmer

 

Hi, James.

I tried it in various formats in 2002. Very odd. I think that (getpoint)
cooperates, but maybe the (nentselx) functions don't.

(NENTSEL "\nSelect line, arc, or bearing

pick the pan button from the standard

 

Thanks John,
the really off thing is that you can type 'p and it works but picking the pan button messes it up.
It fairly common for a user to pan before entering a value so I have to work this out...
James Maeding
Civil Engineer/Programmer

 

Works ok in 2005 (unless I missed a step).

Command: (SETQ EPICK (vl-catch-all-apply '(lambda () (PROGN (INITGET "lEft
Right") (NENTSEL "\nSelect line, arc, or bearing
(('((("_> [curve lEft/curve Right]:")))))

Select line, arc, or bearing
[curve lEft/curve Right]:'_pan
Select line, arc, or bearing
[curve lEft/curve Right]:e
"lEft"


--
R. Robert Bell


Display the acad standard toolbar, then try this code:

(SETQ EPICK (vl-catch-all-apply '(lambda () (PROGN (INITGET "lEft Right")
(NENTSEL "\nSelect line, arc, or bearing
[curve lEft/curve Right]:")))))

when it promps you "Select line, arc, or bearing [curve lEft/curve Right]:",
pick the pan button from the standard
toolbar, do the pan (hit enter to continue), then enter E.

I expected to get a return of "lEft"
instead it asks for a window type selection.

Any ideas whats up? Does a transparent command mess up the initget?
thanks
James Maeding
Civil Engineer/Programmer