54 lines
1.3 KiB
Plaintext
54 lines
1.3 KiB
Plaintext
object Form1: TForm1
|
|
Left = 758
|
|
Height = 600
|
|
Top = 300
|
|
Width = 600
|
|
Caption = 'Form1'
|
|
ClientHeight = 600
|
|
ClientWidth = 600
|
|
LCLVersion = '2.0.12.0'
|
|
object Edit1: TEdit
|
|
Left = 8
|
|
Height = 22
|
|
Top = 8
|
|
Width = 80
|
|
TabOrder = 0
|
|
Text = 'Edit1'
|
|
end
|
|
object ToggleBox1: TToggleBox
|
|
Left = 9
|
|
Height = 25
|
|
Top = 64
|
|
Width = 167
|
|
Caption = 'Point grid to LabeledEdit'
|
|
OnChange = ToggleBox1Change
|
|
TabOrder = 1
|
|
end
|
|
object LabeledEdit1: TLabeledEdit
|
|
Left = 9
|
|
Height = 22
|
|
Top = 136
|
|
Width = 80
|
|
EditLabel.Height = 16
|
|
EditLabel.Width = 80
|
|
EditLabel.Caption = 'LabeledEdit1'
|
|
EditLabel.ParentColor = False
|
|
TabOrder = 2
|
|
Text = 'LabeledEdit1'
|
|
end
|
|
object TIPropertyGrid1: TTIPropertyGrid
|
|
Left = 184
|
|
Height = 600
|
|
Top = 0
|
|
Width = 416
|
|
Align = alRight
|
|
CheckboxForBoolean = False
|
|
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 = 9
|
|
NameFont.Color = clWindowText
|
|
TIObject = Edit1
|
|
ValueFont.Color = clMaroon
|
|
end
|
|
end
|