Anular la tecla ESC

[ingel]

En el form nuevo que cree con solamente un boton esta en False ..
y en el form que lo quiero implementar tambien todos los botones tienen el Cancel en False...

en el Main tengo este codigo para cambiar Tab x Enter ... podra afectar ??

    if Msg.Message = WM_KEYDOWN then begin
       if Msg.wParam = VK_RETURN then begin {cambio el enter por tab}
           Control_Actual:= Screen.ActiveControl;
           if (Control_actual is TDBMemo) or (Control_actual is TRxRichEdit) then exit;

           if (Control_actual is TEdit) or (Control_actual is TMaskEdit) or
                 (Control_actual is TFloatEdit) or (Control_actual is TDateTimePicker) or (Control_actual is TCustomEdit)
                   or (Control_actual is TCombobox) then Msg.wParam:=VK_TAB;
       end
       else if Msg.wParam = VK_DECIMAL then Msg.wParam:=188
            else if Msg.wParam = VK_ESCAPE then TForm(Screen.ActiveForm).ModalResult:=mrcancel;{Close;}
    end;

Sds y Gracias ....