Советы по Delphi
         

Недоступность комбинаций alt-tab и ctrl+esc I


    procedure TurnSysKeysOff;
var
OldVal : LongInt; begin
SystemParametersInfo (97, Word (True), @OldVal, 0) end;

procedure TurnSysKeysBackOn;
var
OldVal : LongInt; begin
SystemParametersInfo (97, Word (False), @OldVal, 0) end;
[000138]



Содержание раздела