Código Delphi [-] if ((ssAlt in Shift) and (Key = VK_F4)) then Key := 0;
if ((ssAlt in Shift) and (Key = VK_F4)) then Key := 0;