paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-28 23:24:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

Debugger: commit automatic changes for CallStackDlg.

Browse Source 
git-svn-id: trunk@55306 -
This commit is contained in:
juha 2017-06-10 16:30:04 +00:00
parent ecbfde6a60
commit 2387cb7f16
1 changed files with 33 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

65
debugger/callstackdlg.lfm
View File

@ -1,4 +1,4 @@
inherited CallStackDlg: TCallStackDlg object CallStackDlg: TCallStackDlg
Left = 306 Left = 306
Height = 246 Height = 246
Top = 130 Top = 130
@ -8,8 +8,9 @@ inherited CallStackDlg: TCallStackDlg
ClientHeight = 246 ClientHeight = 246
ClientWidth = 562 ClientWidth = 562
OnCreate = FormCreate OnCreate = FormCreate
LCLVersion = '1.9.0.0'
Visible = True Visible = True
object lvCallStack: TListView[0] object lvCallStack: TListView
Left = 0 Left = 0
Height = 166 Height = 166
Top = 80 Top = 80
@ -22,7 +23,7 @@ inherited CallStackDlg: TCallStackDlg
item item
AutoSize = True AutoSize = True
Caption = 'Index' Caption = 'Index'
Width = 538 Width = 100
end end
item item
Caption = 'Source' Caption = 'Source'
@ -44,7 +45,7 @@ inherited CallStackDlg: TCallStackDlg
OnClick = lvCallStackClick OnClick = lvCallStackClick
OnDblClick = lvCallStackDBLCLICK OnDblClick = lvCallStackDBLCLICK
end end
object ToolBar1: TToolBar[1] object ToolBar1: TToolBar
Left = 0 Left = 0
Height = 80 Height = 80
Top = 0 Top = 0
@ -59,31 +60,31 @@ inherited CallStackDlg: TCallStackDlg
ShowHint = True ShowHint = True
TabOrder = 1 TabOrder = 1
object ToolButtonShow: TToolButton object ToolButtonShow: TToolButton
Left = 112 Left = 117
Top = 0 Top = 0
Action = actShow Action = actShow
ImageIndex = 0 ImageIndex = 0
end end
object ToolButtonCurrent: TToolButton object ToolButtonCurrent: TToolButton
Left = 162 Left = 167
Top = 0 Top = 0
Action = actSetCurrent Action = actSetCurrent
end end
object ToolButton4: TToolButton object ToolButton4: TToolButton
Left = 212 Left = 220
Height = 40
Top = 0 Top = 0
Width = 10
Caption = 'ToolButton4' Caption = 'ToolButton4'
Style = tbsSeparator Style = tbsSeparator
end end
object ToolButtonMore: TToolButton object ToolButtonMore: TToolButton
Left = 284 Left = 300
Top = 0 Top = 0
Action = actViewMore Action = actViewMore
ImageIndex = 1 ImageIndex = 1
end end
object ToolButtonMax: TToolButton object ToolButtonMax: TToolButton
Left = 222 Left = 228
Top = 0 Top = 0
Action = actViewLimit Action = actViewLimit
Caption = 'Max 10' Caption = 'Max 10'
@ -91,45 +92,45 @@ inherited CallStackDlg: TCallStackDlg
Style = tbsDropDown Style = tbsDropDown
end end
object ToolButtonGoto: TToolButton object ToolButtonGoto: TToolButton
Left = 494 Left = 510
Top = 0 Top = 0
Action = actViewGoto Action = actViewGoto
ImageIndex = 4 ImageIndex = 4
end end
object ToolButtonCopyAll: TToolButton object ToolButtonCopyAll: TToolButton
Left = 1 Left = 9
Top = 40 Top = 40
Action = actCopyAll Action = actCopyAll
ImageIndex = 5 ImageIndex = 5
end end
object ToolButton8: TToolButton object ToolButton8: TToolButton
Left = 102 Left = 109
Height = 40
Top = 0 Top = 0
Width = 10
Caption = 'ToolButton8' Caption = 'ToolButton8'
Style = tbsSeparator Style = tbsSeparator
end end
object ToolButton9: TToolButton object ToolButton9: TToolButton
Left = 334 Left = 350
Height = 40
Top = 0 Top = 0
Width = 10
Caption = 'ToolButton9' Caption = 'ToolButton9'
Style = tbsSeparator Style = tbsSeparator
end end
object ToolButtonTop: TToolButton object ToolButtonTop: TToolButton
Left = 344 Left = 358
Top = 0 Top = 0
Action = actViewTop Action = actViewTop
ImageIndex = 2 ImageIndex = 2
end end
object ToolButtonBottom: TToolButton object ToolButtonBottom: TToolButton
Left = 394 Left = 408
Top = 0 Top = 0
Action = actViewBottom Action = actViewBottom
ImageIndex = 3 ImageIndex = 3
end end
object Panel1: TPanel object Panel1: TPanel
Left = 444 Left = 460
Height = 40 Height = 40
Top = 0 Top = 0
Width = 50 Width = 50
@ -139,7 +140,7 @@ inherited CallStackDlg: TCallStackDlg
TabOrder = 0 TabOrder = 0
object txtGoto: TEdit object txtGoto: TEdit
Left = 2 Left = 2
Height = 23 Height = 29
Top = 8 Top = 8
Width = 46 Width = 46
OnKeyPress = txtGotoKeyPress OnKeyPress = txtGotoKeyPress
@ -158,16 +159,16 @@ inherited CallStackDlg: TCallStackDlg
Style = tbsCheck Style = tbsCheck
end end
object ToolButton2: TToolButton object ToolButton2: TToolButton
Left = 544 Left = 1
Top = 0 Height = 40
Width = 10 Top = 40
Caption = 'ToolButton2' Caption = 'ToolButton2'
Style = tbsSeparator Style = tbsSeparator
end end
end end
object mnuPopup: TPopupMenu[2] object mnuPopup: TPopupMenu
left = 224 Left = 224
top = 80 Top = 80
object popShow: TMenuItem object popShow: TMenuItem
Action = actShow Action = actShow
Default = True Default = True
@ -192,9 +193,9 @@ inherited CallStackDlg: TCallStackDlg
OnClick = actCopyAllClick OnClick = actCopyAllClick
end end
end end
object aclActions: TActionList[3] object aclActions: TActionList
left = 48 Left = 48
top = 80 Top = 80
object actShow: TAction object actShow: TAction
Caption = 'Show' Caption = 'Show'
OnExecute = actShowClick OnExecute = actShowClick
@ -246,9 +247,9 @@ inherited CallStackDlg: TCallStackDlg
OnExecute = actShowDisassExecute OnExecute = actShowDisassExecute
end end
end end
object mnuLimit: TPopupMenu[4] object mnuLimit: TPopupMenu
left = 136 Left = 136
top = 80 Top = 80
object popLimit10: TMenuItem object popLimit10: TMenuItem
Tag = 10 Tag = 10
Caption = 'Max 10' Caption = 'Max 10'