Ich empfehle dir immer noch das onClose.
Den Mods empfehle ih den DoppelPost zu löschen
Und wenns unbedingt sein muss, mach:
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (ssAlt in Shift) and (key = vk_f4) then key := #0;
oder:
if (ssAlt in Shift) then
case key of
vk_f4: key := #0;
end;
oder:
if (ssAlt in Shift) then
if (key = vk_f4) then
key := 0;
end;