Automatic dfm changes by IDE: Removed ComboBox.ItemHeight property and auto-adjusted dimensions of various buttons and other controls.

This commit is contained in:
Ansgar Becker
2010-01-30 08:15:31 +00:00
parent c5699171f9
commit 30e40ac897
9 changed files with 39 additions and 63 deletions

View File

@ -113,7 +113,6 @@ object CopyTableForm: TCopyTableForm
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 7
end
object ButtonOK: TButton

View File

@ -69,7 +69,6 @@ object CreateDatabaseForm: TCreateDatabaseForm
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
Sorted = True
TabOrder = 1
OnChange = comboCharsetChange
@ -103,7 +102,6 @@ object CreateDatabaseForm: TCreateDatabaseForm
Width = 221
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
OnChange = Modified
end

View File

@ -110,7 +110,6 @@ object frmInsertFiles: TfrmInsertFiles
Height = 21
Style = csDropDownList
Anchors = [akLeft, akRight, akBottom]
ItemHeight = 13
TabOrder = 4
OnChange = ComboBoxDBsChange
end
@ -121,7 +120,6 @@ object frmInsertFiles: TfrmInsertFiles
Height = 21
Style = csDropDownList
Anchors = [akLeft, akRight, akBottom]
ItemHeight = 13
TabOrder = 5
OnChange = ComboBoxTablesChange
end
@ -132,7 +130,6 @@ object frmInsertFiles: TfrmInsertFiles
Height = 21
Style = csDropDownList
Anchors = [akLeft, akRight, akBottom]
ItemHeight = 13
TabOrder = 6
OnChange = ComboBoxColumnsChange
end
@ -238,7 +235,6 @@ object frmInsertFiles: TfrmInsertFiles
Width = 316
Height = 21
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 1
Text = 'NULL'
OnChange = FieldChange

View File

@ -112,7 +112,6 @@ object loaddataform: Tloaddataform
Width = 252
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
end
end
@ -289,7 +288,6 @@ object loaddataform: Tloaddataform
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 0
OnChange = comboDatabaseChange
end
@ -300,7 +298,6 @@ object loaddataform: Tloaddataform
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 1
OnChange = comboTableChange
end

View File

@ -103,7 +103,7 @@ object MainForm: TMainForm
object ToolBarStandard: TToolBar
Left = 11
Top = 2
Width = 315
Width = 319
Height = 22
Align = alNone
AutoSize = True
@ -122,12 +122,12 @@ object MainForm: TMainForm
Style = tbsDropDown
end
object btnExit: TToolButton
Left = 42
Left = 44
Top = 0
Action = actExitApplication
end
object tlbSep1: TToolButton
Left = 65
Left = 67
Top = 0
Width = 8
Caption = 'tlbSep1'
@ -135,30 +135,30 @@ object MainForm: TMainForm
Style = tbsSeparator
end
object ToolButton5: TToolButton
Left = 73
Left = 75
Top = 0
Action = actCopy
AutoSize = True
end
object ToolButton6: TToolButton
Left = 96
Left = 98
Top = 0
Action = actPaste
AutoSize = True
end
object ToolButton14: TToolButton
Left = 119
Left = 121
Top = 0
Hint = 'Undo'
Action = actUndo
end
object ToolButton12: TToolButton
Left = 142
Left = 144
Top = 0
Action = actPrintList
end
object tlbSep2: TToolButton
Left = 165
Left = 167
Top = 0
Width = 8
Caption = 'tlbSep2'
@ -166,7 +166,7 @@ object MainForm: TMainForm
Style = tbsSeparator
end
object ButtonRefresh: TToolButton
Left = 173
Left = 175
Top = 0
Action = actRefresh
AutoSize = True
@ -174,25 +174,25 @@ object MainForm: TMainForm
Style = tbsDropDown
end
object ButtonUserManager: TToolButton
Left = 215
Left = 219
Top = 0
Action = actUserManager
AutoSize = True
end
object ButtonImportTextfile: TToolButton
Left = 238
Left = 242
Top = 0
Action = actImportCSV
AutoSize = True
end
object ButtonExport: TToolButton
Left = 261
Left = 265
Top = 0
Action = actExportTables
AutoSize = True
end
object tlbSep6: TToolButton
Left = 284
Left = 288
Top = 0
Width = 8
Caption = 'tlbSep6'
@ -200,7 +200,7 @@ object MainForm: TMainForm
Style = tbsSeparator
end
object btnSQLHelp: TToolButton
Left = 292
Left = 296
Top = 0
Action = actSQLhelp
end
@ -275,32 +275,32 @@ object MainForm: TMainForm
Style = tbsDropDown
end
object btnSaveSQL: TToolButton
Left = 59
Left = 61
Top = 0
Action = actSaveSQLAs
end
object btnSaveSQLSnippet: TToolButton
Left = 82
Left = 84
Top = 0
Action = actSaveSQLSnippet
end
object btnQueryFind: TToolButton
Left = 105
Left = 107
Top = 0
Action = actQueryFind
end
object btnQueryReplace: TToolButton
Left = 128
Left = 130
Top = 0
Action = actQueryReplace
end
object btnReformatSQL: TToolButton
Left = 151
Left = 153
Top = 0
Action = actReformatSQL
end
object btnStopOnErrors: TToolButton
Left = 174
Left = 176
Top = 0
Action = actQueryStopOnErrors
end
@ -343,7 +343,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 169
Height = 377
Height = 357
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
@ -351,7 +351,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 169
Height = 356
Height = 336
Align = alClient
Constraints.MinWidth = 40
DragMode = dmAutomatic
@ -405,7 +405,7 @@ object MainForm: TMainForm
object comboOnlyDBs: TComboBox
AlignWithMargins = True
Left = 0
Top = 356
Top = 336
Width = 169
Height = 21
Hint =
@ -430,13 +430,13 @@ object MainForm: TMainForm
Left = 173
Top = 0
Width = 583
Height = 377
Height = 357
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object pnlFilterVT: TPanel
Left = 0
Top = 351
Top = 331
Width = 583
Height = 26
Align = alBottom
@ -479,7 +479,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 583
Height = 351
Height = 331
ActivePage = tabHost
Align = alClient
HotTrack = True
@ -498,7 +498,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 575
Height = 319
Height = 299
ActivePage = tabVariables
Align = alClient
HotTrack = True
@ -510,7 +510,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 567
Height = 291
Height = 271
Align = alClient
DragOperations = []
Header.AutoSizeIndex = 1
@ -560,7 +560,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 567
Height = 291
Height = 271
Align = alClient
DragOperations = []
Header.AutoSizeIndex = 1
@ -621,7 +621,7 @@ object MainForm: TMainForm
ImageIndex = 1
object Splitter3: TSplitter
Left = 0
Top = 218
Top = 198
Width = 567
Height = 4
Cursor = crSizeNS
@ -632,7 +632,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 567
Height = 218
Height = 198
Align = alClient
Header.AutoSizeIndex = 7
Header.DefaultHeight = 17
@ -706,7 +706,7 @@ object MainForm: TMainForm
end
object pnlProcessViewBox: TPanel
Left = 0
Top = 222
Top = 202
Width = 567
Height = 69
Align = alBottom
@ -760,7 +760,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 567
Height = 291
Height = 271
Align = alClient
Header.AutoSizeIndex = 4
Header.DefaultHeight = 17
@ -831,7 +831,7 @@ object MainForm: TMainForm
Left = 0
Top = 0
Width = 575
Height = 319
Height = 299
Align = alClient
EditDelay = 500
Header.AutoSizeIndex = -1
@ -991,7 +991,7 @@ object MainForm: TMainForm
Left = 0
Top = 91
Width = 575
Height = 228
Height = 208
Align = alClient
Alignment = taCenter
Caption = 'Stored routines don'#39't provide any data you could edit here.'
@ -1175,7 +1175,7 @@ object MainForm: TMainForm
Left = 0
Top = 91
Width = 575
Height = 228
Height = 208
Align = alClient
AutoScrollDelay = 50
EditDelay = 0
@ -1383,7 +1383,7 @@ object MainForm: TMainForm
Left = 0
Top = 113
Width = 575
Height = 206
Height = 186
Align = alClient
AutoScrollDelay = 50
EditDelay = 0

