Fix tab order of controls on CREATE TABLE dialog

This commit is contained in:
Ansgar Becker
2009-03-03 20:34:11 +00:00
parent 593adf939c
commit f7b0cfc92c

View File

@ -106,7 +106,7 @@ object CreateTableForm: TCreateTableForm
Height = 187 Height = 187
Anchors = [akTop, akRight, akBottom] Anchors = [akTop, akRight, akBottom]
Caption = 'Column properties:' Caption = 'Column properties:'
TabOrder = 9 TabOrder = 11
object lblFieldType: TLabel object lblFieldType: TLabel
Left = 16 Left = 16
Top = 24 Top = 24
@ -297,7 +297,7 @@ object CreateTableForm: TCreateTableForm
Anchors = [akLeft, akTop, akRight, akBottom] Anchors = [akLeft, akTop, akRight, akBottom]
ExtendedSelect = False ExtendedSelect = False
ItemHeight = 13 ItemHeight = 13
TabOrder = 5 TabOrder = 7
OnClick = ListboxColumnsClick OnClick = ListboxColumnsClick
end end
object ButtonAdd: TButton object ButtonAdd: TButton
@ -307,7 +307,7 @@ object CreateTableForm: TCreateTableForm
Height = 25 Height = 25
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
Caption = 'Add' Caption = 'Add'
TabOrder = 6 TabOrder = 8
OnClick = Button1Click OnClick = Button1Click
end end
object ButtonDelete: TButton object ButtonDelete: TButton
@ -318,7 +318,7 @@ object CreateTableForm: TCreateTableForm
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
Caption = 'Remove' Caption = 'Remove'
Enabled = False Enabled = False
TabOrder = 8 TabOrder = 10
OnClick = ButtonDeleteClick OnClick = ButtonDeleteClick
end end
object ButtonChange: TButton object ButtonChange: TButton
@ -329,7 +329,7 @@ object CreateTableForm: TCreateTableForm
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
Caption = 'Change' Caption = 'Change'
Enabled = False Enabled = False
TabOrder = 7 TabOrder = 9
OnClick = ButtonChangeClick OnClick = ButtonChangeClick
end end
object EditFieldname: TEdit object EditFieldname: TEdit
@ -339,7 +339,7 @@ object CreateTableForm: TCreateTableForm
Height = 21 Height = 21
Anchors = [akLeft, akTop, akRight] Anchors = [akLeft, akTop, akRight]
MaxLength = 64 MaxLength = 64
TabOrder = 4 TabOrder = 6
Text = 'FieldName' Text = 'FieldName'
OnChange = EditFieldnameChange OnChange = EditFieldnameChange
OnEnter = EditFieldnameEnter OnEnter = EditFieldnameEnter
@ -374,7 +374,7 @@ object CreateTableForm: TCreateTableForm
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
ItemHeight = 13 ItemHeight = 13
Sorted = True Sorted = True
TabOrder = 10 TabOrder = 4
OnChange = comboCharsetChange OnChange = comboCharsetChange
end end
object comboCollation: TComboBox object comboCollation: TComboBox
@ -386,7 +386,7 @@ object CreateTableForm: TCreateTableForm
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
ItemHeight = 13 ItemHeight = 13
Sorted = True Sorted = True
TabOrder = 11 TabOrder = 5
end end
object ButtonCreate: TButton object ButtonCreate: TButton
Left = 314 Left = 314