paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-18 00:29:34 +02:00
Code Issues Packages Projects Releases Wiki Activity
fixes_4
lazarus/ide/packages/idedebugger/breakpropertydlg.lfm

668 lines
17 KiB
Plaintext
Raw Permalink Blame History

object BreakPropertyDlg: TBreakPropertyDlg
Left = 620
Height = 577
Top = 132
Width = 450
HorzScrollBar.Page = 386
VertScrollBar.Page = 366
VertScrollBar.Range = 325
ActiveControl = edtFilename
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Breakpoint Properties'
ClientHeight = 577
ClientWidth = 450
Constraints.MinWidth = 450
Position = poScreenCenter
LCLVersion = '3.99.0.0'
OnCreate = FormCreate
object lblFileName: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtFilename
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 10
Width = 51
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Filename:'
ParentColor = False
end
object lblLine: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtLine
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 39
Width = 25
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Line:'
ParentColor = False
end
object lblCondition: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtCondition
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 143
Width = 56
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Condition:'
ParentColor = False
end
object lblHitCount: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtCounter
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 172
Width = 50
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Hitcount:'
ParentColor = False
end
object lblGroup: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = cmbGroup
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 259
Width = 36
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Group:'
ParentColor = False
end
object lblAutoContinue: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtAutocontinueMS
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 230
Width = 103
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Auto continue after'
ParentColor = False
end
object lblMS: TLabel
AnchorSideLeft.Control = edtAutocontinueMS
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = lblAutoContinue
AnchorSideTop.Side = asrCenter
Left = 205
Height = 15
Top = 230
Width = 24
BorderSpacing.Left = 6
Caption = '(ms)'
ParentColor = False
end
object edtAutocontinueMS: TEdit
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtPassCount
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 139
Height = 23
Top = 226
Width = 60
BorderSpacing.Left = 24
BorderSpacing.Around = 6
TabOrder = 8
Text = 'edtAutocontinueMS'
end
object edtCounter: TEdit
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtCondition
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 23
Top = 168
Width = 305
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 24
BorderSpacing.Around = 6
TabOrder = 6
Text = 'edtCounter'
end
object lblPassCount: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtPassCount
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 201
Width = 57
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Passcount:'
ParentColor = False
end
object edtPassCount: TEdit
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtCounter
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 23
Top = 197
Width = 305
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 24
BorderSpacing.Around = 6
Color = clInactiveCaption
ReadOnly = True
TabOrder = 7
Text = 'edtPassCount'
end
object edtFilename: TEdit
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 23
Top = 6
Width = 305
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 24
BorderSpacing.Around = 6
Color = clBtnFace
ReadOnly = True
TabOrder = 0
Text = 'edtFilename'
end
object cmbGroup: TComboBox
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtAutocontinueMS
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 23
Top = 255
Width = 305
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 24
BorderSpacing.Around = 6
ItemHeight = 15
TabOrder = 9
Text = 'cmbGroup'
OnChange = cmbGroupEditingDone
OnEditingDone = cmbGroupEditingDone
OnExit = cmbGroupEditingDone
OnKeyPress = cmbGroupKeyPress
end
object gbActions: TGroupBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = lblBadGroupName
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 215
Top = 305
Width = 438
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Actions'
ClientHeight = 195
ClientWidth = 434
TabOrder = 10
object chkActionBreak: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = gbActions
Left = 6
Height = 19
Top = 6
Width = 47
BorderSpacing.Around = 6
Caption = 'Break'
TabOrder = 0
end
object chkEnableGroups: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtEnableGroups
AnchorSideTop.Side = asrCenter
Left = 6
Height = 19
Top = 33
Width = 89
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Enable goups'
TabOrder = 1
OnChange = chkEnableGroupsChange
end
object chkDisableGroups: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtDisableGroups
AnchorSideTop.Side = asrCenter
Left = 6
Height = 19
Top = 62
Width = 96
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Disable groups'
TabOrder = 3
OnChange = chkDisableGroupsChange
end
object edtEnableGroups: TEditButton
AnchorSideLeft.Control = chkEvalExpression
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = chkActionBreak
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edtEvalExpression
AnchorSideRight.Side = asrBottom
Left = 124
Height = 23
Top = 31
Width = 304
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 20
BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
ButtonCaption = '...'
ButtonWidth = 50
Enabled = False
MaxLength = 0
NumGlyphs = 1
PasswordChar = #0
TabOrder = 2
OnButtonClick = edtEnableGroupsButtonClick
end
object edtDisableGroups: TEditButton
AnchorSideLeft.Control = chkEvalExpression
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtEnableGroups
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edtEvalExpression
AnchorSideRight.Side = asrBottom
Left = 124
Height = 23
Top = 60
Width = 304
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 20
BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
ButtonCaption = '...'
ButtonWidth = 50
Enabled = False
MaxLength = 0
NumGlyphs = 1
PasswordChar = #0
TabOrder = 4
OnButtonClick = edtDisableGroupsButtonClick
end
object chkEvalExpression: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtEvalExpression
AnchorSideTop.Side = asrCenter
Left = 6
Height = 19
Top = 91
Width = 98
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Eval expression'
TabOrder = 5
OnChange = chkEvalExpressionChange
end
object chkLogMessage: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtLogMessage
AnchorSideTop.Side = asrCenter
Left = 6
Height = 19
Top = 120
Width = 87
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Log message'
TabOrder = 7
OnChange = chkLogMessageChange
end
object edtEvalExpression: TEdit
AnchorSideLeft.Control = chkEvalExpression
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtDisableGroups
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbActions
AnchorSideRight.Side = asrBottom
Left = 124
Height = 23
Top = 89
Width = 304
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 20
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Enabled = False
TabOrder = 6
end
object edtLogMessage: TEdit
AnchorSideLeft.Control = chkEvalExpression
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtEvalExpression
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbActions
AnchorSideRight.Side = asrBottom
Left = 124
Height = 23
Top = 118
Width = 304
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 20
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Enabled = False
TabOrder = 8
end
object chkLogCallStack: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtLogCallStack
AnchorSideTop.Side = asrCenter
Left = 6
Height = 19
Top = 149
Width = 89
BorderSpacing.Left = 6
Caption = 'Log call stack'
TabOrder = 9
OnChange = chkLogCallStackChange
end
object edtLogCallStack: TSpinEdit
AnchorSideLeft.Control = chkEvalExpression
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtLogMessage
AnchorSideTop.Side = asrBottom
Left = 124
Height = 23
Top = 147
Width = 50
BorderSpacing.Left = 20
BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
Enabled = False
MaxValue = 1024
TabOrder = 10
end
object lblLogCallStackLimit: TLabel
AnchorSideLeft.Control = edtLogCallStack
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtLogCallStack
AnchorSideTop.Side = asrCenter
Left = 180
Height = 15
Top = 151
Width = 108
BorderSpacing.Left = 6
Caption = 'lblLogCallStackLimit'
ParentColor = False
end
object chkTakeSnap: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtLogCallStack
AnchorSideTop.Side = asrBottom
Left = 6
Height = 19
Top = 176
Width = 87
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'chkTakeSnap'
TabOrder = 11
end
end
object ButtonPanel: TButtonPanel
AnchorSideTop.Control = gbActions
AnchorSideTop.Side = asrBottom
Left = 6
Height = 45
Top = 526
Width = 438
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 = 11
ShowButtons = [pbOK, pbCancel, pbHelp]
ShowBevel = False
end
object edtCondition: TComboBox
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = chkEnabled
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 23
Top = 139
Width = 305
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 24
BorderSpacing.Around = 6
ItemHeight = 15
TabOrder = 5
Text = 'edtCondition'
end
object edtLine: TSpinEdit
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtFilename
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 139
Height = 23
Top = 35
Width = 60
BorderSpacing.Left = 24
BorderSpacing.Around = 6
MaxValue = 999999
TabOrder = 1
end
object rgWatchKind: TPanel
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtLine
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 19
Top = 64
Width = 305
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Left = 24
BorderSpacing.Around = 6
BevelOuter = bvNone
ChildSizing.LeftRightSpacing = 6
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 3
ClientHeight = 19
ClientWidth = 305
TabOrder = 2
Visible = False
object rbWrite: TRadioButton
Left = 6
Height = 19
Top = 0
Width = 57
Caption = 'rbWrite'
Checked = True
TabOrder = 0
TabStop = True
end
object rbRead: TRadioButton
Left = 66
Height = 19
Top = 0
Width = 55
BorderSpacing.Left = 3
Caption = 'rbRead'
TabOrder = 1
end
object rbReadWrite: TRadioButton
Left = 124
Height = 19
Top = 0
Width = 83
BorderSpacing.Left = 3
Caption = 'rbReadWrite'
TabOrder = 2
end
end
object rgWatchScope: TPanel
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = rgWatchKind
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 19
Top = 89
Width = 305
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Left = 24
BorderSpacing.Around = 6
BevelOuter = bvNone
ChildSizing.LeftRightSpacing = 6
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 3
ClientHeight = 19
ClientWidth = 305
TabOrder = 3
Visible = False
object rbGlobal: TRadioButton
Left = 6
Height = 19
Top = 0
Width = 63
Caption = 'rbGlobal'
Checked = True
TabOrder = 0
TabStop = True
end
object rbLocal: TRadioButton
Left = 72
Height = 19
Top = 0
Width = 57
BorderSpacing.Left = 3
Caption = 'rbLocal'
TabOrder = 1
end
object Label1: TLabel
Left = 129
Height = 19
Top = 0
Width = 3
Caption = ' '
ParentColor = False
end
end
object lblWatchKind: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = rgWatchKind
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 66
Width = 71
BorderSpacing.Left = 6
Caption = 'lblWatchKind'
ParentColor = False
Visible = False
end
object lblWatchScope: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = rgWatchScope
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 91
Width = 79
BorderSpacing.Left = 6
Caption = 'lblWatchScope'
ParentColor = False
Visible = False
end
object chkEnabled: TCheckBox
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = rgWatchScope
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 19
Top = 114
Width = 305
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 24
BorderSpacing.Around = 6
Caption = 'chkEnabled'
TabOrder = 4
end
object lblBadGroupName: TLabel
AnchorSideLeft.Control = cmbGroup
AnchorSideTop.Control = cmbGroup
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 139
Height = 15
Top = 284
Width = 305
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Caption = 'lblBadGroupName'
Font.Color = clRed
ParentFont = False
Visible = False
WordWrap = True
end
end
Reference in New Issue View Git Blame Copy Permalink