Как можно сделать на delphi так, что бы нельзя было закрыть программу ни чере alt+f4 ни через правую кнопку закрыть, ни свернуть?
Подскажите пожалуйста!

procedure TForm2.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if (Key = VK_F4) and (ssAlt in Shift) then begin
Key := 0;
end;
end;