cpkeymaphookreg.pas

来自「键盘钩子程序及控件, C++ Builder 和DELPHI可用」· PAS 代码 · 共 50 行

{*****************************************************************************
 * UnitName:  CPKeyMapHookReg
 * Version:   1.1
 * Created:   06/07/2004
 * Updated:   29/01/2005
 * Purpose:   NT Keyboard Mapping Hook Registration Unit.
 * Developer: BITLOGIC Software
 * Email:     [e-mail]
 * WebPage:   http://www.bitlogic.co.uk
 *****************************************************************************}

{*****************************************************************************

  29/01/2005 Updated to Version 1.1

  Hard-coded DeallocateHwnd within the unit and also updated the DeallocateHwnd
  procedure which I think could be the cause of some AV's when using the Hook
  within a WinNT Service.

  Added function UpdateHook: boolean;

  The Function UpdateHook will notify the Hook of any changes made to the published
  properties (DisableKeyboard,KeyMap). This will allow you to update the settings
  without having to stop and start the Hook. To use this function you simply set
  the new properties then call UpdateHook.

  06/07/2004 Initial Release Version 1.0

  TCPKeyMapHook is an alternative and replacement to TCPKeyBlockHook

*****************************************************************************}

unit CPKeyMapHookReg;

interface

uses classes, cpkeymaphook;

procedure Register;

implementation

procedure Register;
begin
 RegisterComponents('BITLOGIC', [TCPKeyMapHook]);
end;

end.