paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-31 04:42:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

DBG, Asm-Dlg: Fix Scrollbars

Browse Source 
git-svn-id: trunk@38545 -
This commit is contained in:
martin 2012-09-06 17:30:25 +00:00
parent 696d0835c2
commit 1c453ed8bf
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
debugger/assemblerdlg.lfm
View File

@ -39,6 +39,7 @@ inherited AssemblerDlg: TAssemblerDlg
Top = 217 Top = 217
Width = 674 Width = 674
Anchors = [akLeft, akRight, akBottom] Anchors = [akLeft, akRight, akBottom]
Max = 1000
PageSize = 200 PageSize = 200
TabOrder = 0 TabOrder = 0
OnChange = sbHorizontalChange OnChange = sbHorizontalChange
@ -56,7 +57,9 @@ inherited AssemblerDlg: TAssemblerDlg
Anchors = [akTop, akRight, akBottom] Anchors = [akTop, akRight, akBottom]
Kind = sbVertical Kind = sbVertical
LargeChange = 10 LargeChange = 10
PageSize = 200 Max = 1000
PageSize = 50
Position = 475
TabOrder = 1 TabOrder = 1
OnChange = sbVerticalChange OnChange = sbVerticalChange
OnScroll = sbVerticalScroll OnScroll = sbVerticalScroll
@ -110,7 +113,7 @@ inherited AssemblerDlg: TAssemblerDlg
end end
object pnlToolAddr: TPanel object pnlToolAddr: TPanel
Left = 113 Left = 113
Height = 22 Height = 23
Top = 2 Top = 2
Width = 80 Width = 80
AutoSize = True AutoSize = True
@ -120,12 +123,12 @@ inherited AssemblerDlg: TAssemblerDlg
ChildSizing.ShrinkHorizontal = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsHomogenousChildResize
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1 ChildSizing.ControlsPerLine = 1
ClientHeight = 22 ClientHeight = 23
ClientWidth = 80 ClientWidth = 80
TabOrder = 0 TabOrder = 0
object EditGotoAddr: TEdit object EditGotoAddr: TEdit
Left = 0 Left = 0
Height = 22 Height = 23
Top = 0 Top = 0
Width = 80 Width = 80
OnChange = EditGotoAddrChange OnChange = EditGotoAddrChange