win95/98 下如何琐定鼠标和键盘 (200分)

B

bfj

Unregistered / Unconfirmed
GUEST, unregistred user!
win95/98 下如何琐定鼠标和键盘,使各应用程序均无法接收鼠标和键盘
的输入?
 
DirectX中是有这样的功能的
 
keyboard and mouse hook.
 
给你一个hook的demo,自己看看,这个会了,你就level up!
 
menxin:
我也要!!
 
menxin:
我也要!!
 
var temp:integer;
  begin
   SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @temp, 0);
  end;

把Windows“唤醒”。代码如下:
  var temp : integer;
  begin
   SystemParametersInfo( SPI_SCREENSAVERRUNNING, 0, @temp, 0);
  end;
 
可以用 SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @Oldvalus, 0)
告诉windows屏幕保护程序正在运行,系统就会屏蔽按键和鼠标动作。
 
SystemParametersInfo当万灵药呀?
 
SystemParametersInfo不能屏蔽alt+f4键
 
将鼠标锁定在一定范围
如何将鼠标锁定在一定的范围内呢?
请在Form中放置二个 Button, 然後分别为这两个按钮定义OnClick响应事件如下:
// 限制
procedure TForm1.Button1Click(Sender: TObject);
var
rtButton2: TRect;
begin
rtButton2 := Button2.BoundsRect;
MapWindowPoints(handle, 0, rtButton2, 2); // 座标换算
ClipCursor(@rtButton2); // 限制鼠标移动区域
end;
// 还原
procedure TForm1.Button2Click(Sender: TObject);
var
rtScreen: TRect;
begin
rtScreen := Rect(0, 0, Screen.Width, Screen.Height);
ClipCursor(@rtScreen);
end;




屏蔽系统按键
也许您希望您的程序在运行时不想让用户按系统按键 Alt-Tab 或  Ctrl-Alt-Del,那么可以通过以下的程序段屏蔽这些按键。  
procedure TForm1.FormCreate(Sender: TObject);  
begin  
var  
tmp : integer;
  begin
  tmp := 0;
  //屏蔽 Alt-Tab
  SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @tmp, 0);
  //屏蔽 Ctrl-Alt-Del
  SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @tmp, 0);   end;  end;
 
write a function(HOOKPROC) in a dll
do not call CallNextHookEx in this function.
dllhandle=LoadLibrary(dll);
SetWindowsHookEx(WH_GETMESSAGE,funtion,dllhandle,0);

and use UnhookWindowsHookEx to release messages.
 
menxin:
我也要一份!
mail to:th_csut@263.net
 
已经发了。
怎么这问题还没有结束?
 
win95/98 下如何琐定鼠标和键盘,使各应用程序均无法接收鼠标和键盘
的输入?我想做一个黑客软件接管被控机的鼠标和键盘的键盘和鼠标,明白了
吗?希望大侠指点,请不要从"深度历险"之类的光盘上找一个ABC程序给我,
那些东西,我有的是!
 
you can try enablewindow(HWND hwnd, BOOL bEnable)

hwnd identifes the window to be enbaled or disabled window's handle;
benable if this parameter is true,the window is enable,else disable.
 
设定屏幕保护有密码保护,激活屏幕保护
 
对呀,谁知道pcanywhere是怎么实现的?
 
menxin:
我也要!!
 
顶部