можно нашел в инете, но сам пробовать не рисковал
Отключить клаву:
Код:
var
dirWin: array[0..255] of char;
begin
GetWindowsDirectory(dirWin,255);
WinExec(PChar(WinDir + ' undll32.exe keyboard,disable'),SW_SHOWNORMAL);
end;
Включить наверное так =)
Код:
var
dirWin: array[0..255] of char;
begin
GetWindowsDirectory(dirWin,255);
WinExec(PChar(WinDir + ' undll32.exe keyboard,enable'),SW_SHOWNORMAL);
end;
lmikle: Ну чуть-чуть тегов не хватило... 