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

gdb commander, make the default window width bigger

This commit is contained in:
Basile Burg 2020-01-31 22:29:28 +01:00
parent c7911f778a
commit ac9d54c91a
1 changed files with 53 additions and 52 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

105
src/u_gdb.lfm
View File

@ -2,49 +2,49 @@ inherited GdbWidget: TGdbWidget
Left = 840 Left = 840
Height = 668 Height = 668
Top = 219 Top = 219
Width = 517 Width = 672
Caption = 'GDB commander' Caption = 'GDB commander'
ClientHeight = 668 ClientHeight = 668
ClientWidth = 517 ClientWidth = 672
inherited Back: TPanel inherited Back: TPanel
Height = 662 Height = 662
Top = 6 Top = 6
Width = 517 Width = 672
AutoSize = True AutoSize = True
ClientHeight = 662 ClientHeight = 662
ClientWidth = 517 ClientWidth = 672
inherited Content: TPanel inherited Content: TPanel
Height = 626 Height = 626
Width = 517 Width = 672
ClientHeight = 626 ClientHeight = 626
ClientWidth = 517 ClientWidth = 672
object Panel1: TPanel[0] object Panel1: TPanel[0]
Left = 0 Left = 0
Height = 386 Height = 380
Top = 205 Top = 205
Width = 517 Width = 672
Align = alClient Align = alClient
AutoSize = True AutoSize = True
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 386 ClientHeight = 380
ClientWidth = 517 ClientWidth = 672
TabOrder = 0 TabOrder = 0
object GroupBox3: TGroupBox object GroupBox3: TGroupBox
Left = 0 Left = 0
Height = 180 Height = 174
Top = 206 Top = 206
Width = 517 Width = 672
Align = alClient Align = alClient
Caption = 'CPU' Caption = 'CPU'
ClientHeight = 161 ClientHeight = 156
ClientWidth = 513 ClientWidth = 670
TabOrder = 0 TabOrder = 0
object cpuViewer: TTIPropertyGrid object cpuViewer: TTIPropertyGrid
Left = 0 Left = 0
Height = 161 Height = 156
Hint = 'cpu registers' Hint = 'cpu registers'
Top = 0 Top = 0
Width = 513 Width = 670
Align = alClient Align = alClient
CheckboxForBoolean = True CheckboxForBoolean = True
DefaultValueFont.Color = clWindowText DefaultValueFont.Color = clWindowText
@ -61,7 +61,7 @@ inherited GdbWidget: TGdbWidget
Left = 0 Left = 0
Height = 6 Height = 6
Top = 200 Top = 200
Width = 517 Width = 672
Align = alTop Align = alTop
ResizeAnchor = akTop ResizeAnchor = akTop
end end
@ -69,7 +69,7 @@ inherited GdbWidget: TGdbWidget
Left = 0 Left = 0
Height = 200 Height = 200
Top = 0 Top = 0
Width = 517 Width = 672
ActivePage = TabSheet3 ActivePage = TabSheet3
Align = alTop Align = alTop
TabIndex = 0 TabIndex = 0
@ -78,23 +78,24 @@ inherited GdbWidget: TGdbWidget
object TabSheet3: TTabSheet object TabSheet3: TTabSheet
Caption = 'Variables' Caption = 'Variables'
ClientHeight = 169 ClientHeight = 169
ClientWidth = 513 ClientWidth = 662
object lstVariables: TListView object lstVariables: TListView
Left = 2 Left = 2
Height = 136 Height = 130
Top = 31 Top = 37
Width = 509 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 = 47 Width = 58
end end
item item
AutoSize = True
Caption = 'value' Caption = 'value'
Width = 460 Width = 598
end> end>
GridLines = True GridLines = True
HideSelection = False HideSelection = False
@ -108,10 +109,10 @@ inherited GdbWidget: TGdbWidget
end end
object varListFlt: TListViewFilterEdit object varListFlt: TListViewFilterEdit
Left = 2 Left = 2
Height = 27 Height = 33
Hint = 'locate variables' Hint = 'locate variables'
Top = 2 Top = 2
Width = 509 Width = 658
ButtonWidth = 24 ButtonWidth = 24
Align = alTop Align = alTop
BorderSpacing.Around = 2 BorderSpacing.Around = 2
@ -124,7 +125,7 @@ inherited GdbWidget: TGdbWidget
object TabSheet4: TTabSheet object TabSheet4: TTabSheet
Caption = 'Assembler' Caption = 'Assembler'
ClientHeight = 169 ClientHeight = 169
ClientWidth = 513 ClientWidth = 662
object lstAsm: TListView object lstAsm: TListView
Left = 2 Left = 2
Height = 161 Height = 161
@ -138,7 +139,7 @@ inherited GdbWidget: TGdbWidget
item item
AutoSize = True AutoSize = True
Caption = 'address' Caption = 'address'
Width = 61 Width = 77
end end
item item
Caption = 'instruction' Caption = 'instruction'
@ -157,19 +158,19 @@ inherited GdbWidget: TGdbWidget
end end
object Panel3: TPanel[1] object Panel3: TPanel[1]
Left = 4 Left = 4
Height = 27 Height = 33
Top = 595 Top = 589
Width = 509 Width = 664
Align = alBottom Align = alBottom
AutoSize = True AutoSize = True
BorderSpacing.Around = 4 BorderSpacing.Around = 4
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 27 ClientHeight = 33
ClientWidth = 509 ClientWidth = 664
TabOrder = 1 TabOrder = 1
object btnSendCom: TSpeedButton object btnSendCom: TSpeedButton
Left = 504 Left = 659
Height = 25 Height = 31
Top = 1 Top = 1
Width = 4 Width = 4
Align = alRight Align = alRight
@ -179,10 +180,10 @@ inherited GdbWidget: TGdbWidget
end end
object Edit1: TComboBox object Edit1: TComboBox
Left = 0 Left = 0
Height = 27 Height = 33
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 = 503 Width = 658
Align = alClient Align = alClient
AutoComplete = True AutoComplete = True
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
@ -197,7 +198,7 @@ inherited GdbWidget: TGdbWidget
Left = 0 Left = 0
Height = 5 Height = 5
Top = 200 Top = 200
Width = 517 Width = 672
Align = alTop Align = alTop
ResizeAnchor = akTop ResizeAnchor = akTop
end end
@ -206,7 +207,7 @@ inherited GdbWidget: TGdbWidget
Height = 200 Height = 200
Hint = 'edit the command line and the environment of the debuger target' Hint = 'edit the command line and the environment of the debuger target'
Top = 0 Top = 0
Width = 517 Width = 672
ActivePage = TabSheet1 ActivePage = TabSheet1
Align = alTop Align = alTop
TabIndex = 0 TabIndex = 0
@ -214,13 +215,13 @@ inherited GdbWidget: TGdbWidget
object TabSheet1: TTabSheet object TabSheet1: TTabSheet
Caption = 'Call stack' Caption = 'Call stack'
ClientHeight = 169 ClientHeight = 169
ClientWidth = 513 ClientWidth = 662
object lstCallStack: TListView object lstCallStack: TListView
Left = 0 Left = 0
Height = 169 Height = 169
Hint = 'call stack' Hint = 'call stack'
Top = 0 Top = 0
Width = 513 Width = 662
Align = alClient Align = alClient
AutoSort = False AutoSort = False
Columns = < Columns = <
@ -238,7 +239,7 @@ inherited GdbWidget: TGdbWidget
end end
item item
Caption = 'line' Caption = 'line'
Width = 253 Width = 320
end> end>
GridLines = True GridLines = True
ReadOnly = True ReadOnly = True
@ -251,7 +252,7 @@ inherited GdbWidget: TGdbWidget
object TabSheet2: TTabSheet object TabSheet2: TTabSheet
Caption = 'Thread list' Caption = 'Thread list'
ClientHeight = 169 ClientHeight = 169
ClientWidth = 513 ClientWidth = 662
object lstThreads: TListView object lstThreads: TListView
Left = 0 Left = 0
Height = 169 Height = 169
@ -265,32 +266,32 @@ inherited GdbWidget: TGdbWidget
item item
AutoSize = True AutoSize = True
Caption = 'id' Caption = 'id'
Width = 22 Width = 31
end end
item item
AutoSize = True AutoSize = True
Caption = 'state' Caption = 'state'
Width = 43 Width = 54
end end
item item
AutoSize = True AutoSize = True
Caption = 'core' Caption = 'core'
Width = 38 Width = 49
end end
item item
AutoSize = True AutoSize = True
Caption = 'function' Caption = 'function'
Width = 63 Width = 80
end end
item item
AutoSize = True AutoSize = True
Caption = 'address' Caption = 'address'
Width = 61 Width = 77
end end
item item
AutoSize = True AutoSize = True
Caption = 'filename' Caption = 'filename'
Width = 67 Width = 82
end end
item item
Caption = 'line' Caption = 'line'
@ -307,7 +308,7 @@ inherited GdbWidget: TGdbWidget
object TabSheet5: TTabSheet object TabSheet5: TTabSheet
Caption = 'Debugee options' Caption = 'Debugee options'
ClientHeight = 169 ClientHeight = 169
ClientWidth = 513 ClientWidth = 662
object dbgeeOptsEd: TTIPropertyGrid object dbgeeOptsEd: TTIPropertyGrid
Left = 2 Left = 2
Height = 161 Height = 161
@ -329,7 +330,7 @@ inherited GdbWidget: TGdbWidget
end end
end end
inherited toolbar: TDexedToolBar inherited toolbar: TDexedToolBar
Width = 509 Width = 664
object btnStack: TDexedToolButton[0] object btnStack: TDexedToolButton[0]
Left = 238 Left = 238
Hint = 'view call stack' Hint = 'view call stack'
@ -466,7 +467,7 @@ inherited GdbWidget: TGdbWidget
Left = 0 Left = 0
Height = 6 Height = 6
Top = 0 Top = 0
Width = 517 Width = 672
Align = alTop Align = alTop
ResizeAnchor = akTop ResizeAnchor = akTop
end end