forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fixup HEAD~1, missing lfm changes

This commit is contained in:
Basile Burg 2023-09-18 08:40:46 +02:00
parent f1c6b38c38
commit af68051ba8
1 changed files with 74 additions and 70 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

114
src/u_gdb.lfm
View File

@ -8,36 +8,37 @@ inherited GdbWidget: TGdbWidget
ClientWidth = 672 ClientWidth = 672
inherited Content: TPanel inherited Content: TPanel
Height = 626 Height = 626
Top = 42
Width = 672 Width = 672
ClientHeight = 626 ClientHeight = 626
ClientWidth = 672 ClientWidth = 672
object Panel1: TPanel[0] object Panel1: TPanel[0]
Left = 0 Left = 0
Height = 386 Height = 383
Top = 205 Top = 205
Width = 672 Width = 672
Align = alClient Align = alClient
AutoSize = True AutoSize = True
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 386 ClientHeight = 383
ClientWidth = 672 ClientWidth = 672
TabOrder = 0 TabOrder = 0
object GroupBox3: TGroupBox object GroupBox3: TGroupBox
Left = 0 Left = 0
Height = 180 Height = 177
Top = 206 Top = 206
Width = 672 Width = 672
Align = alClient Align = alClient
Caption = 'CPU' Caption = 'CPU'
ClientHeight = 161 ClientHeight = 158
ClientWidth = 668 ClientWidth = 670
TabOrder = 0 TabOrder = 0
object cpuViewer: TTIPropertyGrid object cpuViewer: TTIPropertyGrid
Left = 0 Left = 0
Height = 161 Height = 158
Hint = 'cpu registers' Hint = 'cpu registers'
Top = 0 Top = 0
Width = 668 Width = 670
Align = alClient Align = alClient
CheckboxForBoolean = True CheckboxForBoolean = True
DefaultValueFont.Color = clWindowText DefaultValueFont.Color = clWindowText
@ -70,25 +71,25 @@ inherited GdbWidget: TGdbWidget
OnChange = PageControl2Change OnChange = PageControl2Change
object TabSheet3: TTabSheet object TabSheet3: TTabSheet
Caption = 'Variables' Caption = 'Variables'
ClientHeight = 173 ClientHeight = 168
ClientWidth = 670 ClientWidth = 662
object lstVariables: TListView object lstVariables: TListView
Left = 2 Left = 2
Height = 140 Height = 132
Top = 31 Top = 34
Width = 666 Width = 658
Align = alClient Align = alClient
BorderSpacing.Around = 2 BorderSpacing.Around = 2
Columns = < Columns = <
item item
AutoSize = True AutoSize = True
Caption = 'name' Caption = 'name'
Width = 43 Width = 52
end end
item item
AutoSize = True AutoSize = True
Caption = 'value' Caption = 'value'
Width = 621 Width = 604
end> end>
GridLines = True GridLines = True
HideSelection = False HideSelection = False
@ -102,10 +103,10 @@ inherited GdbWidget: TGdbWidget
end end
object varListFlt: TListViewFilterEdit object varListFlt: TListViewFilterEdit
Left = 2 Left = 2
Height = 27 Height = 30
Hint = 'locate variables' Hint = 'locate variables'
Top = 2 Top = 2
Width = 666 Width = 658
ButtonWidth = 24 ButtonWidth = 24
Align = alTop Align = alTop
BorderSpacing.Around = 2 BorderSpacing.Around = 2
@ -117,13 +118,13 @@ inherited GdbWidget: TGdbWidget
end end
object TabSheet4: TTabSheet object TabSheet4: TTabSheet
Caption = 'Assembler' Caption = 'Assembler'
ClientHeight = 173 ClientHeight = 168
ClientWidth = 670 ClientWidth = 662
object lstAsm: TListView object lstAsm: TListView
Left = 2 Left = 2
Height = 169 Height = 164
Top = 2 Top = 2
Width = 666 Width = 658
Align = alClient Align = alClient
AutoSort = False AutoSort = False
AutoWidthLastColumn = True AutoWidthLastColumn = True
@ -132,11 +133,11 @@ inherited GdbWidget: TGdbWidget
item item
AutoSize = True AutoSize = True
Caption = 'address' Caption = 'address'
Width = 57 Width = 64
end end
item item
Caption = 'instruction' Caption = 'instruction'
Width = 607 Width = 592
end> end>
GridLines = True GridLines = True
HideSelection = False HideSelection = False
@ -151,19 +152,19 @@ inherited GdbWidget: TGdbWidget
end end
object Panel3: TPanel[1] object Panel3: TPanel[1]
Left = 4 Left = 4
Height = 27 Height = 30
Top = 595 Top = 592
Width = 664 Width = 664
Align = alBottom Align = alBottom
AutoSize = True AutoSize = True
BorderSpacing.Around = 4 BorderSpacing.Around = 4
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 27 ClientHeight = 30
ClientWidth = 664 ClientWidth = 664
TabOrder = 1 TabOrder = 1
object btnSendCom: TSpeedButton object btnSendCom: TSpeedButton
Left = 659 Left = 659
Height = 25 Height = 28
Top = 1 Top = 1
Width = 4 Width = 4
Align = alRight Align = alRight
@ -173,7 +174,7 @@ inherited GdbWidget: TGdbWidget
end end
object Edit1: TComboBox object Edit1: TComboBox
Left = 0 Left = 0
Height = 27 Height = 30
Hint = 'enter a custom GDB command or the program input with ">"' Hint = 'enter a custom GDB command or the program input with ">"'
Top = 0 Top = 0
Width = 658 Width = 658
@ -209,14 +210,14 @@ inherited GdbWidget: TGdbWidget
TabOrder = 3 TabOrder = 3
object TabSheet1: TTabSheet object TabSheet1: TTabSheet
Caption = 'Call stack' Caption = 'Call stack'
ClientHeight = 173 ClientHeight = 168
ClientWidth = 670 ClientWidth = 662
object lstCallStack: TListView object lstCallStack: TListView
Left = 0 Left = 0
Height = 173 Height = 168
Hint = 'call stack' Hint = 'call stack'
Top = 0 Top = 0
Width = 670 Width = 662
Align = alClient Align = alClient
AutoSort = False AutoSort = False
Columns = < Columns = <
@ -246,14 +247,14 @@ inherited GdbWidget: TGdbWidget
end end
object TabSheet2: TTabSheet object TabSheet2: TTabSheet
Caption = 'Thread list' Caption = 'Thread list'
ClientHeight = 173 ClientHeight = 168
ClientWidth = 670 ClientWidth = 662
object lstThreads: TListView object lstThreads: TListView
Left = 0 Left = 0
Height = 173 Height = 168
Hint = 'call stack' Hint = 'call stack'
Top = 0 Top = 0
Width = 670 Width = 662
Align = alClient Align = alClient
AutoSort = False AutoSort = False
AutoWidthLastColumn = True AutoWidthLastColumn = True
@ -261,36 +262,36 @@ inherited GdbWidget: TGdbWidget
item item
AutoSize = True AutoSize = True
Caption = 'id' Caption = 'id'
Width = 18 Width = 26
end end
item item
AutoSize = True AutoSize = True
Caption = 'state' Caption = 'state'
Width = 39 Width = 48
end end
item item
AutoSize = True AutoSize = True
Caption = 'core' Caption = 'core'
Width = 34 Width = 43
end end
item item
AutoSize = True AutoSize = True
Caption = 'function' Caption = 'function'
Width = 59 Width = 71
end end
item item
AutoSize = True AutoSize = True
Caption = 'address' Caption = 'address'
Width = 57 Width = 64
end end
item item
AutoSize = True AutoSize = True
Caption = 'filename' Caption = 'filename'
Width = 64 Width = 73
end end
item item
Caption = 'line' Caption = 'line'
Width = 397 Width = 335
end> end>
GridLines = True GridLines = True
ReadOnly = True ReadOnly = True
@ -302,13 +303,13 @@ inherited GdbWidget: TGdbWidget
end end
object TabSheet5: TTabSheet object TabSheet5: TTabSheet
Caption = 'Debugee options' Caption = 'Debugee options'
ClientHeight = 173 ClientHeight = 168
ClientWidth = 670 ClientWidth = 662
object dbgeeOptsEd: TTIPropertyGrid object dbgeeOptsEd: TTIPropertyGrid
Left = 2 Left = 2
Height = 169 Height = 164
Top = 2 Top = 2
Width = 666 Width = 658
Align = alClient Align = alClient
BorderSpacing.Around = 2 BorderSpacing.Around = 2
CheckboxForBoolean = True CheckboxForBoolean = True
@ -325,7 +326,7 @@ inherited GdbWidget: TGdbWidget
end end
end end
inherited toolbar: TDexedToolBar inherited toolbar: TDexedToolBar
Height = 30 Top = 10
Width = 664 Width = 664
object btnStack: TDexedToolButton[0] object btnStack: TDexedToolButton[0]
Left = 238 Left = 238
@ -457,7 +458,7 @@ inherited GdbWidget: TGdbWidget
scaledSeparator = False scaledSeparator = False
end end
end end
object Splitter2: TSplitter[1] object Splitter2: TSplitter[2]
Cursor = crVSplit Cursor = crVSplit
Left = 0 Left = 0
Height = 6 Height = 6
@ -466,11 +467,11 @@ inherited GdbWidget: TGdbWidget
Align = alTop Align = alTop
ResizeAnchor = akTop ResizeAnchor = akTop
end end
inherited contextMenu: TPopupMenu[2] inherited contextMenu: TPopupMenu[3]
Left = 56 Left = 56
Top = 64 Top = 64
end end
object mnuProjRunnable: TPopupMenu[3] object mnuProjRunnable: TPopupMenu[4]
Left = 56 Left = 56
Top = 112 Top = 112
object mnuSelProj: TMenuItem object mnuSelProj: TMenuItem
@ -489,8 +490,11 @@ inherited GdbWidget: TGdbWidget
Caption = 'Debug custom executable...' Caption = 'Debug custom executable...'
OnClick = mnuSelCustomClick OnClick = mnuSelCustomClick
end end
object mnuDebugRecent: TMenuItem
Caption = 'Debug recent executable'
end
end end
object mnuWatch: TPopupMenu[4] object mnuWatch: TPopupMenu[5]
Left = 56 Left = 56
Top = 160 Top = 160
object mnuReadW: TMenuItem object mnuReadW: TMenuItem
@ -510,7 +514,7 @@ inherited GdbWidget: TGdbWidget
OnClick = mnuReadWriteWClick OnClick = mnuReadWriteWClick
end end
end end
object mnuNext: TPopupMenu[5] object mnuNext: TPopupMenu[6]
Left = 152 Left = 152
Top = 112 Top = 112
object mnuNextMachine: TMenuItem object mnuNextMachine: TMenuItem
@ -518,7 +522,7 @@ inherited GdbWidget: TGdbWidget
Caption = 'machine instruction' Caption = 'machine instruction'
end end
end end
object mnuStep: TPopupMenu[6] object mnuStep: TPopupMenu[7]
Left = 152 Left = 152
Top = 160 Top = 160
object mnuStepMachine: TMenuItem object mnuStepMachine: TMenuItem
@ -526,7 +530,7 @@ inherited GdbWidget: TGdbWidget
Caption = 'machine instruction' Caption = 'machine instruction'
end end
end end
object mnuEval: TPopupMenu[7] object mnuEval: TPopupMenu[8]
Left = 216 Left = 216
Top = 168 Top = 168
object mnuEvalSelected: TMenuItem object mnuEvalSelected: TMenuItem
@ -546,7 +550,7 @@ inherited GdbWidget: TGdbWidget
OnClick = mnuEvalCustomClick OnClick = mnuEvalCustomClick
end end
end end
object mnuEvalCompletion: TPopupMenu[8] object mnuEvalCompletion: TPopupMenu[9]
Left = 288 Left = 288
Top = 168 Top = 168
end end