IDEIntf: TSessionPropertiesPropertyEditor: fixed anchor, issue #22838

git-svn-id: trunk@38594 -
This commit is contained in:
mattias 2012-09-09 09:55:28 +00:00
parent a1d618dfe6
commit 61d8d8fda7

View File

@ -55,8 +55,10 @@ object SelectPropertiesForm: TSelectPropertiesForm
MultiSelect = True MultiSelect = True
OnClick = LBPropertiesClick OnClick = LBPropertiesClick
OnDblClick = LBPropertiesDblClick OnDblClick = LBPropertiesDblClick
ScrollWidth = 238
Sorted = True Sorted = True
TabOrder = 0 TabOrder = 0
TopIndex = -1
end end
end end
object PComponents: TPanel object PComponents: TPanel
@ -91,8 +93,10 @@ object SelectPropertiesForm: TSelectPropertiesForm
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ItemHeight = 0 ItemHeight = 0
OnSelectionChange = LBComponentsSelectionChange OnSelectionChange = LBComponentsSelectionChange
ScrollWidth = 215
Sorted = True Sorted = True
TabOrder = 0 TabOrder = 0
TopIndex = -1
end end
end end
object VSplitter: TSplitter object VSplitter: TSplitter
@ -128,25 +132,29 @@ object SelectPropertiesForm: TSelectPropertiesForm
Left = 10 Left = 10
Height = 15 Height = 15
Top = 3 Top = 3
Width = 99 Width = 109
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = '&Selected Properties' Caption = '&Selected Properties'
ParentColor = False ParentColor = False
end end
object LBSelected: TListBox object LBSelected: TListBox
AnchorSideLeft.Control = PBottom AnchorSideLeft.Control = PBottom
AnchorSideTop.Control = LLBSelected
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = BAdd AnchorSideRight.Control = BAdd
AnchorSideBottom.Control = PBottom AnchorSideBottom.Control = PBottom
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 112 Height = 180
Top = 92 Top = 24
Width = 392 Width = 392
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ItemHeight = 0 ItemHeight = 0
MultiSelect = True MultiSelect = True
ScrollWidth = 390
TabOrder = 0 TabOrder = 0
TopIndex = -1
end end
object BAdd: TButton object BAdd: TButton
AnchorSideTop.Control = LBSelected AnchorSideTop.Control = LBSelected
@ -154,7 +162,7 @@ object SelectPropertiesForm: TSelectPropertiesForm
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 404 Left = 404
Height = 25 Height = 25
Top = 92 Top = 24
Width = 75 Width = 75
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
BorderSpacing.Right = 6 BorderSpacing.Right = 6
@ -170,7 +178,7 @@ object SelectPropertiesForm: TSelectPropertiesForm
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 404 Left = 404
Height = 25 Height = 25
Top = 123 Top = 55
Width = 75 Width = 75
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -186,7 +194,7 @@ object SelectPropertiesForm: TSelectPropertiesForm
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 404 Left = 404
Height = 25 Height = 25
Top = 154 Top = 86
Width = 75 Width = 75
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6