mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-05 10:55:56 +02:00
Debugger: fix tab-order in Evaluate/Modify window
git-svn-id: trunk@38602 -
This commit is contained in:
parent
a3e6740bff
commit
f59a711290
@ -154,7 +154,7 @@ inherited EvaluateDlg: TEvaluateDlg
|
|||||||
BorderSpacing.Right = 6
|
BorderSpacing.Right = 6
|
||||||
BorderSpacing.Bottom = 6
|
BorderSpacing.Bottom = 6
|
||||||
ScrollBars = ssAutoVertical
|
ScrollBars = ssAutoVertical
|
||||||
TabOrder = 1
|
TabOrder = 3
|
||||||
end
|
end
|
||||||
object cmbNewValue: TComboBox[6]
|
object cmbNewValue: TComboBox[6]
|
||||||
AnchorSideLeft.Control = Owner
|
AnchorSideLeft.Control = Owner
|
||||||
@ -172,7 +172,7 @@ inherited EvaluateDlg: TEvaluateDlg
|
|||||||
BorderSpacing.Bottom = 6
|
BorderSpacing.Bottom = 6
|
||||||
ItemHeight = 13
|
ItemHeight = 13
|
||||||
OnKeyDown = cmbNewValueKeyDown
|
OnKeyDown = cmbNewValueKeyDown
|
||||||
TabOrder = 3
|
TabOrder = 4
|
||||||
end
|
end
|
||||||
object chkTypeCast: TCheckBox[7]
|
object chkTypeCast: TCheckBox[7]
|
||||||
AnchorSideTop.Control = Label1
|
AnchorSideTop.Control = Label1
|
||||||
@ -188,7 +188,7 @@ inherited EvaluateDlg: TEvaluateDlg
|
|||||||
Caption = 'chkTypeCast'
|
Caption = 'chkTypeCast'
|
||||||
Checked = True
|
Checked = True
|
||||||
State = cbChecked
|
State = cbChecked
|
||||||
TabOrder = 4
|
TabOrder = 1
|
||||||
end
|
end
|
||||||
object mnuHistory: TPopupMenu[8]
|
object mnuHistory: TPopupMenu[8]
|
||||||
left = 72
|
left = 72
|
||||||
|
Loading…
Reference in New Issue
Block a user