opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-06 18:24:26 +08:00
Code Issues Packages Projects Releases Wiki Activity

Issue #1482: fix anchor siblings

Browse Source
This commit is contained in:
Ansgar Becker
2025-03-31 21:27:34 +02:00
parent b382e02f86
commit 7567ec9f59
1 changed files with 47 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

77
source/loaddata.lfm
View File

@ -17,12 +17,16 @@ object loaddataform: Tloaddataform
OnShow = FormShow OnShow = FormShow
Position = poMainFormCenter Position = poMainFormCenter
object btnImport: TButton object btnImport: TButton
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 448 AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 556
Height = 31 Height = 31
Top = 645 Top = 651
Width = 94 Width = 94
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
BorderSpacing.Around = 6
Caption = 'Import!' Caption = 'Import!'
Enabled = False Enabled = False
ModalResult = 1 ModalResult = 1
@ -30,28 +34,33 @@ object loaddataform: Tloaddataform
OnClick = btnImportClick OnClick = btnImportClick
end end
object btnCancel: TButton object btnCancel: TButton
AnchorSideRight.Side = asrBottom AnchorSideRight.Control = btnImport
Left = 548 AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 456
Height = 31 Height = 31
Top = 645 Top = 651
Width = 94 Width = 94
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
BorderSpacing.Around = 6
Caption = 'Cancel' Caption = 'Cancel'
ModalResult = 2 ModalResult = 2
TabOrder = 7 TabOrder = 7
end end
object grpFilename: TGroupBox object grpFilename: TGroupBox
AnchorSideLeft.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 10 Left = 6
Height = 99 Height = 99
Top = 10 Top = 10
Width = 632 Width = 644
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Input file' Caption = 'Input file'
ClientHeight = 74 ClientHeight = 74
ClientWidth = 628 ClientWidth = 640
ParentBackground = False ParentBackground = False
TabOrder = 0 TabOrder = 0
object lblFilename: TLabel object lblFilename: TLabel
@ -77,7 +86,7 @@ object loaddataform: Tloaddataform
Left = 104 Left = 104
Height = 28 Height = 28
Top = 6 Top = 6
Width = 512 Width = 524
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ButtonWidth = 29 ButtonWidth = 29
@ -98,7 +107,7 @@ object loaddataform: Tloaddataform
Left = 104 Left = 104
Height = 28 Height = 28
Top = 40 Top = 40
Width = 512 Width = 524
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
DropDownCount = 16 DropDownCount = 16
@ -111,8 +120,9 @@ object loaddataform: Tloaddataform
object grpChars: TGroupBox object grpChars: TGroupBox
AnchorSideTop.Control = grpFilename AnchorSideTop.Control = grpFilename
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 278 Left = 286
Height = 169 Height = 169
Top = 115 Top = 115
Width = 364 Width = 364
@ -219,17 +229,18 @@ object loaddataform: Tloaddataform
end end
end end
object grpOptions: TGroupBox object grpOptions: TGroupBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = grpFilename AnchorSideTop.Control = grpFilename
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 10 Left = 6
Height = 219 Height = 219
Top = 115 Top = 115
Width = 261 Width = 265
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Options' Caption = 'Options'
ClientHeight = 194 ClientHeight = 194
ClientWidth = 257 ClientWidth = 261
ParentBackground = False ParentBackground = False
TabOrder = 1 TabOrder = 1
object lblIgnoreLinesCount: TLabel object lblIgnoreLinesCount: TLabel
@ -264,7 +275,7 @@ object loaddataform: Tloaddataform
Left = 12 Left = 12
Height = 24 Height = 24
Top = 43 Top = 43
Width = 241 Width = 245
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Low priority, avoid high server load' Caption = 'Low priority, avoid high server load'
@ -278,7 +289,7 @@ object loaddataform: Tloaddataform
Left = 12 Left = 12
Height = 24 Height = 24
Top = 73 Top = 73
Width = 241 Width = 245
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Input file contains local formatted numbers, e.g. 1.234,56 in Germany' Caption = 'Input file contains local formatted numbers, e.g. 1.234,56 in Germany'
@ -290,7 +301,7 @@ object loaddataform: Tloaddataform
Left = 12 Left = 12
Height = 24 Height = 24
Top = 103 Top = 103
Width = 241 Width = 245
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Truncate destination table before import' Caption = 'Truncate destination table before import'
@ -302,7 +313,7 @@ object loaddataform: Tloaddataform
Left = 12 Left = 12
Height = 24 Height = 24
Top = 133 Top = 133
Width = 241 Width = 245
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Keep dialog open after import' Caption = 'Keep dialog open after import'
@ -310,12 +321,13 @@ object loaddataform: Tloaddataform
end end
end end
object grpDuplicates: TRadioGroup object grpDuplicates: TRadioGroup
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = grpOptions AnchorSideTop.Control = grpOptions
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 10 Left = 6
Height = 154 Height = 154
Top = 340 Top = 340
Width = 261 Width = 265
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoFill = True AutoFill = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -328,7 +340,7 @@ object loaddataform: Tloaddataform
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1 ChildSizing.ControlsPerLine = 1
ClientHeight = 129 ClientHeight = 129
ClientWidth = 257 ClientWidth = 261
ItemIndex = 2 ItemIndex = 2
Items.Strings = ( Items.Strings = (
'INSERT (may throw errors)' 'INSERT (may throw errors)'
@ -339,12 +351,14 @@ object loaddataform: Tloaddataform
TabOrder = 3 TabOrder = 3
end end
object grpParseMethod: TRadioGroup object grpParseMethod: TRadioGroup
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = grpDuplicates AnchorSideTop.Control = grpDuplicates
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 10 AnchorSideBottom.Control = btnImport
Height = 137 Left = 6
Height = 145
Top = 500 Top = 500
Width = 261 Width = 265
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
AutoFill = True AutoFill = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -356,8 +370,8 @@ object loaddataform: Tloaddataform
ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1 ChildSizing.ControlsPerLine = 1
ClientHeight = 112 ClientHeight = 120
ClientWidth = 257 ClientWidth = 261
ItemIndex = 0 ItemIndex = 0
Items.Strings = ( Items.Strings = (
'Server parses file contents (LOAD DATA)' 'Server parses file contents (LOAD DATA)'
@ -370,14 +384,17 @@ object loaddataform: Tloaddataform
object grpDestination: TGroupBox object grpDestination: TGroupBox
AnchorSideTop.Control = grpChars AnchorSideTop.Control = grpChars
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 278 AnchorSideRight.Control = Owner
Height = 347 AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = btnImport
Left = 286
Height = 355
Top = 290 Top = 290
Width = 364 Width = 364
Anchors = [akTop, akRight, akBottom] Anchors = [akTop, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Destination' Caption = 'Destination'
ClientHeight = 322 ClientHeight = 330
ClientWidth = 360 ClientWidth = 360
ParentBackground = False ParentBackground = False
TabOrder = 5 TabOrder = 5
@ -439,7 +456,7 @@ object loaddataform: Tloaddataform
AnchorSideTop.Control = comboTable AnchorSideTop.Control = comboTable
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 140 Left = 140
Height = 236 Height = 244
Top = 75 Top = 75
Width = 204 Width = 204
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]