1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145
|
inherited DebuggerSignalsOptions: TDebuggerSignalsOptions
Height = 431
Width = 450
ClientHeight = 431
ClientWidth = 450
Visible = False
DesignLeft = 331
DesignTop = 147
object gbSignals: TGroupBox[0]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 431
Top = 0
Width = 450
HelpContext = 0
Anchors = [akTop, akLeft, akRight, akBottom]
Caption = 'Signals'
ClientHeight = 413
ClientWidth = 446
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
object lvSignals: TListView
AnchorSideLeft.Control = gbSignals
AnchorSideTop.Control = gbSignals
AnchorSideRight.Control = gbSignals
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = cmdSignalAdd
Left = 6
Height = 372
Top = 6
Width = 434
HelpContext = 0
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Columns = <
item
AutoSize = False
Caption = 'Name'
Width = 200
end
item
AutoSize = False
Caption = 'ID'
end
item
AutoSize = False
Caption = 'Handled by'
Width = 75
end
item
AutoSize = False
Caption = 'Resume'
Width = 107
end>
PopupMenu = popSignal
SortColumn = 0
SortType = stNone
TabOrder = 0
ViewStyle = vsReport
end
object cmdSignalRemove: TBitBtn
AnchorSideRight.Control = gbSignals
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = gbSignals
AnchorSideBottom.Side = asrBottom
Left = 365
Height = 23
Top = 384
Width = 75
HelpContext = 0
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 = 284
Height = 23
Top = 384
Width = 75
HelpContext = 0
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Add'
Constraints.MinWidth = 75
NumGlyphs = 0
TabOrder = 2
end
end
object popSignal: TPopupMenu[1]
left = 36
top = 403
object mnuHandledByProgram: TMenuItem
AutoCheck = True
Caption = 'Handled by Program'
GroupIndex = 1
RadioItem = True
RightJustify = False
ShowAlwaysCheckable = False
end
object mnuiHandledByDebugger: TMenuItem
AutoCheck = True
Caption = 'Handled by Debugger'
GroupIndex = 1
RadioItem = True
RightJustify = False
ShowAlwaysCheckable = False
end
object N1: TMenuItem
Caption = '-'
RightJustify = False
ShowAlwaysCheckable = False
end
object mnuResumeHandled: TMenuItem
AutoCheck = True
Caption = 'Resume Handled'
GroupIndex = 2
RadioItem = True
RightJustify = False
ShowAlwaysCheckable = False
end
object mnuResumeUnhandled: TMenuItem
AutoCheck = True
Caption = 'Resume Unhandled'
GroupIndex = 2
RadioItem = True
RightJustify = False
ShowAlwaysCheckable = False
end
end
end
|