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

IDE: Tweak the restriction browser layout. Patch from AlexeyT.

Browse Source 
git-svn-id: trunk@59326 -
This commit is contained in:
juha 2018-10-19 16:13:04 +00:00
parent c8beaba5c1
commit 3ddb07d107
1 changed files with 23 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
ide/restrictionbrowser.lfm
View File

@ -7,25 +7,29 @@ object RestrictionBrowserView: TRestrictionBrowserView
ClientHeight = 405 ClientHeight = 405
ClientWidth = 674 ClientWidth = 674
OnCreate = FormCreate OnCreate = FormCreate
LCLVersion = '1.5' LCLVersion = '2.1.0.0'
object IssueMemo: TMemo object IssueMemo: TMemo
Left = 311 Left = 323
Height = 405 Height = 393
Top = 0 Top = 6
Width = 363 Width = 345
Align = alClient Align = alClient
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
ReadOnly = True ReadOnly = True
ScrollBars = ssAutoVertical ScrollBars = ssAutoVertical
TabOrder = 2 TabOrder = 2
end end
object Panel1: TPanel object Panel1: TPanel
Left = 0 Left = 6
Height = 405 Height = 393
Top = 0 Top = 6
Width = 306 Width = 306
Align = alLeft Align = alLeft
BorderSpacing.Around = 6
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 405 ClientHeight = 393
ClientWidth = 306 ClientWidth = 306
TabOrder = 0 TabOrder = 0
object IssueFilterGroupBox: TGroupBox object IssueFilterGroupBox: TGroupBox
@ -34,29 +38,29 @@ object RestrictionBrowserView: TRestrictionBrowserView
Top = 0 Top = 0
Width = 306 Width = 306
Align = alTop Align = alTop
BorderSpacing.Bottom = 6
Caption = 'IssueFilterGroupBox' Caption = 'IssueFilterGroupBox'
ClientHeight = 76 ClientHeight = 77
ClientWidth = 302 ClientWidth = 302
TabOrder = 0 TabOrder = 0
object NameLabel: TLabel object NameLabel: TLabel
Left = 10 Left = 10
Height = 15 Height = 17
Top = 44 Top = 44
Width = 60 Width = 77
Caption = 'NameLabel' Caption = 'NameLabel'
ParentColor = False ParentColor = False
end end
object FilterEdit: TTreeFilterEdit object FilterEdit: TTreeFilterEdit
AnchorSideLeft.Control = NameLabel AnchorSideLeft.Control = NameLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
Left = 76 Left = 93
Height = 23 Height = 27
Top = 41 Top = 41
Width = 156 Width = 156
UseFormActivate = True
ButtonWidth = 23 ButtonWidth = 23
NumGlyphs = 1
BorderSpacing.Left = 6 BorderSpacing.Left = 6
NumGlyphs = 1
MaxLength = 0 MaxLength = 0
TabOrder = 0 TabOrder = 0
FilteredTreeview = IssueTreeView FilteredTreeview = IssueTreeView
@ -64,12 +68,11 @@ object RestrictionBrowserView: TRestrictionBrowserView
end end
object IssueTreeView: TTreeView object IssueTreeView: TTreeView
Left = 0 Left = 0
Height = 309 Height = 291
Top = 96 Top = 102
Width = 306 Width = 306
Align = alClient Align = alClient
Anchors = [akTop, akLeft, akBottom] Anchors = [akTop, akLeft, akBottom]
DefaultItemHeight = 18
HideSelection = False HideSelection = False
Indent = 2 Indent = 2
ReadOnly = True ReadOnly = True
@ -84,7 +87,7 @@ object RestrictionBrowserView: TRestrictionBrowserView
end end
end end
object Splitter1: TSplitter object Splitter1: TSplitter
Left = 306 Left = 318
Height = 405 Height = 405
Top = 0 Top = 0
Width = 5 Width = 5