lazarus-ccr/components/exctrls/examples/CheckComboBoxEx/main.lfm
2021-10-26 21:22:44 +00:00

97 lines
2.2 KiB
Plaintext

object MainForm: TMainForm
Left = 261
Height = 335
Top = 139
Width = 706
Caption = 'CheckComboBoxEx Demonstration'
ClientHeight = 335
ClientWidth = 706
OnCreate = FormCreate
LCLVersion = '2.3.0.0'
object Memo1: TMemo
Left = 196
Height = 323
Top = 6
Width = 279
Align = alRight
BorderSpacing.Around = 6
ScrollBars = ssAutoVertical
TabOrder = 0
end
object TIPropertyGrid1: TTIPropertyGrid
Left = 492
Height = 323
Top = 6
Width = 208
Align = alRight
BackgroundColor = clWindow
BorderSpacing.Around = 6
CheckboxForBoolean = True
DefaultValueFont.Color = clWindowText
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkObject, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper, tkFile, tkClassRef, tkPointer]
Indent = 16
NameFont.Color = clWindowText
ValueFont.Color = clMaroon
end
object Splitter1: TSplitter
Left = 185
Height = 335
Top = 0
Width = 5
Align = alRight
ResizeAnchor = akRight
end
object Splitter2: TSplitter
Left = 481
Height = 335
Top = 0
Width = 5
Align = alRight
ResizeAnchor = akRight
end
object Panel1: TPanel
Left = 0
Height = 335
Top = 0
Width = 185
Align = alClient
BevelOuter = bvNone
ClientHeight = 335
ClientWidth = 185
TabOrder = 4
object Button4: TButton
Left = 16
Height = 25
Top = 269
Width = 74
Anchors = [akLeft, akBottom]
AutoSize = True
Caption = 'Check all'
OnClick = Button4Click
TabOrder = 0
end
object Button5: TButton
Left = 96
Height = 25
Top = 269
Width = 87
Anchors = [akLeft, akBottom]
AutoSize = True
Caption = 'Uncheck all'
OnClick = Button5Click
TabOrder = 1
end
object Button1: TButton
Left = 16
Height = 25
Top = 301
Width = 108
Anchors = [akLeft, akBottom]
AutoSize = True
Caption = 'Toggle "Item 1"'
OnClick = Button1Click
TabOrder = 2
end
end
end