Grid escape and enter

[Mast]

Hello,
i need help with escape key and enter. With this code, the grid is not closed with enter key but the modeless dialog is closed with escape. i don't know how can i inhibit the escape key, i search on the forum but nothing exactly what i want, if you cn help me; thanks

Code (autolisp) Select Expand


(defun c:Metre_Metre_OnCancelClose (intIsESC)   
  (/= intIsESC 1)
)

[Fred Tomke]

Hi, the same event will be thrown when you press esc

Code (autolisp) Select Expand

(defun c:Metre_Metre_OnCancelClose (intIsESC)     
  (cond
    ((= intIsESC 0) (princ "\nEnter was pressed!\n"))
    ((= intIsESC 1) (princ "\nESC was pressed!\n"))
  ); cond
); c:Metre_Metre_OnCancelClose

Regards, Fred

[Mast]

Thank you Fred  :)