ide: fix anchors

git-svn-id: trunk@41018 -
This commit is contained in:
paul 2013-05-04 08:10:07 +00:00
parent cd5ff26df0
commit e9c15a640d
2 changed files with 99 additions and 63 deletions

View File

@ -7,16 +7,18 @@ object CodetoolsIndentifierCompletionOptionsFrame: TCodetoolsIndentifierCompleti
ClientWidth = 400 ClientWidth = 400
TabOrder = 0 TabOrder = 0
Visible = False Visible = False
DesignLeft = 651 DesignLeft = 514
DesignTop = 262 DesignTop = 178
object ICAddSemicolonCheckBox: TCheckBox object ICAddSemicolonCheckBox: TCheckBox
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner AnchorSideTop.Control = Owner
Left = 6 AnchorSideRight.Control = Owner
Height = 22 AnchorSideRight.Side = asrBottom
Top = 6 Left = 0
Width = 168 Height = 19
BorderSpacing.Around = 6 Top = 0
Width = 400
Anchors = [akTop, akLeft, akRight]
Caption = 'ICAddSemicolonCheckBox' Caption = 'ICAddSemicolonCheckBox'
TabOrder = 0 TabOrder = 0
end end
@ -24,11 +26,14 @@ object CodetoolsIndentifierCompletionOptionsFrame: TCodetoolsIndentifierCompleti
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ICAddSemicolonCheckBox AnchorSideTop.Control = ICAddSemicolonCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 AnchorSideRight.Control = Owner
Height = 22 AnchorSideRight.Side = asrBottom
Top = 34 Left = 0
Width = 195 Height = 19
BorderSpacing.Around = 6 Top = 25
Width = 400
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'ICAddAssignOperatorCheckBox' Caption = 'ICAddAssignOperatorCheckBox'
TabOrder = 1 TabOrder = 1
end end
@ -36,11 +41,14 @@ object CodetoolsIndentifierCompletionOptionsFrame: TCodetoolsIndentifierCompleti
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ICAddDoCheckBox AnchorSideTop.Control = ICAddDoCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 AnchorSideRight.Control = Owner
Height = 22 AnchorSideRight.Side = asrBottom
Top = 90 Left = 0
Width = 194 Height = 19
BorderSpacing.Around = 6 Top = 75
Width = 400
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'ICAutoStartAfterPointCheckBox' Caption = 'ICAutoStartAfterPointCheckBox'
TabOrder = 2 TabOrder = 2
end end
@ -48,51 +56,63 @@ object CodetoolsIndentifierCompletionOptionsFrame: TCodetoolsIndentifierCompleti
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ICAutoStartAfterPointCheckBox AnchorSideTop.Control = ICAutoStartAfterPointCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 AnchorSideRight.Control = Owner
Height = 22 AnchorSideRight.Side = asrBottom
Top = 118 Left = 0
Width = 240 Height = 19
BorderSpacing.Around = 6 Top = 100
Width = 400
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'ICAutoAddParameterBracketsCheckBox' Caption = 'ICAutoAddParameterBracketsCheckBox'
TabOrder = 3 TabOrder = 3
end end
object ICShowHelpCheckBox: TCheckBox object ICShowHelpCheckBox: TCheckBox
AnchorSideLeft.Control = ICAddSemicolonCheckBox AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ICReplaceCheckBox AnchorSideTop.Control = ICReplaceCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 AnchorSideRight.Control = Owner
Height = 22 AnchorSideRight.Side = asrBottom
Top = 194 Left = 0
Width = 144 Height = 19
BorderSpacing.Top = 20 Top = 150
Width = 400
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'ICShowHelpCheckBox' Caption = 'ICShowHelpCheckBox'
ParentShowHint = False ParentShowHint = False
ShowHint = True ShowHint = True
TabOrder = 4 TabOrder = 4
end end
object ICReplaceCheckBox: TCheckBox object ICReplaceCheckBox: TCheckBox
AnchorSideLeft.Control = ICAddSemicolonCheckBox AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ICAutoAddParameterBracketsCheckBox AnchorSideTop.Control = ICAutoAddParameterBracketsCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 AnchorSideRight.Control = Owner
Height = 22 AnchorSideRight.Side = asrBottom
Top = 152 Left = 0
Width = 134 Height = 19
BorderSpacing.Top = 12 Top = 125
BorderSpacing.Bottom = 6 Width = 400
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'ICReplaceCheckBox' Caption = 'ICReplaceCheckBox'
ParentShowHint = False ParentShowHint = False
ShowHint = True ShowHint = True
TabOrder = 5 TabOrder = 5
end end
object ICAddDoCheckBox: TCheckBox object ICAddDoCheckBox: TCheckBox
AnchorSideLeft.Control = ICAddSemicolonCheckBox AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ICAddAssignOperatorCheckBox AnchorSideTop.Control = ICAddAssignOperatorCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 AnchorSideRight.Control = Owner
Height = 22 AnchorSideRight.Side = asrBottom
Top = 62 Left = 0
Width = 125 Height = 19
Top = 50
Width = 400
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'ICAddDoCheckBox' Caption = 'ICAddDoCheckBox'
TabOrder = 6 TabOrder = 6
end end

