Недоступность комбинаций alt+tab и ctrl+esc. Вариант 2
|
|
procedure TurnSysKeysOff;
var
OldVal : LongInt; begin
SystemParametersInfo (97, Word (True), @OldVal, 0) b>;
procedure TurnSysKeysBackOn;
var
OldVal : LongInt; begin
SystemParametersInfo (97, Word (False), @OldVal, 0) end; |