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

View File

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