View File

@ -1,5 +1,7 @@
inherited NamingOptionsFrame: TNamingOptionsFrame object NamingOptionsFrame: TNamingOptionsFrame
Left = 0
Height = 367 Height = 367
Top = 0
Width = 507 Width = 507
ClientHeight = 367 ClientHeight = 367
ClientWidth = 507 ClientWidth = 507
@ -7,15 +9,16 @@ inherited NamingOptionsFrame: TNamingOptionsFrame
Visible = False Visible = False
DesignLeft = 353 DesignLeft = 353
DesignTop = 291 DesignTop = 291
object PascalFileExtRadiogroup: TRadioGroup[0] object PascalFileExtRadiogroup: TRadioGroup
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 0 Left = 0
Height = 47 Height = 47
Top = 0 Top = 0
Width = 507 Width = 507
Align = alTop Anchors = [akTop, akLeft, akRight]
AutoFill = True AutoFill = True
AutoSize = True AutoSize = True
Caption = 'PascalFileExtRadiogroup' Caption = 'PascalFileExtRadiogroup'
@ -30,15 +33,17 @@ inherited NamingOptionsFrame: TNamingOptionsFrame
Columns = 2 Columns = 2
TabOrder = 0 TabOrder = 0
end end
object AmbiguousFileActionRadioGroup: TRadioGroup[1] object AmbiguousFileActionRadioGroup: TRadioGroup
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = CharcaseFileActionRadioGroup AnchorSideTop.Control = PascalFileExtRadiogroup
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 0 Left = 0
Height = 67 Height = 67
Top = 53 Top = 53
Width = 507 Width = 507
Align = alTop Anchors = [akTop, akLeft, akRight]
AutoFill = True AutoFill = True
AutoSize = True AutoSize = True
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -54,15 +59,17 @@ inherited NamingOptionsFrame: TNamingOptionsFrame
Columns = 2 Columns = 2
TabOrder = 1 TabOrder = 1
end end
object CharcaseFileActionRadioGroup: TRadioGroup[2] object CharcaseFileActionRadioGroup: TRadioGroup
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = AmbiguousFileActionRadioGroup AnchorSideTop.Control = AmbiguousFileActionRadioGroup
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 0 Left = 0
Height = 58 Height = 58
Top = 126 Top = 126
Width = 507 Width = 507
Align = alTop Anchors = [akTop, akLeft, akRight]
AutoFill = True AutoFill = True
AutoSize = True AutoSize = True
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -78,12 +85,17 @@ inherited NamingOptionsFrame: TNamingOptionsFrame
Columns = 2 Columns = 2
TabOrder = 2 TabOrder = 2
end end
object UnitReferencesRadioGroup: TRadioGroup[3] object UnitReferencesRadioGroup: TRadioGroup
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = CharcaseFileActionRadioGroup
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 0 Left = 0
Height = 50 Height = 50
Top = 190 Top = 190
Width = 507 Width = 507
Align = alTop Anchors = [akTop, akLeft, akRight]
AutoFill = True AutoFill = True
AutoSize = True AutoSize = True
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -100,29 +112,33 @@ inherited NamingOptionsFrame: TNamingOptionsFrame
Constraints.MinHeight = 50 Constraints.MinHeight = 50
TabOrder = 3 TabOrder = 3
end end
object AskForFilenameOnNewCheckBox: TCheckBox[4] object AskForFilenameOnNewCheckBox: TCheckBox
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = UnitReferencesRadioGroup AnchorSideTop.Control = UnitReferencesRadioGroup
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 AnchorSideRight.Control = Owner
Height = 17 AnchorSideRight.Side = asrBottom
Left = 0
Height = 19
Top = 246 Top = 246
Width = 175 Width = 507
BorderSpacing.Around = 6 Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'AskForFilenameOnNewCheckBox' Caption = 'AskForFilenameOnNewCheckBox'
TabOrder = 4 TabOrder = 4
end end
object LowercaseDefaultFilenameCheckBox: TCheckBox[5] object LowercaseDefaultFilenameCheckBox: TCheckBox
AnchorSideLeft.Control = AskForFilenameOnNewCheckBox AnchorSideLeft.Control = Owner
AnchorSideTop.Control = AskForFilenameOnNewCheckBox AnchorSideTop.Control = AskForFilenameOnNewCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 AnchorSideRight.Control = Owner
Height = 17 AnchorSideRight.Side = asrBottom
Top = 269 Left = 0
Width = 193 Height = 19
Top = 271
Width = 507
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Caption = 'LowercaseDefaultFilenameCheckBox' Caption = 'LowercaseDefaultFilenameCheckBox'
Checked = True Checked = True
ParentShowHint = False ParentShowHint = False