讨教关于VXD的开发 (200分)

drank · 2002-04-27

不知各位大侠是否用过美萍的网管系统, 其中的键盘屏蔽相当不错。 在整个WIN98系统启动过程中一切键盘事件都没有了， 直至美萍的网管系统启动。 请大侠们赐教

drank · 2002-04-30

无人问径吗?

咪咪富翁 · 2002-05-01

smilboy · 2002-05-01

function BlockInput (fBlockInput : boolean) : DWord; stdcall; external 'user32.DLL'; {block input/ blockieren} procedure TForm1.Button1Click(Sender: TObject); begin  BlockInput(true); end; {unblock input / Blockierung aufheben} procedure TForm1.Button2Click(Sender: TObject); begin  BlockInput(false); end;

little_mike · 2002-05-04

我认为，如果你要想屏蔽win98系统启动的时候的键盘，不太现实，因为一个操作系统在启动 的时候为了系统的稳定建立，会屏蔽键盘响应的，而你的程序只有在运行的时候才有权得到系统的 控制权，所以，只有在系统建立起来的时候，立即加载你自己的程序，在你自己的程序中，屏蔽 输入响应。如果要锁定输入，可以考虑用挂钩： function killinput(icode:integer;w:wparam;l:lparam):lresult;stdcall; begin  if icode<0 then   result:=callnexthookex(hhook,icode,w,l)  else   result:=1; end; 如果锁定可以调用： hhook:=setwindowshookex(WH_JOURNALPLAYBACK,@killinput,hinstance,0); 解锁可以调用： unhookwindowhookex(hhook);

drank · 2002-05-04

总算有人回复了,尽管回答不够理想. 谢谢大家 smilboy,little_mike 你们的办法都是在98系统运行了程序之后才取得控制的.这种方法好象不可能实现 对98系统启动时的输入进行全程监控和屏蔽. 因而从98启动到程序运行的这段时间里, 使用者可以很轻松的终止掉屏蔽的程序. 不知有没有人对美萍网管大师的输入屏蔽有所研究.

kingdeezj · 2002-05-04

美萍网管大师也不是万能的，有一种方法很容易就能破解的。 至于它是怎么做到的，关注。

sonicyou · 2002-05-04

//键盘屏蔽请用该程序，然后给我分 var YourHook: HHOOK; //定义用于HOOK的消息,也可以是windows的标准消息 const WM_YourMessage = WM_USER + 2000; //发送你需要的消息 procedure TForm1.Button1Click(Sender: TObject); begin PostMessage(self.Handle,WM_YourMessage,0,0); end; //你的HOOK处理函数 function YourHookProc(Code: Integer; WParam: Longint; var Msg: TMsg): Longint; stdcall; begin // if (Code = HC_ACTION) then if Msg.Message = WM_YourMessage then //调用你自己的HOOK函数 begin showMessage('截获该消息'); end; Result := CallNextHookEx(YourHook, Code, WParam, Longint(@Msg)); end; //安装HOOK procedure TForm1.FormCreate(Sender: TObject); begin YourHook :=  SetWindowsHookEx(WH_GETMESSAGE, @YourHookProc, 0, GetCurrentThreadID); end;

金圣叹 · 2002-05-04

//键盘屏蔽请用该程序，然后给我分 var YourHook: HHOOK; //定义用于HOOK的消息,也可以是windows的标准消息 const WM_YourMessage = WM_USER + 2000; //发送你需要的消息 procedure TForm1.Button1Click(Sender: TObject); begin PostMessage(self.Handle,WM_YourMessage,0,0); end; //你的HOOK处理函数 function YourHookProc(Code: Integer; WParam: Longint; var Msg: TMsg): Longint; stdcall; begin // if (Code = HC_ACTION) then if Msg.Message = WM_YourMessage then //调用你自己的HOOK函数 begin showMessage('截获该消息'); end; Result := CallNextHookEx(YourHook, Code, WParam, Longint(@Msg)); end; //安装HOOK procedure TForm1.FormCreate(Sender: TObject); begin YourHook :=  SetWindowsHookEx(WH_GETMESSAGE, @YourHookProc, 0, GetCurrentThreadID); end;

drank · 2002-05-04

请注意问题的关键 屏蔽是在98启动的全过程中进行的, 而不是在98运行了你的程序之后才开始的. 对于用hook进行键盘消息拦截的实现不是问题的所在. 问题在于如何能尽早的进行键盘消息的拦截. 不要告诉我放在系统启动的键值RUNSERVICES下. sonicyou,金圣叹 抢钱????????

孔明.net · 2002-05-05

学习

drank · 2002-05-06

有一点想法请叫各位 是否为了要尽早的在98系统下获取键盘控制权，需要用到VXD之类的技术。 仅仅是猜测，手边也没有关于VXD开发的书。 因而请路过的朋友提提意见 我不希望这个问题不了了之。

晨晨 · 2002-05-06

您是否指win98启动时候的F4键之类的呢？ 如果是，应该修改注册表。

drank · 2002-05-06

晨晨   修改注册表能屏蔽所有的按键吗   或者说能屏蔽Ctrl+alt+del吗

xianjun · 2002-05-07

>修改注册表能屏蔽所有的按键吗 不能 还是看看用VXD怎么写吧

drank · 2002-05-09

高人何在??

drank · 2002-05-12

无人能给出建议吗

SS2000 · 2002-05-12

必须用Vxd或者类似的service服务，才能在启动时接管键盘 而不给用户机会，具体没有做，但是原理肯定是这样的， 祝你好运，实现了也告诉我一声

jhliang · 2002-05-14

同意SS2000。我也很想研究Vxd或WDM，不过最近没时间。 你若实现了，也请通知我。

热血 · 2002-05-16

很简单的两个driver就可以了 vxd比较简单,vtools里面有个函数hook_keyboard,好像是的 就能在系统前面接管所有的键盘了 sys麻烦一点,先要创建一个键盘驱动对象,然后ioattachdevice到键盘对象 就能接受所有的键盘irq了

讨教关于VXD的开发 (200分)

drank

Unregistered / Unconfirmed

drank

Unregistered / Unconfirmed

咪咪富翁

Unregistered / Unconfirmed

smilboy

Unregistered / Unconfirmed

little_mike

Unregistered / Unconfirmed

drank

Unregistered / Unconfirmed

kingdeezj

Unregistered / Unconfirmed

sonicyou

Unregistered / Unconfirmed

金圣叹

Unregistered / Unconfirmed

drank

Unregistered / Unconfirmed

孔明.net

Unregistered / Unconfirmed

drank

Unregistered / Unconfirmed

晨晨

Unregistered / Unconfirmed

drank

Unregistered / Unconfirmed

xianjun

Unregistered / Unconfirmed

drank

Unregistered / Unconfirmed

drank

Unregistered / Unconfirmed

SS2000

Unregistered / Unconfirmed

jhliang

Unregistered / Unconfirmed

热血

Unregistered / Unconfirmed

Similar threads