jvcl driver development envionment
源代码在线查看: jvwndprochookdemomainformu.dfm
object JvWndProcHookDemoMainForm: TJvWndProcHookDemoMainForm
Left = 346
Top = 90
Width = 653
Height = 533
Caption = 'JvCaptionButton Demo'
Color = clBtnFace
DefaultMonitor = dmDesktop
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
Scaled = False
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 24
Top = 16
Width = 589
Height = 80
Caption =
'This demo shows that the new RegisterWndProcHook method in JvWnd' +
'ProcHook can'#13#10'handle several components subclassing the same con' +
'trol witout losing track of the'#13#10'original WndProc regardless of ' +
'the order of registration/unregistration'#13#10'It also shows that the' +
' WndProc link(s) are unaffected by RecreateWnd'#13#10'(which destroys ' +
'the old window handle)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object btnAdd: TButton
Left = 16
Top = 120
Width = 75
Height = 25
Caption = '&Add'
TabOrder = 0
OnClick = btnAddClick
end
object btnDelete: TButton
Left = 16
Top = 152
Width = 75
Height = 25
Caption = '&Delete'
TabOrder = 1
OnClick = btnDeleteClick
end
object btnRecreateWnd: TButton
Left = 16
Top = 184
Width = 75
Height = 25
Caption = 'Recreate&Wnd'
TabOrder = 2
OnClick = btnRecreateWndClick
end
object lbButtons: TListBox
Left = 112
Top = 120
Width = 505
Height = 353
Anchors = [akLeft, akTop, akRight, akBottom]
ItemHeight = 13
TabOrder = 3
end
end