代码拉取完成,页面将自动刷新
object TypeForm: TTypeForm
Left = 429
Height = 118
Top = 709
Width = 764
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Type'
ClientHeight = 118
ClientWidth = 764
OnCreate = FormCreate
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '2.0.6.0'
object Panel1: TPanel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 0
Height = 93
Top = 0
Width = 220
AutoSize = True
BorderSpacing.Bottom = 4
BevelOuter = bvNone
ClientHeight = 93
ClientWidth = 220
TabOrder = 0
object Label1: TLabel
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Panel1
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 10
Height = 15
Top = 0
Width = 200
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 10
BorderSpacing.Right = 10
Caption = 'Select the new type:'
ParentColor = False
end
object VarType: TComboBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 10
Height = 23
Top = 15
Width = 200
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 10
BorderSpacing.Right = 10
Constraints.MinWidth = 200
DropDownCount = 9
ItemHeight = 15
ItemIndex = 0
Items.Strings = (
'Binary'
'Byte'
'2 Bytes'
'4 Bytes'
'8 Bytes'
'Float'
'Double'
'Text'
'Array of Bytes'
)
OnChange = VarTypeChange
Style = csDropDownList
TabOrder = 0
Text = 'Binary'
end
object HexAndSignedPanel: TPanel
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = VarType
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 10
Height = 20
Top = 40
Width = 200
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Left = 10
BorderSpacing.Top = 2
BorderSpacing.Right = 10
BevelOuter = bvNone
ClientHeight = 20
ClientWidth = 200
TabOrder = 1
object cbHex: TCheckBox
AnchorSideLeft.Control = HexAndSignedPanel
AnchorSideTop.Control = HexAndSignedPanel
AnchorSideTop.Side = asrCenter
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 19
Top = 1
Width = 89
Caption = 'Hexadecimal'
TabOrder = 0
end
object cbSigned: TCheckBox
AnchorSideLeft.Control = cbHex
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbHex
AnchorSideBottom.Control = cbHex
AnchorSideBottom.Side = asrBottom
Left = 99
Height = 19
Top = 1
Width = 56
BorderSpacing.Left = 10
Caption = 'Signed'
TabOrder = 1
end
end
object Panel2: TPanel
AnchorSideLeft.Control = Panel1
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = HexAndSignedPanel
AnchorSideTop.Side = asrBottom
Left = 107
Height = 20
Top = 60
Width = 7
BevelOuter = bvNone
TabOrder = 2
end
object ButtonOK: TButton
AnchorSideTop.Control = HexAndSignedPanel
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel2
Left = 17
Height = 25
Top = 68
Width = 90
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Top = 8
Caption = 'OK'
Constraints.MinWidth = 90
Default = True
OnClick = ButtonOKClick
TabOrder = 3
end
object ButtonCancel: TButton
AnchorSideLeft.Control = Panel2
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ButtonOK
Left = 114
Height = 25
Top = 68
Width = 90
AutoSize = True
Cancel = True
Caption = 'Cancel'
Constraints.MinWidth = 90
OnClick = ButtonCancelClick
TabOrder = 4
end
end
object Panel3: TPanel
AnchorSideLeft.Control = Panel1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1
Left = 220
Height = 76
Top = 0
Width = 241
AutoSize = True
BorderSpacing.Right = 1
BevelOuter = bvNone
ClientHeight = 76
ClientWidth = 241
TabOrder = 1
object labelLength: TLabel
AnchorSideLeft.Control = Panel3
AnchorSideTop.Control = Panel3
Left = 0
Height = 15
Top = 0
Width = 37
Caption = 'Length'
ParentColor = False
end
object lengthPanel: TPanel
AnchorSideLeft.Control = Panel3
AnchorSideTop.Control = labelLength
AnchorSideTop.Side = asrBottom
Left = 0
Height = 23
Top = 15
Width = 189
AutoSize = True
BevelOuter = bvNone
ClientHeight = 23
ClientWidth = 189
TabOrder = 0
object lengthEdit: TEdit
AnchorSideLeft.Control = lengthPanel
AnchorSideTop.Control = lengthPanel
Left = 0
Height = 23
Top = 0
Width = 45
TabOrder = 0
Text = '10'
end
object cbUnicode: TCheckBox
AnchorSideLeft.Control = lengthEdit
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = lengthEdit
AnchorSideTop.Side = asrCenter
Left = 47
Height = 19
Top = 2
Width = 64
BorderSpacing.Left = 2
Caption = 'Unicode'
OnChange = cbUnicodeChange
TabOrder = 1
end
object cbCodePage: TCheckBox
AnchorSideLeft.Control = cbUnicode
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbUnicode
Left = 115
Height = 19
Top = 2
Width = 74
BorderSpacing.Left = 4
Caption = 'Codepage'
OnChange = cbCodePageChange
TabOrder = 2
end
end
object bitPanel: TPanel
AnchorSideLeft.Control = Panel3
AnchorSideTop.Control = lengthPanel
AnchorSideTop.Side = asrBottom
Left = 0
Height = 38
Top = 38
Width = 241
AutoSize = True
BevelOuter = bvNone
ClientHeight = 38
ClientWidth = 241
TabOrder = 1
object labelBit0: TLabel
AnchorSideLeft.Control = bitRadioButton0
AnchorSideTop.Control = bitPanel
Left = 3
Height = 15
Top = 0
Width = 6
BorderSpacing.Left = 3
Caption = '0'
ParentColor = False
end
object labelBit1: TLabel
AnchorSideLeft.Control = bitRadioButton1
AnchorSideTop.Control = bitPanel
Left = 23
Height = 15
Top = 0
Width = 6
BorderSpacing.Left = 3
Caption = '1'
ParentColor = False
end
object labelBit2: TLabel
AnchorSideLeft.Control = bitRadioButton2
AnchorSideTop.Control = bitPanel
Left = 43
Height = 15
Top = 0
Width = 6
BorderSpacing.Left = 3
Caption = '2'
ParentColor = False
end
object labelBit3: TLabel
AnchorSideLeft.Control = bitRadioButton3
AnchorSideTop.Control = bitPanel
Left = 63
Height = 15
Top = 0
Width = 6
BorderSpacing.Left = 3
Caption = '3'
ParentColor = False
end
object labelBit4: TLabel
AnchorSideLeft.Control = bitRadioButton4
AnchorSideTop.Control = bitPanel
Left = 83
Height = 15
Top = 0
Width = 6
BorderSpacing.Left = 3
Caption = '4'
ParentColor = False
end
object labelBit5: TLabel
AnchorSideLeft.Control = bitRadioButton5
AnchorSideTop.Control = bitPanel
Left = 103
Height = 15
Top = 0
Width = 6
BorderSpacing.Left = 3
Caption = '5'
ParentColor = False
end
object labelBit6: TLabel
AnchorSideLeft.Control = bitRadioButton6
AnchorSideTop.Control = bitPanel
Left = 123
Height = 15
Top = 0
Width = 6
BorderSpacing.Left = 3
Caption = '6'
ParentColor = False
end
object labelBit7: TLabel
AnchorSideLeft.Control = bitRadioButton7
AnchorSideTop.Control = bitPanel
Left = 143
Height = 15
Top = 0
Width = 6
BorderSpacing.Left = 3
Caption = '7'
ParentColor = False
end
object labelBitLength: TLabel
AnchorSideLeft.Control = bitRadioButton7
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = bitLengthEdit
AnchorSideTop.Side = asrCenter
Left = 160
Height = 15
Top = 19
Width = 37
Caption = 'Length'
ParentColor = False
Visible = False
end
object bitRadioButton0: TRadioButton
AnchorSideLeft.Control = bitPanel
AnchorSideTop.Control = labelBit0
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 15
Width = 20
Checked = True
TabOrder = 0
TabStop = True
end
object bitRadioButton1: TRadioButton
AnchorSideLeft.Control = bitRadioButton0
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = labelBit0
AnchorSideTop.Side = asrBottom
Left = 20
Height = 19
Top = 15
Width = 20
TabOrder = 1
end
object bitRadioButton2: TRadioButton
AnchorSideLeft.Control = bitRadioButton1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = labelBit0
AnchorSideTop.Side = asrBottom
Left = 40
Height = 19
Top = 15
Width = 20
TabOrder = 2
end
object bitRadioButton3: TRadioButton
AnchorSideLeft.Control = bitRadioButton2
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = labelBit0
AnchorSideTop.Side = asrBottom
Left = 60
Height = 19
Top = 15
Width = 20
TabOrder = 3
end
object bitRadioButton4: TRadioButton
AnchorSideLeft.Control = bitRadioButton3
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = labelBit0
AnchorSideTop.Side = asrBottom
Left = 80
Height = 19
Top = 15
Width = 20
TabOrder = 4
end
object bitRadioButton5: TRadioButton
AnchorSideLeft.Control = bitRadioButton4
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = labelBit0
AnchorSideTop.Side = asrBottom
Left = 100
Height = 19
Top = 15
Width = 20
TabOrder = 5
end
object bitRadioButton6: TRadioButton
AnchorSideLeft.Control = bitRadioButton5
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = labelBit0
AnchorSideTop.Side = asrBottom
Left = 120
Height = 19
Top = 15
Width = 20
TabOrder = 6
end
object bitRadioButton7: TRadioButton
AnchorSideLeft.Control = bitRadioButton6
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = labelBit0
AnchorSideTop.Side = asrBottom
Left = 140
Height = 19
Top = 15
Width = 20
TabOrder = 7
end
object bitLengthEdit: TEdit
AnchorSideLeft.Control = labelBitLength
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = bitRadioButton0
Left = 197
Height = 23
Top = 15
Width = 40
BorderSpacing.Right = 4
TabOrder = 8
Text = '1'
Visible = False
end
end
end
end
此处可能存在不合适展示的内容,页面不予展示。您可通过相关编辑功能自查并修改。
如您确认内容无涉及 不当用语 / 纯广告导流 / 暴力 / 低俗色情 / 侵权 / 盗版 / 虚假 / 无价值内容或违法国家有关法律法规的内容,可点击提交进行申诉,我们将尽快为您处理。