View File

@ -31,7 +31,6 @@ object printlistForm: TprintlistForm
Width = 206
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = comboPrintersChange
end

View File

@ -184,7 +184,6 @@ object frmTableTools: TfrmTableTools
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 0
OnChange = ValidateControls
end
@ -291,7 +290,6 @@ object frmTableTools: TfrmTableTools
Height = 21
Style = csDropDownList
Anchors = [akLeft, akRight, akBottom]
ItemHeight = 13
TabOrder = 1
end
end
@ -389,7 +387,6 @@ object frmTableTools: TfrmTableTools
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 4
end
object comboExportOutputType: TComboBox
@ -399,7 +396,6 @@ object frmTableTools: TfrmTableTools
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 5
OnChange = comboExportOutputTypeChange
end
@ -409,7 +405,6 @@ object frmTableTools: TfrmTableTools
Width = 263
Height = 21
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 6
Text = 'comboExportOutputTarget'
OnExit = comboExportOutputTargetExit
@ -438,7 +433,6 @@ object frmTableTools: TfrmTableTools
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
Enabled = False
ItemHeight = 13
TabOrder = 1
end
object chkBulkTableEditResetAutoinc: TCheckBox
@ -466,7 +460,6 @@ object frmTableTools: TfrmTableTools
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
Enabled = False
ItemHeight = 13
TabOrder = 4
end
object chkBulkTableEditEngine: TCheckBox
@ -486,7 +479,6 @@ object frmTableTools: TfrmTableTools
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
Enabled = False
ItemHeight = 13
TabOrder = 6
end
object chkBulkTableEditCharset: TCheckBox
@ -506,7 +498,6 @@ object frmTableTools: TfrmTableTools
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
Enabled = False
ItemHeight = 13
TabOrder = 8
end
end

View File

@ -64,7 +64,8 @@ object frmTriggerEditor: TfrmTriggerEditor
Gutter.Font.Height = -11
Gutter.Font.Name = 'Courier New'
Gutter.Font.Style = []
Lines.Strings = ('SynMemoStatement')
Lines.Strings = (
'SynMemoStatement')
OnChange = Modification
end
object btnHelp: TButton
@ -105,7 +106,6 @@ object frmTriggerEditor: TfrmTriggerEditor
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
TabOrder = 1
OnChange = Modification
end
@ -115,7 +115,6 @@ object frmTriggerEditor: TfrmTriggerEditor
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 6
OnChange = Modification
end
@ -125,7 +124,6 @@ object frmTriggerEditor: TfrmTriggerEditor
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 7
OnChange = Modification
end

View File

@ -47,7 +47,6 @@ object UserManagerForm: TUserManagerForm
ItemsEx = <>
Style = csExDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 16
TabOrder = 0
OnChange = comboUsersChange
Images = MainForm.PngImageListMain
@ -82,7 +81,6 @@ object UserManagerForm: TUserManagerForm
ItemsEx = <>
Style = csExDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 16
TabOrder = 3
OnChange = comboObjectsChange
Images = MainForm.PngImageListMain