73 lines
1.8 KiB
Plaintext
73 lines
1.8 KiB
Plaintext
object frmMain: TfrmMain
|
|
Left = 47
|
|
Top = 91
|
|
Width = 652
|
|
Height = 531
|
|
Caption = 'JvCaptionButton Demo'
|
|
Color = clBtnFace
|
|
Constraints.MinWidth = 644
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
OldCreateOrder = 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 = 110
|
|
Top = 122
|
|
Width = 505
|
|
Height = 353
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
|
ItemHeight = 13
|
|
TabOrder = 3
|
|
end
|
|
end
|