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

IDE: Remove some border space from ComponentList Window. Issue #22279, patch from William de Oliveira Ferreira

Browse Source 
git-svn-id: trunk@37668 -
This commit is contained in:
juha 2012-06-16 18:35:42 +00:00
parent 2028f4a305
commit 2bd0f8edfe
1 changed files with 41 additions and 41 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

82
ide/componentlist.lfm
View File

@ -1,7 +1,7 @@
object ComponentListForm: TComponentListForm
Left = 320
Height = 556
Top = 307
Top = 159
Width = 338
ActiveControl = ListFilterEd
Caption = 'Components'
@ -19,42 +19,42 @@ object ComponentListForm: TComponentListForm
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ButtonPanel
Left = 6
Height = 452
Top = 52
Width = 326
Left = 1
Height = 481
Top = 27
Width = 336
ActivePage = TabSheetListBox
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
BorderSpacing.Around = 1
TabIndex = 0
TabOrder = 1
OnChange = PageControlChange
object TabSheetListBox: TTabSheet
Caption = 'List'
ClientHeight = 425
ClientWidth = 324
ClientHeight = 454
ClientWidth = 332
object Panel7: TPanel
Left = 0
Height = 425
Height = 454
Top = 0
Width = 324
Width = 332
Align = alClient
BevelOuter = bvNone
BorderWidth = 5
ClientHeight = 425
ClientWidth = 324
BorderWidth = 2
ClientHeight = 454
ClientWidth = 332
TabOrder = 0
object ComponentsListbox: TListBox
Left = 5
Height = 415
Top = 5
Width = 314
Left = 2
Height = 450
Top = 2
Width = 328
Align = alClient
ItemHeight = 0
OnDblClick = ComponentsListboxDblClick
OnDrawItem = ComponentsListboxDrawItem
OnKeyDown = ComponentsListboxKeyDown
ScrollWidth = 312
ScrollWidth = 326
Sorted = True
Style = lbOwnerDrawFixed
TabOrder = 0
@ -64,8 +64,8 @@ object ComponentListForm: TComponentListForm
end
object TabSheetPaletteTree: TTabSheet
Caption = 'Palette'
ClientHeight = 425
ClientWidth = 324
ClientHeight = 454
ClientWidth = 332
object Panel5: TPanel
Left = 0
Height = 419
@ -95,8 +95,8 @@ object ComponentListForm: TComponentListForm
end
object TabSheetInheritance: TTabSheet
Caption = 'Inheritance'
ClientHeight = 425
ClientWidth = 324
ClientHeight = 454
ClientWidth = 332
object Panel6: TPanel
Left = 0
Height = 410
@ -126,24 +126,23 @@ object ComponentListForm: TComponentListForm
end
object Panel3: TPanel
AnchorSideRight.Side = asrBottom
Left = 0
Height = 46
Left = 1
Height = 26
Top = 0
Width = 338
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BevelOuter = bvNone
BorderWidth = 8
ClientHeight = 46
ClientHeight = 26
ClientWidth = 338
TabOrder = 0
object LabelSearch: TLabel
AnchorSideLeft.Control = Panel3
AnchorSideTop.Control = Panel3
Left = 14
Height = 18
Top = 14
Width = 80
Left = 6
Height = 14
Top = 6
Width = 71
BorderSpacing.Around = 6
Caption = 'LabelSearch'
ParentColor = False
@ -153,13 +152,13 @@ object ComponentListForm: TComponentListForm
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = LabelSearch
AnchorSideTop.Side = asrCenter
Left = 100
Height = 27
Top = 10
Left = 83
Height = 23
Top = 2
Width = 169
UseFormActivate = True
ButtonWidth = 23
NumGlyphs = 0
NumGlyphs = 1
BorderSpacing.Left = 5
Font.Color = clBtnShadow
MaxLength = 0
@ -172,12 +171,13 @@ object ComponentListForm: TComponentListForm
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = LabelSearch
AnchorSideTop.Side = asrCenter
Left = 100
Height = 27
Top = 10
Width = 169
Left = 83
Height = 23
Top = 2
Width = 228
ButtonWidth = 23
NumGlyphs = 0
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 5
MaxLength = 0
TabOrder = 1
@ -185,8 +185,8 @@ object ComponentListForm: TComponentListForm
end
object ButtonPanel: TButtonPanel
Left = 6
Height = 40
Top = 510
Height = 36
Top = 514
Width = 326
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True