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

IDE: Improve GenericCheckListForm layout. Issue #28945, patch from Alexey Torgashin.

Browse Source 
git-svn-id: trunk@50212 -
This commit is contained in:
juha 2015-11-03 12:50:08 +00:00
parent 41db65be18
commit 0d90822293
1 changed files with 18 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
ide/genericchecklist.lfm
View File

@ -1,7 +1,7 @@
object GenericCheckListForm: TGenericCheckListForm object GenericCheckListForm: TGenericCheckListForm
Left = 389 Left = 389
Height = 277 Height = 277
Top = 544 Top = 463
Width = 343 Width = 343
ActiveControl = CheckListBox1 ActiveControl = CheckListBox1
Caption = 'GenericCheckListForm' Caption = 'GenericCheckListForm'
@ -9,11 +9,11 @@ object GenericCheckListForm: TGenericCheckListForm
ClientWidth = 343 ClientWidth = 343
OnShow = FormShow OnShow = FormShow
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '1.3' LCLVersion = '1.5'
object ButtonPanel1: TButtonPanel object ButtonPanel1: TButtonPanel
Left = 6 Left = 6
Height = 33 Height = 29
Top = 238 Top = 242
Width = 331 Width = 331
OKButton.Name = 'OKButton' OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True OKButton.DefaultCaption = True
@ -30,23 +30,29 @@ object GenericCheckListForm: TGenericCheckListForm
ShowBevel = False ShowBevel = False
end end
object CheckListBox1: TCheckListBox object CheckListBox1: TCheckListBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = InfoLabel AnchorSideTop.Control = InfoLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 0 AnchorSideRight.Control = Owner
Height = 216 AnchorSideRight.Side = asrBottom
Top = 15 Left = 6
Width = 343 Height = 202
Top = 29
Width = 331
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
ItemHeight = 0 ItemHeight = 0
OnItemClick = CheckListBox1ItemClick OnItemClick = CheckListBox1ItemClick
TabOrder = 1 TabOrder = 1
TopIndex = -1
end end
object InfoLabel: TLabel object InfoLabel: TLabel
Left = 0 Left = 6
Height = 15 Height = 17
Top = 0 Top = 6
Width = 343 Width = 331
Align = alTop Align = alTop
BorderSpacing.Around = 6
Caption = 'InfoLabel' Caption = 'InfoLabel'
ParentColor = False ParentColor = False
WordWrap = True WordWrap = True