lazarus/debugger/debugoptionsfrm.lfm
laurent 29edef9d61 Load glyph form resource
git-svn-id: trunk@16703 -
2008-09-24 12:15:57 +00:00

551 lines
15 KiB
Plaintext

object DebuggerOptionsForm: TDebuggerOptionsForm
Left = 410
Height = 443
Top = 196
Width = 482
ActiveControl = cmbDebuggerType
BorderIcons = [biSystemMenu]
Caption = 'Debugger Options'
ClientHeight = 443
ClientWidth = 482
OnCreate = DebuggerOptionsFormCREATE
OnDestroy = DebuggerOptionsFormDESTROY
ParentFont = False
Position = poScreenCenter
LCLVersion = '0.9.25'
object nbDebugOptions: TNotebook
AnchorSideBottom.Control = BtnPanel
Height = 408
Width = 482
Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom]
PageIndex = 3
TabOrder = 0
object pgGeneral: TPage
Caption = 'pgGeneral'
ClientWidth = 474
ClientHeight = 382
object gbDebuggerType: TGroupBox
Left = 6
Height = 80
Top = 6
Width = 462
Align = alTop
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Debugger type and path'
ClientHeight = 80
ClientWidth = 462
ParentCtl3D = False
TabOrder = 0
object cmbDebuggerType: TComboBox
AnchorSideLeft.Control = gbDebuggerType
AnchorSideTop.Control = gbDebuggerType
AnchorSideRight.Control = gbDebuggerType
AnchorSideRight.Side = asrBottom
Left = 6
Height = 21
Top = 6
Width = 446
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
ItemHeight = 13
OnEditingDone = cmbDebuggerTypeCHANGE
OnSelect = cmbDebuggerTypeCHANGE
ParentCtl3D = False
TabOrder = 0
end
object cmbDebuggerPath: TComboBox
AnchorSideLeft.Control = gbDebuggerType
AnchorSideTop.Control = cmbDebuggerType
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = cmdOpenDebuggerPath
Left = 6
Height = 21
Top = 33
Width = 417
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
ItemHeight = 13
ParentCtl3D = False
TabOrder = 1
end
object cmdOpenDebuggerPath: TButton
AnchorSideTop.Control = cmbDebuggerPath
AnchorSideRight.Control = gbDebuggerType
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = cmbDebuggerPath
AnchorSideBottom.Side = asrBottom
Left = 429
Height = 21
Top = 33
Width = 23
Anchors = [akTop, akRight, akBottom]
BorderSpacing.Right = 6
Caption = '...'
OnClick = cmdOpenDebuggerPathCLICK
TabOrder = 2
end
end
object gbAdditionalSearchPath: TGroupBox
AnchorSideLeft.Control = pgGeneral
AnchorSideTop.Control = gbDebuggerType
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = pgGeneral
AnchorSideRight.Side = asrBottom
Left = 6
Height = 55
Top = 92
Width = 462
Align = alTop
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Additional search path'
ClientHeight = 55
ClientWidth = 462
ParentCtl3D = False
TabOrder = 1
object txtAdditionalPath: TEdit
AnchorSideLeft.Control = gbAdditionalSearchPath
AnchorSideTop.Control = gbAdditionalSearchPath
AnchorSideRight.Control = cmdOpenAdditionalPath
Left = 6
Height = 25
Top = 6
Width = 417
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
TabOrder = 0
end
object cmdOpenAdditionalPath: TButton
AnchorSideTop.Control = txtAdditionalPath
AnchorSideRight.Control = gbAdditionalSearchPath
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = txtAdditionalPath
AnchorSideBottom.Side = asrBottom
Left = 429
Height = 25
Top = 6
Width = 23
Anchors = [akTop, akRight, akBottom]
BorderSpacing.Right = 6
Caption = '...'
OnClick = cmdOpenAdditionalPathClick
TabOrder = 1
end
end
object gbDebuggerSpecific: TGroupBox
AnchorSideLeft.Control = pgGeneral
AnchorSideTop.Control = gcbDebuggerGeneralOptions
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = pgGeneral
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = pgGeneral
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 161
Top = 215
Width = 462
Align = alClient
BorderSpacing.Around = 6
Caption = 'Debugger specific options (depends on type of debugger)'
ClientHeight = 161
ClientWidth = 462
ParentCtl3D = False
TabOrder = 2
object pnlDebugSpecific: TPanel
Left = 6
Height = 131
Top = 6
Width = 446
Align = alClient
BorderSpacing.Around = 6
BevelOuter = bvNone
BorderWidth = 4
FullRepaint = False
TabOrder = 0
TabStop = True
end
end
object gcbDebuggerGeneralOptions: TCheckGroup
AnchorSideLeft.Control = pgGeneral
AnchorSideTop.Control = gbAdditionalSearchPath
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = pgGeneral
AnchorSideRight.Side = asrBottom
Left = 6
Height = 56
Top = 153
Width = 462
Align = alTop
AutoFill = True
BorderSpacing.Around = 6
Caption = 'Debugger general options'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
TabOrder = 3
end
end
object pgEventLog: TPage
Caption = 'pgEventLog'
ClientWidth = 474
ClientHeight = 382
object gbGeneral: TGroupBox
Left = 6
Height = 132
Top = 6
Width = 462
Align = alTop
BorderSpacing.Around = 6
Caption = 'General'
ClientHeight = 132
ClientWidth = 462
ParentCtl3D = False
TabOrder = 0
object chkClearLogOnRun: TCheckBox
Left = 4
Height = 19
Top = 5
Width = 102
Caption = 'Clear log on run'
TabOrder = 0
end
object chkLimitLinecount: TCheckBox
Left = 4
Height = 19
Top = 29
Width = 106
Caption = 'Limit linecount to'
TabOrder = 1
end
object seLimitLinecount: TSpinEdit
Left = 46
Height = 20
Top = 54
Width = 82
Enabled = False
TabOrder = 2
end
end
object gbMessages: TGroupBox
Left = 6
Height = 232
Top = 144
Width = 462
Align = alClient
BorderSpacing.Around = 6
Caption = 'Messages'
ClientHeight = 232
ClientWidth = 462
Enabled = False
ParentCtl3D = False
TabOrder = 1
object chkMessagesBreakpoint: TCheckBox
Left = 4
Height = 19
Top = 5
Width = 77
AllowGrayed = True
Caption = 'Breakpoint'
TabOrder = 0
end
object chkMessagesProcess: TCheckBox
Left = 4
Height = 19
Top = 29
Width = 63
AllowGrayed = True
Caption = 'Process'
TabOrder = 1
end
object chkMessagesThread: TCheckBox
Left = 4
Height = 19
Top = 53
Width = 60
AllowGrayed = True
Caption = 'Thread'
TabOrder = 2
end
object chkMessagesModule: TCheckBox
Left = 4
Height = 19
Top = 77
Width = 60
AllowGrayed = True
Caption = 'Module'
TabOrder = 3
end
object chkMessagesOutput: TCheckBox
Left = 4
Height = 19
Top = 101
Width = 60
AllowGrayed = True
Caption = 'Output'
TabOrder = 4
end
object chkMessagesWindow: TCheckBox
Left = 4
Height = 19
Top = 125
Width = 64
AllowGrayed = True
Caption = 'Window'
TabOrder = 5
end
object chkMessagesInterface: TCheckBox
Left = 4
Height = 19
Top = 149
Width = 71
AllowGrayed = True
Caption = 'Interface'
TabOrder = 6
end
end
end
object pgExceptions: TPage
Caption = 'pgExceptions'
ClientWidth = 474
ClientHeight = 382
object bgIgnoreExceptions: TGroupBox
Left = 6
Height = 345
Top = 6
Width = 462
Align = alClient
BorderSpacing.Around = 6
Caption = 'Ignore these exceptions'
ClientHeight = 345
ClientWidth = 462
ParentCtl3D = False
TabOrder = 0
object clbExceptions: TCheckListBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 256
Top = 6
Width = 446
Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
OnClick = clbExceptionsCLICK
TabOrder = 0
end
object cmdExceptionAdd: TBitBtn
AnchorSideRight.Control = cmdExceptionRemove
AnchorSideBottom.Control = bgIgnoreExceptions
AnchorSideBottom.Side = asrBottom
Left = 296
Height = 23
Top = 298
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Add'
Constraints.MinWidth = 75
NumGlyphs = 0
OnClick = cmdExceptionAddCLICK
TabOrder = 1
end
object cmdExceptionRemove: TBitBtn
AnchorSideRight.Control = bgIgnoreExceptions
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = bgIgnoreExceptions
AnchorSideBottom.Side = asrBottom
Left = 377
Height = 23
Top = 298
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Remove'
Constraints.MinWidth = 75
Enabled = False
NumGlyphs = 0
OnClick = cmdExceptionRemoveCLICK
TabOrder = 2
end
end
object chkBreakOnException: TCheckBox
Left = 6
Height = 19
Top = 357
Width = 462
Align = alBottom
AllowGrayed = True
Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6
Caption = 'Break on Lazarus Exceptions'
TabOrder = 1
end
end
object pgSignals: TPage
Caption = 'pgSignals'
ClientWidth = 474
ClientHeight = 382
object gbSignals: TGroupBox
Left = 6
Height = 370
Top = 6
Width = 462
Align = alClient
BorderSpacing.Around = 6
Caption = 'Signals'
ClientHeight = 352
ClientWidth = 458
ParentCtl3D = False
TabOrder = 0
object lvSignals: TListView
Left = 6
Height = 292
Top = 6
Width = 446
Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Columns = <
item
Caption = 'Name'
Width = 200
end
item
Caption = 'ID'
end
item
Caption = 'Handled by'
Width = 75
end
item
Caption = 'Resume'
Width = 107
end>
PopupMenu = popSignal
TabOrder = 0
ViewStyle = vsReport
end
object cmdSignalRemove: TBitBtn
AnchorSideRight.Control = gbSignals
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = gbSignals
AnchorSideBottom.Side = asrBottom
Left = 377
Height = 23
Top = 323
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Remove'
Constraints.MinWidth = 75
Enabled = False
NumGlyphs = 0
TabOrder = 1
end
object cmdSignalAdd: TBitBtn
AnchorSideRight.Control = cmdSignalRemove
AnchorSideBottom.Control = gbSignals
AnchorSideBottom.Side = asrBottom
Left = 296
Height = 23
Top = 323
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Add'
Constraints.MinWidth = 75
NumGlyphs = 0
TabOrder = 2
end
end
end
end
object BtnPanel: TPanel
Height = 35
Top = 408
Width = 482
Align = alBottom
AutoSize = True
BevelOuter = bvNone
ClientHeight = 35
ClientWidth = 482
TabOrder = 1
object cmdOK: TBitBtn
AnchorSideBottom.Side = asrBottom
Left = 320
Height = 23
Top = 6
Width = 75
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
Caption = '&OK'
Constraints.MinWidth = 75
Default = True
Kind = bkOK
NumGlyphs = 0
OnClick = cmdOKCLICK
TabOrder = 0
end
object cmdCancel: TBitBtn
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 401
Height = 23
Top = 6
Width = 75
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
Cancel = True
Caption = 'Cancel'
Constraints.MinWidth = 75
Kind = bkCancel
ModalResult = 2
NumGlyphs = 0
TabOrder = 1
end
end
object popSignal: TPopupMenu
left = 8
top = 448
object mnuHandledByProgram: TMenuItem
AutoCheck = True
Caption = 'Handled by Program'
GroupIndex = 1
RadioItem = True
end
object mnuiHandledByDebugger: TMenuItem
AutoCheck = True
Caption = 'Handled by Debugger'
GroupIndex = 1
RadioItem = True
end
object N1: TMenuItem
Caption = '-'
end
object mnuResumeHandled: TMenuItem
AutoCheck = True
Caption = 'Resume Handled'
GroupIndex = 2
RadioItem = True
end
object mnuResumeUnhandled: TMenuItem
AutoCheck = True
Caption = 'Resume Unhandled'
GroupIndex = 2
RadioItem = True
end
end
end