home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 March / Chip_1998-03_cd.bin / zkuste / delphi / ruzkomp / WINHOOK.ZIP / MAIN.DFM / MAIN.txt
Encoding:
Text File  |  1996-07-08  |  1.0 KB  |  49 lines
  1. object HookForm: THookForm
  2.   Left = 467
  3.   Top = 538
  4.   BorderStyle = bsDialog
  5.   Caption = 'SetWindowsHookEx() Example'
  6.   ClientHeight = 153
  7.   ClientWidth = 409
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   PixelsPerInch = 96
  13.   Position = poScreenCenter
  14.   OnCreate = FormCreate
  15.   OnDestroy = FormDestroy
  16.   TextHeight = 16
  17.   object SysHookBtn: TButton
  18.     Left = 24
  19.     Top = 15
  20.     Width = 166
  21.     Height = 51
  22.     Hint = 
  23.       'Beep will occur anywhere in Windows when right mouse button pres' +
  24.       'sed.'
  25.     Caption = 'Set System Hook'
  26.     TabOrder = 0
  27.     OnClick = SysHookBtnClick
  28.   end
  29.   object RemoveHookBtn: TButton
  30.     Left = 121
  31.     Top = 85
  32.     Width = 166
  33.     Height = 51
  34.     Caption = 'Remove Hook'
  35.     TabOrder = 2
  36.     OnClick = RemoveHookBtnClick
  37.   end
  38.   object TaskHookBtn: TButton
  39.     Left = 219
  40.     Top = 15
  41.     Width = 166
  42.     Height = 51
  43.     Hint = 'Beep will occur only in app when right mouse button pressed.'
  44.     Caption = 'Set Task Hook'
  45.     TabOrder = 1
  46.     OnClick = TaskHookBtnClick
  47.   end
  48. end
  49.