lazarus/debugger/breakpropertydlg.lfm
marc 07e6bb0f2b * Dbg: Added debug expressions. Modyfied patch #16474 by Flavio Etrusco
* Dbg: Improved pascal to gdb string conversion, so valid gdb strings will 
       be used for breakpoint expresions and string modification
* Dbg: some cleanup

git-svn-id: trunk@25523 -
2010-05-19 23:28:46 +00:00

376 lines
9.5 KiB
Plaintext

inherited BreakPropertyDlg: TBreakPropertyDlg
Left = 586
Height = 435
Top = 151
Width = 443
HorzScrollBar.Page = 386
VertScrollBar.Page = 366
VertScrollBar.Range = 325
ActiveControl = edtFilename
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Breakpoint Properties'
ClientHeight = 435
ClientWidth = 443
Position = poScreenCenter
object lblFileName: TLabel[0]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtFilename
AnchorSideTop.Side = asrCenter
Left = 6
Height = 14
Top = 10
Width = 55
BorderSpacing.Around = 6
Caption = 'Filename:'
ParentColor = False
end
object lblLine: TLabel[1]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtLine
AnchorSideTop.Side = asrCenter
Left = 6
Height = 14
Top = 39
Width = 28
BorderSpacing.Around = 6
Caption = 'Line:'
ParentColor = False
end
object lblCondition: TLabel[2]
AnchorSideLeft.Control = Owner
AnchorSideTop.Side = asrCenter
Left = 6
Height = 14
Top = 76
Width = 58
BorderSpacing.Around = 6
Caption = 'Condition:'
ParentColor = False
end
object lblHitCount: TLabel[3]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtCounter
AnchorSideTop.Side = asrCenter
Left = 6
Height = 14
Top = 109
Width = 51
BorderSpacing.Around = 6
Caption = 'Hitcount:'
ParentColor = False
end
object lblGroup: TLabel[4]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = cmbGroup
AnchorSideTop.Side = asrCenter
Left = 6
Height = 14
Top = 169
Width = 40
BorderSpacing.Around = 6
Caption = 'Group:'
ParentColor = False
end
object lblAutoContinue: TLabel[5]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = edtAutocontinueMS
AnchorSideTop.Side = asrCenter
Left = 6
Height = 14
Top = 138
Width = 109
BorderSpacing.Around = 6
Caption = 'Auto continue after'
ParentColor = False
end
object lblMS: TLabel[6]
AnchorSideLeft.Control = edtAutocontinueMS
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = lblAutoContinue
AnchorSideTop.Side = asrCenter
Left = 193
Height = 14
Top = 138
Width = 27
BorderSpacing.Left = 6
Caption = '(ms)'
ParentColor = False
end
object edtAutocontinueMS: TEdit[7]
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtCounter
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 127
Height = 23
Top = 134
Width = 60
BorderSpacing.Left = 6
BorderSpacing.Around = 6
TabOrder = 3
Text = 'edtAutocontinueMS'
end
object edtCounter: TEdit[8]
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 127
Height = 23
Top = 105
Width = 310
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Around = 6
TabOrder = 2
Text = 'edtCounter'
end
object edtLine: TEdit[9]
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtFilename
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 127
Height = 23
Top = 35
Width = 60
BorderSpacing.Left = 6
BorderSpacing.Around = 6
Color = clBtnFace
ReadOnly = True
TabOrder = 1
Text = 'edtLine'
end
object edtFilename: TEdit[10]
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 127
Height = 23
Top = 6
Width = 310
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Around = 6
Color = clBtnFace
ReadOnly = True
TabOrder = 0
Text = 'edtFilename'
end
object cmbGroup: TComboBox[11]
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtAutocontinueMS
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 127
Height = 27
Top = 163
Width = 310
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Around = 6
ItemHeight = 0
TabOrder = 4
Text = 'cmbGroup'
end
object gbActions: TGroupBox[12]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = cmbGroup
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 165
Top = 196
Width = 431
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Actions'
ClientHeight = 150
ClientWidth = 427
TabOrder = 5
object chkActionBreak: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = gbActions
Left = 6
Height = 22
Top = 6
Width = 57
BorderSpacing.Around = 6
Caption = 'Break'
TabOrder = 0
end
object chkEnableGroups: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtEnableGroups
AnchorSideTop.Side = asrCenter
Left = 6
Height = 22
Top = 34
Width = 101
BorderSpacing.Around = 6
Caption = 'Enable goups'
TabOrder = 1
end
object chkDisableGroups: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtDisableGroups
AnchorSideTop.Side = asrCenter
Left = 6
Height = 22
Top = 63
Width = 110
BorderSpacing.Around = 6
Caption = 'Disable groups'
TabOrder = 2
end
object edtEnableGroups: TEditButton
AnchorSideLeft.Control = chkActionBreak
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = chkActionBreak
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 143
Height = 23
Top = 34
Width = 255
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 80
BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
ButtonWidth = 23
CharCase = ecNormal
Enabled = False
MaxLength = 0
NumGlyphs = 1
TabOrder = 5
end
object edtDisableGroups: TEditButton
AnchorSideLeft.Control = chkActionBreak
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtEnableGroups
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 143
Height = 23
Top = 63
Width = 255
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 80
BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
ButtonWidth = 23
CharCase = ecNormal
Enabled = False
MaxLength = 0
NumGlyphs = 1
TabOrder = 6
end
object chkEvalExpression: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtEvalExpression
AnchorSideTop.Side = asrCenter
Left = 6
Height = 22
Top = 92
Width = 114
BorderSpacing.Around = 6
Caption = 'Eval expression'
Enabled = False
TabOrder = 3
end
object chkLogMessage: TCheckBox
AnchorSideLeft.Control = gbActions
AnchorSideTop.Control = edtLogMessage
AnchorSideTop.Side = asrCenter
Left = 6
Height = 22
Top = 121
Width = 101
BorderSpacing.Around = 6
Caption = 'Log message'
Enabled = False
TabOrder = 4
end
object edtEvalExpression: TEdit
AnchorSideLeft.Control = chkActionBreak
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtDisableGroups
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbActions
AnchorSideRight.Side = asrBottom
Left = 143
Height = 23
Top = 92
Width = 278
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 80
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Enabled = False
TabOrder = 7
end
object edtLogMessage: TEdit
AnchorSideLeft.Control = chkActionBreak
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtEvalExpression
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbActions
AnchorSideRight.Side = asrBottom
Left = 143
Height = 23
Top = 121
Width = 278
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 80
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Enabled = False
TabOrder = 8
end
end
object ButtonPanel: TButtonPanel[13]
AnchorSideTop.Control = gbActions
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 6
Height = 62
Top = 367
Width = 431
Anchors = [akTop, akLeft, akRight, akBottom]
TabOrder = 6
ShowButtons = [pbOK, pbCancel, pbHelp]
ShowBevel = False
end
object edtCondition: TComboBox[14]
AnchorSideLeft.Control = lblAutoContinue
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtLine
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 127
Height = 27
Top = 64
Width = 310
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Around = 6
ItemHeight = 0
TabOrder = 7
Text = 'edtCondition'
end
end