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