摘要: //我们在写C/S管理系统时经常是根据用户的权限来相应禁止一些菜单//在实践时,我发现使用动态方法创建菜单有可能对软件被破解起到一点小的作用//因为实现起来,不是很难,所以写出来分享一下//我们在菜单的事件中,利用菜单项的TAG值来判定是点了那一项//首先,用一张数据表来存所有用户的菜单内容,格式如下//ID int//image int //-1是指ImageIndex的值,即无图标//caption varchar 20//layer smallint //菜单的层次-1是第一层//tag int //菜单的TAG值,用于得知点击事件//所有的菜单项将使用一个公共事件处理,在... 阅读全文
posted @ 2011-04-23 10:01 delphi中间件 阅读(491) 评论(0) 推荐(0) 编辑
摘要: 我已经看到了很多人想在一个应用程序中挂接消息搞一个干净的解决方案。所以,前一段时间作我决定写一个钩子类,能很好的处理事件之类的东西。 Hook.pas可以分配方法的指针指向一个过程(有一些汇编的帮助)。 例如:如果你想在应用程序中捕获所有击键 - 只需声明一个TKeyboardHook实例,指派一个处理程序给OnPreExecute或OnPostExecute,或同时处理这两个事件。设置激活你的KeyboadHook(KeyboardHook.Active:= true)然后你就可以出去等他运行了.. Windows的钩子下面是Windows API指南中钩子的说明: 一个钩子是系统消息处理机 阅读全文
posted @ 2011-04-23 09:53 delphi中间件 阅读(892) 评论(0) 推荐(0) 编辑