paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-03 00:38:15 +02:00
Code Issues Packages Projects Releases Wiki Activity
17a650d35b
lazarus/ide/debugoptionsfrm.lfm
mattias 368ecf5f31 IDE: reordered buttons from Graeme 
git-svn-id: trunk@10291 -
2006-12-04 10:34:44 +00:00

491 lines
13 KiB
Plaintext
Raw Blame History

object DebuggerOptionsForm: TDebuggerOptionsForm
Left = 410
Height = 443
Top = 196
Width = 482
HorzScrollBar.Page = 481
VertScrollBar.Page = 442
ActiveControl = cmbDebuggerType
BorderIcons = [biSystemMenu]
Caption = 'Debugger Options'
OnCreate = DebuggerOptionsFormCREATE
OnDestroy = DebuggerOptionsFormDESTROY
Position = poScreenCenter
object nbDebugOptions: TNotebook
AnchorSideBottom.Control = cmdOK
Left = 6
Height = 400
Top = 6
Width = 470
Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
PageIndex = 3
object pgGeneral: TPage
Caption = 'Page1'
object gbDebuggerType: TGroupBox
Left = 6
Height = 90
Top = 6
Width = 454
Align = alTop
BorderSpacing.Around = 6
Caption = 'Debugger type and path'
ParentCtl3D = False
TabOrder = 0
object cmbDebuggerType: TComboBox
Left = 6
Height = 21
Top = 8
Width = 425
Anchors = [akTop, akLeft, akRight]
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
MaxLength = 0
OnChange = cmbDebuggerTypeCHANGE
ParentCtl3D = False
TabOrder = 0
end
object cmbDebuggerPath: TComboBox
Left = 6
Height = 21
Top = 40
Width = 400
Anchors = [akTop, akLeft, akRight]
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
MaxLength = 0
ParentCtl3D = False
TabOrder = 1
end
object cmdOpenDebuggerPath: TButton
Left = 408
Height = 25
Top = 37
Width = 23
Anchors = [akTop, akRight]
BorderSpacing.InnerBorder = 4
Caption = '...'
OnClick = cmdOpenDebuggerPathCLICK
TabOrder = 2
end
end
object gbAdditionalSearchPath: TGroupBox
Left = 6
Height = 56
Top = 102
Width = 454
Align = alTop
BorderSpacing.Around = 6
Caption = 'Additional search path'
ParentCtl3D = False
TabOrder = 1
object txtAdditionalPath: TEdit
Left = 6
Height = 25
Top = 5
Width = 398
Anchors = [akTop, akLeft, akRight]
TabOrder = 0
end
object cmdOpenAdditionalPath: TButton
Left = 408
Height = 24
Top = 5
Width = 23
Anchors = [akTop, akRight]
BorderSpacing.InnerBorder = 4
Caption = '...'
OnClick = cmdOpenAdditionalPathClick
TabOrder = 1
end
end
object gbDebuggerSpecific: TGroupBox
Left = 6
Height = 134
Top = 226
Width = 454
Align = alClient
BorderSpacing.Around = 6
Caption = 'Debugger specific options (depends on type of debugger)'
ParentCtl3D = False
TabOrder = 2
object pnlDebugSpecific: TPanel
Left = 6
Height = 101
Top = 6
Width = 438
Align = alClient
BorderSpacing.Around = 6
BevelOuter = bvNone
BorderWidth = 4
FullRepaint = False
TabOrder = 0
TabStop = True
end
end
object gcbDebuggerGeneralOptions: TCheckGroup
Left = 6
Height = 56
Top = 164
Width = 454
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 = 'Page2'
object gbGeneral: TGroupBox
Left = 6
Height = 132
Top = 6
Width = 454
Align = alTop
BorderSpacing.Around = 6
Caption = 'General'
ParentCtl3D = False
TabOrder = 0
object chkClearLogOnRun: TCheckBox
Left = 4
Height = 24
Top = 5
Width = 139
AllowGrayed = True
Caption = 'Clear log on run'
TabOrder = 0
end
object chkLimitLinecount: TCheckBox
Left = 4
Height = 24
Top = 29
Width = 146
AllowGrayed = True
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 = 216
Top = 144
Width = 454
Align = alClient
BorderSpacing.Around = 6
Caption = 'Messages'
Enabled = False
ParentCtl3D = False
TabOrder = 1
object chkMessagesBreakpoint: TCheckBox
Left = 4
Height = 24
Top = 5
Width = 101
AllowGrayed = True
Caption = 'Breakpoint'
TabOrder = 0
end
object chkMessagesProcess: TCheckBox
Left = 4
Height = 24
Top = 29
Width = 82
AllowGrayed = True
Caption = 'Process'
TabOrder = 1
end
object chkMessagesThread: TCheckBox
Left = 4
Height = 24
Top = 53
Width = 75
AllowGrayed = True
Caption = 'Thread'
TabOrder = 2
end
object chkMessagesModule: TCheckBox
Left = 4
Height = 24
Top = 77
Width = 76
AllowGrayed = True
Caption = 'Module'
TabOrder = 3
end
object chkMessagesOutput: TCheckBox
Left = 4
Height = 24
Top = 101
Width = 74
AllowGrayed = True
Caption = 'Output'
TabOrder = 4
end
object chkMessagesWindow: TCheckBox
Left = 4
Height = 24
Top = 125
Width = 81
AllowGrayed = True
Caption = 'Window'
TabOrder = 5
end
object chkMessagesInterface: TCheckBox
Left = 4
Height = 24
Top = 149
Width = 87
AllowGrayed = True
Caption = 'Interface'
TabOrder = 6
end
end
end
object pgExceptions: TPage
Caption = 'Page3'
object bgIgnoreExceptions: TGroupBox
Left = 6
Height = 324
Top = 6
Width = 454
Align = alClient
BorderSpacing.Around = 6
Caption = 'Ignore these exceptions'
ParentCtl3D = False
TabOrder = 0
object cmdExceptionRemove: TButton
AnchorSideRight.Control = bgIgnoreExceptions
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = bgIgnoreExceptions
AnchorSideBottom.Side = asrBottom
Left = 369
Height = 25
Top = 272
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Caption = 'Remove'
Constraints.MaxHeight = 25
Constraints.MinWidth = 75
Enabled = False
OnClick = cmdExceptionRemoveCLICK
TabOrder = 0
end
object cmdExceptionAdd: TButton
AnchorSideRight.Control = cmdExceptionRemove
AnchorSideBottom.Control = bgIgnoreExceptions
AnchorSideBottom.Side = asrBottom
Left = 288
Height = 25
Top = 272
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Caption = 'Add'
Constraints.MaxHeight = 25
Constraints.MinWidth = 75
OnClick = cmdExceptionAddCLICK
TabOrder = 1
end
object clbExceptions: TCheckListBox
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = cmdExceptionAdd
Left = 6
Height = 260
Top = 6
Width = 438
Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
OnClick = clbExceptionsCLICK
TabOrder = 2
TopIndex = -1
end
end
object chkBreakOnException: TCheckBox
Left = 6
Height = 24
Top = 336
Width = 454
Align = alBottom
AllowGrayed = True
Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6
Caption = 'Break on Lazarus Exceptions'
TabOrder = 1
end
end
object pgSignals: TPage
Caption = 'Page4'
object gbSignals: TGroupBox
Left = 6
Height = 354
Top = 6
Width = 454
Align = alClient
BorderSpacing.Around = 6
Caption = 'Signals'
ParentCtl3D = False
TabOrder = 0
object cmdSignalRemove: TButton
AnchorSideRight.Control = gbSignals
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = gbSignals
AnchorSideBottom.Side = asrBottom
Left = 369
Height = 25
Top = 302
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Caption = 'Remove'
Constraints.MaxHeight = 25
Constraints.MinWidth = 75
Enabled = False
TabOrder = 0
end
object cmdSignalAdd: TButton
AnchorSideRight.Control = cmdSignalRemove
AnchorSideBottom.Control = gbSignals
AnchorSideBottom.Side = asrBottom
Left = 288
Height = 25
Top = 302
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Caption = 'Add'
Constraints.MaxHeight = 25
Constraints.MinWidth = 75
TabOrder = 1
end
object lvSignals: TListView
AnchorSideBottom.Control = cmdSignalAdd
Left = 6
Height = 290
Top = 6
Width = 438
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 = 5
end>
PopupMenu = popSignal
TabOrder = 2
ViewStyle = vsReport
end
end
end
end
object cmdOK: TBitBtn
AnchorSideRight.Control = cmdCancel
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 308
Height = 25
Top = 412
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
Caption = '&OK'
Constraints.MaxHeight = 25
Constraints.MinWidth = 75
Kind = bkOK
ModalResult = 1
NumGlyphs = 0
OnClick = cmdOKCLICK
TabOrder = 1
end
object cmdCancel: TBitBtn
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 389
Height = 25
Top = 412
Width = 87
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
Cancel = True
Caption = 'Cancel'
Constraints.MaxHeight = 25
Constraints.MinWidth = 75
Kind = bkCancel
ModalResult = 2
NumGlyphs = 0
TabOrder = 2
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
Reference in New Issue View Git Blame Copy Permalink