lazarus/debugger/watchpropertydlg.lfm
2012-05-28 15:20:17 +00:00

198 lines
4.8 KiB
Plaintext

object WatchPropertyDlg: TWatchPropertyDlg
Left = 542
Height = 203
Top = 214
Width = 420
ActiveControl = chkAllowFunc
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Watch Properties'
ClientHeight = 203
ClientWidth = 420
Constraints.MinWidth = 400
Position = poScreenCenter
LCLVersion = '1.1'
object lblExpression: TLabel
AnchorSideTop.Control = txtExpression
AnchorSideTop.Side = asrCenter
Left = 6
Height = 16
Top = 9
Width = 59
BorderSpacing.Left = 6
Caption = 'Expression:'
ParentColor = False
end
object lblRepCount: TLabel
AnchorSideTop.Control = txtRepCount
AnchorSideTop.Side = asrCenter
Left = 6
Height = 16
Top = 38
Width = 76
BorderSpacing.Left = 6
Caption = 'Repeat Count:'
ParentColor = False
end
object lblDigits: TLabel
AnchorSideLeft.Control = txtRepCount
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = txtDigits
AnchorSideTop.Side = asrCenter
Left = 160
Height = 16
Top = 38
Width = 34
BorderSpacing.Left = 12
Caption = 'Digits:'
ParentColor = False
end
object txtExpression: TEdit
AnchorSideLeft.Control = lblExpression
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 71
Height = 23
Top = 6
Width = 343
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
TabOrder = 1
end
object txtRepCount: TEdit
AnchorSideLeft.Control = lblRepCount
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = txtExpression
AnchorSideTop.Side = asrBottom
Left = 88
Height = 23
Top = 35
Width = 60
BorderSpacing.Left = 6
BorderSpacing.Top = 6
TabOrder = 2
Text = '0'
end
object txtDigits: TEdit
AnchorSideLeft.Control = lblDigits
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = txtRepCount
AnchorSideTop.Side = asrCenter
Left = 200
Height = 23
Top = 35
Width = 60
BorderSpacing.Left = 6
BorderSpacing.Top = 6
TabOrder = 4
Text = '0'
end
object chkEnabled: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = txtRepCount
AnchorSideTop.Side = asrBottom
Left = 6
Height = 19
Top = 64
Width = 62
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Enabled'
TabOrder = 5
end
object chkAllowFunc: TCheckBox
AnchorSideLeft.Control = chkEnabled
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = txtRepCount
AnchorSideTop.Side = asrBottom
Left = 98
Height = 19
Top = 64
Width = 128
AllowGrayed = True
BorderSpacing.Left = 30
BorderSpacing.Top = 6
Caption = 'Allow Function Calls'
TabOrder = 0
end
object rgStyle: TRadioGroup
AnchorSideTop.Control = chkEnabled
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 6
Height = 87
Top = 89
Width = 408
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = 'Style'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 3
ClientHeight = 69
ClientWidth = 404
Columns = 3
ItemIndex = 7
Items.Strings = (
'Character'
'String'
'Decimal'
'Hexadecimal'
'Unsigned'
'Pointer'
'Record/Structure'
'Default'
'Memory Dump'
)
TabOrder = 3
end
object ButtonPanel: TButtonPanel
AnchorSideTop.Control = rgStyle
AnchorSideTop.Side = asrBottom
Left = 6
Height = 15
Top = 182
Width = 408
Anchors = [akTop, akLeft, akRight, akBottom]
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
OKButton.OnClick = btnOKClick
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
HelpButton.OnClick = btnHelpClick
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CloseButton.Enabled = False
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 6
ShowButtons = [pbOK, pbCancel, pbHelp]
ShowBevel = False
end
object chkUseInstanceClass: TCheckBox
AnchorSideLeft.Control = chkAllowFunc
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = chkAllowFunc
AnchorSideTop.Side = asrCenter
Left = 232
Height = 19
Top = 64
Width = 129
BorderSpacing.Left = 6
Caption = 'chkUseInstanceClass'
TabOrder = 7
end
end