Erstes auch ein Hook nützt da nichts, da diese Tastenkombination von Windows extra behandelt wird. Da hilft nur abfangen bevor Windows seinen Daumen drauf hat. Dies wird aber nur über einen Tastaturtreiber gehen, also nix mit Delphi.
Alt + F4:
Delphi-Quellcode:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := False:
end;
Und jetzt meine beliebteste Frage zu diesem Thema:
Warum das ganze? Wenn ich einen Rechner dicht machen will, dann geht das über den von MS empfohlenen Weg und zwar über Policies - einstellbar über den Policie-Editor. Und erklär mir nicht du wolltest Software für ein Internet-Cafe oder für das Schulnetzwerkschreiben, das ist blödsinn.