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:37:08 +02:00
parent 7567ec9f59
commit e1f5600cf7
1 changed files with 65 additions and 45 deletions
Download Patch File Download Diff File Expand all files Collapse all files

110
source/exportgrid.lfm
View File

@ -17,26 +17,31 @@ object frmExportGrid: TfrmExportGrid
OnShow = FormShow OnShow = FormShow
Position = poMainFormCenter Position = poMainFormCenter
object btnOK: TButton object btnOK: TButton
Left = 425 AnchorSideRight.Control = btnCancel
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 430
Height = 31 Height = 31
Top = 474 Top = 478
Width = 94 Width = 94
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'OK' Caption = 'OK'
Default = True
ModalResult = 1 ModalResult = 1
TabOrder = 5 TabOrder = 5
OnClick = btnOKClick OnClick = btnOKClick
end end
object btnCancel: TButton object btnCancel: TButton
Left = 526 AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 530
Height = 31 Height = 31
Top = 474 Top = 478
Width = 94 Width = 94
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Cancel = True
Caption = 'Cancel' Caption = 'Cancel'
ModalResult = 2 ModalResult = 2
TabOrder = 4 TabOrder = 4
@ -44,12 +49,15 @@ object frmExportGrid: TfrmExportGrid
object grpSelection: TRadioGroup object grpSelection: TRadioGroup
AnchorSideTop.Control = grpFormat AnchorSideTop.Control = grpFormat
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 10 Left = 10
Height = 82 Height = 73
Top = 202 Top = 198
Width = 610 Width = 614
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoFill = True AutoFill = True
AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Row selection' Caption = 'Row selection'
ChildSizing.LeftRightSpacing = 6 ChildSizing.LeftRightSpacing = 6
@ -59,8 +67,8 @@ object frmExportGrid: TfrmExportGrid
ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1 ChildSizing.ControlsPerLine = 1
ClientHeight = 57 ClientHeight = 48
ClientWidth = 606 ClientWidth = 610
ItemIndex = 1 ItemIndex = 1
Items.Strings = ( Items.Strings = (
'Selected rows' 'Selected rows'
@ -71,32 +79,35 @@ object frmExportGrid: TfrmExportGrid
end end
object grpOutput: TGroupBox object grpOutput: TGroupBox
AnchorSideTop.Control = Owner AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 10 Left = 10
Height = 122 Height = 129
Top = 6 Top = 6
Width = 610 Width = 614
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Output target' Caption = 'Output target'
ClientHeight = 97 ClientHeight = 104
ClientWidth = 606 ClientWidth = 610
ParentBackground = False ParentBackground = False
TabOrder = 0 TabOrder = 0
object lblEncoding: TLabel object lblEncoding: TLabel
AnchorSideTop.Control = editFilename AnchorSideTop.Control = editFilename
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 10 Left = 6
Height = 20 Height = 20
Top = 66 Top = 70
Width = 65 Width = 65
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Encoding:' Caption = 'Encoding:'
end end
object radioOutputCopyToClipboard: TRadioButton object radioOutputCopyToClipboard: TRadioButton
Left = 10 Left = 6
Height = 24 Height = 24
Top = 2 Top = 6
Width = 584 Width = 592
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Copy to clipboard' Caption = 'Copy to clipboard'
@ -108,9 +119,9 @@ object frmExportGrid: TfrmExportGrid
object radioOutputFile: TRadioButton object radioOutputFile: TRadioButton
AnchorSideTop.Control = radioOutputCopyToClipboard AnchorSideTop.Control = radioOutputCopyToClipboard
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 10 Left = 6
Height = 24 Height = 24
Top = 32 Top = 36
Width = 44 Width = 44
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'File' Caption = 'File'
@ -120,10 +131,10 @@ object frmExportGrid: TfrmExportGrid
object editFilename: TEditButton object editFilename: TEditButton
AnchorSideTop.Control = radioOutputCopyToClipboard AnchorSideTop.Control = radioOutputCopyToClipboard
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 99 Left = 95
Height = 28 Height = 28
Top = 32 Top = 36
Width = 495 Width = 503
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ButtonWidth = 29 ButtonWidth = 29
@ -141,10 +152,10 @@ object frmExportGrid: TfrmExportGrid
object comboEncoding: TComboBox object comboEncoding: TComboBox
AnchorSideTop.Control = editFilename AnchorSideTop.Control = editFilename
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 99 Left = 95
Height = 28 Height = 28
Top = 66 Top = 70
Width = 495 Width = 503
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ItemHeight = 20 ItemHeight = 20
@ -155,15 +166,18 @@ object frmExportGrid: TfrmExportGrid
object grpOptions: TGroupBox object grpOptions: TGroupBox
AnchorSideTop.Control = grpSelection AnchorSideTop.Control = grpSelection
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = btnOK
Left = 10 Left = 10
Height = 176 Height = 195
Top = 290 Top = 277
Width = 610 Width = 614
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Options' Caption = 'Options'
ClientHeight = 151 ClientHeight = 170
ClientWidth = 606 ClientWidth = 610
ParentBackground = False ParentBackground = False
TabOrder = 3 TabOrder = 3
object lblSeparator: TLabel object lblSeparator: TLabel
@ -219,7 +233,7 @@ object frmExportGrid: TfrmExportGrid
Left = 500 Left = 500
Height = 28 Height = 28
Top = 6 Top = 6
Width = 94 Width = 98
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ButtonWidth = 29 ButtonWidth = 29
@ -239,7 +253,7 @@ object frmExportGrid: TfrmExportGrid
Left = 500 Left = 500
Height = 28 Height = 28
Top = 40 Top = 40
Width = 94 Width = 98
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ButtonWidth = 29 ButtonWidth = 29
@ -258,7 +272,7 @@ object frmExportGrid: TfrmExportGrid
Left = 500 Left = 500
Height = 28 Height = 28
Top = 74 Top = 74
Width = 94 Width = 98
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ButtonWidth = 29 ButtonWidth = 29
@ -300,7 +314,7 @@ object frmExportGrid: TfrmExportGrid
Left = 500 Left = 500
Height = 28 Height = 28
Top = 108 Top = 108
Width = 94 Width = 98
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ButtonWidth = 29 ButtonWidth = 29
@ -326,9 +340,11 @@ object frmExportGrid: TfrmExportGrid
end end
end end
object btnSetClipboardDefaults: TSpeedButton object btnSetClipboardDefaults: TSpeedButton
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 10 Left = 10
Height = 31 Height = 31
Top = 474 Top = 478
Width = 191 Width = 191
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -340,22 +356,26 @@ object frmExportGrid: TfrmExportGrid
object grpFormat: TGroupBox object grpFormat: TGroupBox
AnchorSideTop.Control = grpOutput AnchorSideTop.Control = grpOutput
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 10 Left = 10
Height = 62 Height = 51
Top = 134 Top = 141
Width = 610 Width = 614
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Output format' Caption = 'Output format'
ClientHeight = 37 ClientHeight = 26
ClientWidth = 606 ClientWidth = 610
ParentBackground = False ParentBackground = False
TabOrder = 1 TabOrder = 1
object comboFormat: TComboBoxEx object comboFormat: TComboBoxEx
AnchorSideTop.Control = grpFormat
Left = 10 Left = 10
Height = 26 Height = 26
Top = 3 Top = 0
Width = 584 Width = 588
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
DropDownCount = 20 DropDownCount = 20
Images = MainForm.ImageListIcons8 Images = MainForm.ImageListIcons8