Mep Sites: Dicas de Delphi - Desabilitar Alt+F4

Altere a propriedade KeyPreview do form para True, e coloque o seguinte código no evento onKeyDown:

if ((ssAlt in Shift) and (Key = VK_F4)) then
Key := 0;