lazarus/debugger/evaluatedlg.lfm
2012-03-20 10:39:47 +00:00

179 lines
4.2 KiB
Plaintext

inherited EvaluateDlg: TEvaluateDlg
Left = 470
Height = 290
Top = 393
Width = 400
ActiveControl = cmbExpression
BorderStyle = bsSizeToolWin
Caption = 'Evaluate/Modify'
ClientHeight = 290
ClientWidth = 400
Constraints.MinHeight = 200
Constraints.MinWidth = 300
KeyPreview = True
OnClose = FormClose
OnKeyDown = FormKeyDown
object Label1: TLabel[0]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ToolBar1
AnchorSideTop.Side = asrBottom
Left = 6
Height = 16
Top = 47
Width = 59
BorderSpacing.Left = 6
BorderSpacing.Top = 3
Caption = '&Expression:'
FocusControl = cmbExpression
ParentColor = False
end
object Label2: TLabel[1]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = cmbExpression
AnchorSideTop.Side = asrBottom
Left = 6
Height = 16
Top = 95
Width = 36
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = '&Result:'
FocusControl = txtResult
ParentColor = False
end
object lblNewValue: TLabel[2]
AnchorSideLeft.Control = Owner
AnchorSideBottom.Control = cmbNewValue
Left = 6
Height = 16
Top = 242
Width = 59
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Bottom = 3
Caption = '&New value:'
FocusControl = cmbNewValue
ParentColor = False
end
object ToolBar1: TToolBar[3]
Left = 0
Height = 44
Top = 0
Width = 400
AutoSize = True
ButtonHeight = 40
ButtonWidth = 50
Caption = 'ToolBar1'
EdgeBorders = [ebTop, ebBottom]
Indent = 2
ShowCaptions = True
TabOrder = 0
TabStop = True
object tbInspect: TToolButton
Left = 154
Top = 2
Caption = '&Inspect'
Enabled = False
ImageIndex = 3
OnClick = tbInspectClick
end
object tbWatch: TToolButton
Left = 104
Top = 2
AllowAllUp = True
Caption = '&Watch'
Enabled = False
ImageIndex = 2
OnClick = tbWatchClick
end
object tbModify: TToolButton
Left = 54
Top = 2
Caption = '&Modify'
Enabled = False
ImageIndex = 1
OnClick = tbModifyClick
end
object tbEvaluate: TToolButton
Left = 2
Top = 2
Caption = 'E&valuate'
Enabled = False
ImageIndex = 0
OnClick = tbEvaluateClick
end
end
object cmbExpression: TComboBox[4]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 23
Top = 66
Width = 388
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Right = 6
ItemHeight = 15
OnChange = cmbExpressionChange
OnKeyDown = cmbExpressionKeyDown
TabOrder = 2
end
object txtResult: TMemo[5]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = lblNewValue
Left = 6
Height = 122
Top = 114
Width = 388
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
ScrollBars = ssAutoVertical
TabOrder = 1
end
object cmbNewValue: TComboBox[6]
AnchorSideLeft.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 23
Top = 261
Width = 388
Anchors = [akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
ItemHeight = 15
OnKeyDown = cmbNewValueKeyDown
TabOrder = 3
end
object chkTypeCast: TCheckBox[7]
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 306
Height = 19
Top = 46
Width = 88
Anchors = [akTop, akRight]
BorderSpacing.Right = 6
Caption = 'chkTypeCast'
Checked = True
State = cbChecked
TabOrder = 4
end
end