mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-17 17:10:15 +02:00
IDE: Improve GenericCheckListForm layout. Issue #28945, patch from Alexey Torgashin.
git-svn-id: trunk@50212 -
This commit is contained in:
parent
41db65be18
commit
0d90822293
@ -1,7 +1,7 @@
|
||||
object GenericCheckListForm: TGenericCheckListForm
|
||||
Left = 389
|
||||
Height = 277
|
||||
Top = 544
|
||||
Top = 463
|
||||
Width = 343
|
||||
ActiveControl = CheckListBox1
|
||||
Caption = 'GenericCheckListForm'
|
||||
@ -9,11 +9,11 @@ object GenericCheckListForm: TGenericCheckListForm
|
||||
ClientWidth = 343
|
||||
OnShow = FormShow
|
||||
Position = poScreenCenter
|
||||
LCLVersion = '1.3'
|
||||
LCLVersion = '1.5'
|
||||
object ButtonPanel1: TButtonPanel
|
||||
Left = 6
|
||||
Height = 33
|
||||
Top = 238
|
||||
Height = 29
|
||||
Top = 242
|
||||
Width = 331
|
||||
OKButton.Name = 'OKButton'
|
||||
OKButton.DefaultCaption = True
|
||||
@ -30,23 +30,29 @@ object GenericCheckListForm: TGenericCheckListForm
|
||||
ShowBevel = False
|
||||
end
|
||||
object CheckListBox1: TCheckListBox
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = InfoLabel
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 216
|
||||
Top = 15
|
||||
Width = 343
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 202
|
||||
Top = 29
|
||||
Width = 331
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
BorderSpacing.Around = 6
|
||||
ItemHeight = 0
|
||||
OnItemClick = CheckListBox1ItemClick
|
||||
TabOrder = 1
|
||||
TopIndex = -1
|
||||
end
|
||||
object InfoLabel: TLabel
|
||||
Left = 0
|
||||
Height = 15
|
||||
Top = 0
|
||||
Width = 343
|
||||
Left = 6
|
||||
Height = 17
|
||||
Top = 6
|
||||
Width = 331
|
||||
Align = alTop
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'InfoLabel'
|
||||
ParentColor = False
|
||||
WordWrap = True
|
||||
|
Loading…
Reference in New Issue
Block a user