object formAddressChange: TformAddressChange
Left = 1005
Height = 279
Top = 464
Width = 201
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = 'Change address'
ClientHeight = 279
ClientWidth = 201
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '1.6.0.4'
object Label1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 8
Height = 15
Top = 0
Width = 45
BorderSpacing.Left = 8
Caption = 'Address:'
ParentColor = False
end
object editAddress: TEdit
AnchorSideLeft.Control = Label1
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
Left = 8
Height = 23
Top = 15
Width = 112
OnChange = editAddressChange
OnKeyPress = editAddressKeyPress
TabOrder = 0
end
object btnOk: TButton
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = cbPointer
AnchorSideTop.Side = asrBottom
Left = 8
Height = 25
Top = 224
Width = 80
AutoSize = True
BorderSpacing.Left = 8
BorderSpacing.Bottom = 8
Caption = 'OK'
Constraints.MinHeight = 25
Constraints.MinWidth = 80
Default = True
OnClick = btnOkClick
TabOrder = 5
end
object btnCancel: TButton
AnchorSideLeft.Control = btnOk
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbPointer
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 96
Height = 25
Top = 224
Width = 80
AutoSize = True
BorderSpacing.Left = 8
BorderSpacing.Right = 8
Cancel = True
Caption = 'Cancel'
Constraints.MinHeight = 25
Constraints.MinWidth = 80
ModalResult = 2
TabOrder = 6
end
object cbPointer: TCheckBox
AnchorSideLeft.Control = Label1
AnchorSideTop.Control = pnlExtra
AnchorSideTop.Side = asrBottom
Left = 8
Height = 19
Top = 205
Width = 58
Caption = 'Pointer'
OnChange = cbPointerClick
TabOrder = 4
end
object cbvarType: TComboBox
AnchorSideLeft.Control = Label1
AnchorSideTop.Control = Label12
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 8
Height = 23
Top = 95
Width = 185
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
ItemHeight = 15
ItemIndex = 3
Items.Strings = (
'Binary'
'Byte'
'2 Bytes'
'4 Bytes'
'8 Bytes'
'Float'
'Double'
'Text'
'Array of Bytes'
)
OnChange = cbvarTypeChange
Style = csDropDownList
TabOrder = 2
Text = '4 Bytes'
end
object pnlExtra: TPanel
AnchorSideLeft.Control = Label1
AnchorSideTop.Control = cbvarType
AnchorSideTop.Side = asrBottom
Left = 8
Height = 87
Top = 118
Width = 190
AutoSize = True
BevelOuter = bvNone
ClientHeight = 87
ClientWidth = 190
TabOrder = 3
Visible = False
object cbunicode: TCheckBox
AnchorSideTop.Control = edtSize
AnchorSideTop.Side = asrCenter
Left = 48
Height = 19
Top = 17
Width = 64
Caption = 'Unicode'
OnChange = cbunicodeChange
TabOrder = 0
end
object edtSize: TEdit
AnchorSideTop.Control = lengthlabel
AnchorSideTop.Side = asrBottom
Left = 0
Height = 23
Top = 15
Width = 45
TabOrder = 1
Text = '10'
end
object lengthlabel: TLabel
AnchorSideLeft.Control = pnlExtra
AnchorSideTop.Control = pnlExtra
Left = 0
Height = 15
Top = 0
Width = 37
Caption = 'Length'
ParentColor = False
end
object pnlBitinfo: TPanel
AnchorSideLeft.Control = pnlExtra
AnchorSideTop.Control = edtSize
AnchorSideTop.Side = asrBottom
Left = 0
Height = 49
Top = 38
Width = 160
AutoSize = True
BevelOuter = bvNone
ClientHeight = 49
ClientWidth = 160
TabOrder = 2
Visible = False
object Label4: TLabel
AnchorSideLeft.Control = RadioButton1
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 0
Height = 15
Top = 15
Width = 6
Caption = '0'
ParentColor = False
end
object Label5: TLabel
AnchorSideLeft.Control = RadioButton2
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 20
Height = 15
Top = 15
Width = 6
Caption = '1'
ParentColor = False
end
object Label6: TLabel
AnchorSideLeft.Control = RadioButton3
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 40
Height = 15
Top = 15
Width = 6
Caption = '2'
ParentColor = False
end
object Label7: TLabel
AnchorSideLeft.Control = RadioButton4
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 60
Height = 15
Top = 15
Width = 6
Caption = '3'
ParentColor = False
end
object Label8: TLabel
AnchorSideLeft.Control = RadioButton5
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 80
Height = 15
Top = 15
Width = 6
Caption = '4'
ParentColor = False
end
object Label9: TLabel
AnchorSideLeft.Control = RadioButton6
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 100
Height = 15
Top = 15
Width = 6
Caption = '5'
ParentColor = False
end
object Label10: TLabel
AnchorSideLeft.Control = RadioButton7
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 120
Height = 15
Top = 15
Width = 6
Caption = '6'
ParentColor = False
end
object Label11: TLabel
AnchorSideLeft.Control = RadioButton8
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 140
Height = 15
Top = 15
Width = 6
Caption = '7'
ParentColor = False
end
object Label2: TLabel
AnchorSideLeft.Control = pnlBitinfo
AnchorSideTop.Control = pnlBitinfo
Left = 0
Height = 15
Top = 0
Width = 41
Caption = 'Startbit:'
ParentColor = False
end
object RadioButton1: TRadioButton
AnchorSideTop.Control = Label4
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 30
Width = 20
Checked = True
TabOrder = 0
TabStop = True
end
object RadioButton2: TRadioButton
AnchorSideLeft.Control = RadioButton1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label4
AnchorSideTop.Side = asrBottom
Left = 20
Height = 19
Top = 30
Width = 20
TabOrder = 1
end
object RadioButton3: TRadioButton
AnchorSideLeft.Control = RadioButton2
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label4
AnchorSideTop.Side = asrBottom
Left = 40
Height = 19
Top = 30
Width = 20
TabOrder = 2
end
object RadioButton4: TRadioButton
AnchorSideLeft.Control = RadioButton3
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label4
AnchorSideTop.Side = asrBottom
Left = 60
Height = 19
Top = 30
Width = 20
TabOrder = 3
end
object RadioButton5: TRadioButton
AnchorSideLeft.Control = RadioButton4
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label4
AnchorSideTop.Side = asrBottom
Left = 80
Height = 19
Top = 30
Width = 20
TabOrder = 4
end
object RadioButton6: TRadioButton
AnchorSideLeft.Control = RadioButton5
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label4
AnchorSideTop.Side = asrBottom
Left = 100
Height = 19
Top = 30
Width = 20
TabOrder = 5
end
object RadioButton7: TRadioButton
AnchorSideLeft.Control = RadioButton6
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label4
AnchorSideTop.Side = asrBottom
Left = 120
Height = 19
Top = 30
Width = 20
TabOrder = 6
end
object RadioButton8: TRadioButton
AnchorSideLeft.Control = RadioButton7
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label4
AnchorSideTop.Side = asrBottom
Left = 140
Height = 19
Top = 30
Width = 20
TabOrder = 7
end
end
object cbCodePage: TCheckBox
AnchorSideLeft.Control = cbunicode
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbunicode
Left = 116
Height = 19
Top = 17
Width = 74
BorderSpacing.Left = 4
Caption = 'Codepage'
OnChange = cbCodePageChange
TabOrder = 3
end
end
object lblValue: TLabel
AnchorSideLeft.Control = editAddress
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = editAddress
AnchorSideTop.Side = asrCenter
Left = 120
Height = 15
Top = 19
Width = 37
BorderSpacing.Right = 5
Caption = '=Value'
ParentColor = False
end
object editDescription: TEdit
AnchorSideLeft.Control = Label1
AnchorSideTop.Control = Label3
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 8
Height = 23
Top = 55
Width = 185
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
TabOrder = 1
end
object Label3: TLabel
AnchorSideLeft.Control = Label1
AnchorSideTop.Control = editAddress
AnchorSideTop.Side = asrBottom
Left = 8
Height = 15
Top = 40
Width = 60
BorderSpacing.Top = 2
Caption = 'Description'
ParentColor = False
end
object Label12: TLabel
AnchorSideLeft.Control = Label1
AnchorSideTop.Control = editDescription
AnchorSideTop.Side = asrBottom
Left = 8
Height = 15
Top = 80
Width = 26
BorderSpacing.Top = 2
Caption = 'Type'
ParentColor = False
end
object Timer1: TTimer
OnTimer = Timer1Timer
left = 136
top = 8
end
object Timer2: TTimer
Interval = 1
OnTimer = Timer2Timer
left = 64
top = 8
end
object pmOffset: TPopupMenu
OnPopup = pmOffsetPopup
left = 112
top = 88
object miUpdateOnReinterpretOnly: TMenuItem
AutoCheck = True
Caption = 'Only update the offset when the memory record gets reinterpreted'
OnClick = miUpdateOnReinterpretOnlyClick
end
object miUpdateAfterInterval: TMenuItem
AutoCheck = True
Caption = 'Only update the offset after a specific amount of time'
OnClick = miUpdateAfterIntervalClick
end
end
end