Скачать: CL | DM;

Block in XP   Найти похожие ветки 

← →
spogi   (2004-05-05 02:32) [0]

Вопрос я задаю уже второй раз!
только щась хочу сформулировать вопрос по другому...
Нужен:
1. Отключение/включение ввода. То есть клав и мышка...
2. Скрыть/Отобразить Панель пуск.
3. Нажатия Ctrl+Esc открывает меню пуск, хочу чтобы не открывал...
4. Если никакая из перечисленного, то хотя бы последняя - отлавить нажатия клавиша прежде чем сам Windows, и обработать...

---

← →
Gero ©   (2004-05-05 07:36) [1]

А мы все вирусы пишем...

---

← →
Yanis ©   (2004-05-05 07:52) [2]

Если реализуешь 1, то 3 отпадёт.

---

← →
Боян Георгиев   (2004-05-05 07:55) [3]

Procedure LockKeyb(secs: integer);
   function FuncAvail(_dllname, _funcname: string; var _p: pointer): boolean;
    var _lib: tHandle;
    begin
     Result := false;
     _p := NIL;
     if LoadLibrary(PChar(_dllname)) = 0 then exit;
     _lib := GetModuleHandle(PChar(_dllname)) ;
     if _lib <> 0 then
      begin
      _p := GetProcAddress(_lib, PChar(_funcname)) ;
      if _p <> NIL then Result := true;
      end;
    end;

 var
   xBlockInput : function(Block: BOOL):
                 BOOL; stdcall;

 begin
  if FuncAvail
   ("USER32.DLL", "BlockInput", @xBlockInput) then
  begin
   xBlockInput(true) ;
   Sleep(secs * 1000) ;
   xBlockInput(false) ;
  end;
 end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c