Cerrar un Window con la tecla ESC

Para cerrar una ventana con la tecla ESC, tenemos que colocar el sgte codigo en el evento Key de la ventana:

CHOOSE CASE Key
CASE KeyEscape!
Close (This)
END CHOOSE