[roman]

Y, ¿dónde tienes ese código? Porque claramente le estás diciendo que cierre el formulario activo con la tecla ESC:

Código Delphi [-]
else if Msg.wParam = VK_ESCAPE then TForm(Screen.ActiveForm).ModalResult:=mrcancel;{Close;}

// Saludos