禁用 alt+tab [重复]

Question

这个问题在这里已经有了答案：

可以使用 Delphi 在 W7 中禁用任务切换键盘快捷键吗？ (4 个回答)

去年关闭。

我无法禁用 alt+tab。 怎么了？

(1)

var I: LongBool;
SystemParametersInfo(97,Word(true),@I,0);

(2)

procedure TfrmRelatorio.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);

keypreview:=true;
if (Key = VK_Tab) and (ssAlt in Shift) then
Key := 0;

Answer 1

97或其常量名称SPI_SETSCREENSAVERRUNNING源于 Win95 并且也仅适用于该平台，它从未打算在 WinNT（包括 2000、XP、Vista、7、8、10）平台上工作。 您（复制代码的人）或作者都忽略了这个重要的细节。

你必须通过SetWindowsHookEx( WH_KEYBORD )安装一个钩子。 另请参阅类似的问题Keyboard hooking alt-tab 导致奇怪的行为？