yoin

roy_043


(defun c:TKW ( / )
(initget "Yes No")
(setq result (getkword "\nAre you sure? [Yes/No]: "))
(if (not result) (princ "\nYou pressed enter or cancelled "))
(princ)
)


Als ik bij de vraag op Escape druk krijg ik dit:
: tkw
Are you sure? [Yes/No]:
Cancel
You pressed enter or cancelled


Druk ik bij de vraag op Enter krijg ik dit:
: tkw
Are you sure? [Yes/No]:
You pressed enter or cancelled


Ik vind het vreemd dat er geen onderscheid wordt gemaakt tussen Enter en Escape. Escape zou een error moeten veroorzaken.

Mijn vraag is: bestaat dit probleem ook in Autocad (ik gebruik Bricscad7)?

H@rm

Roy,

bij mij is het resultaat:
Command: tkw
Are you sure? [Yes/No]: h
Invalid option keyword.
Are you sure? [Yes/No]:Enter
You pressed enter or cancelled
Command: tkw
Are you sure? [Yes/No]: Enter
You pressed enter or cancelled
Command:
Command:
TKW
Are you sure? [Yes/No]: *Cancel*
; error: Function cancelled
Command:

Ik heb dus drie opties ingegeven; h, Enter en Cancel.

Ik hoop dat dit je helpt.

Michel
Acad 10 t/m 2015
Revit 2010 t/m 2015
autodidact lisp

roy_043

H@rm bedankt. Dit zal een fout zijn in BC7.