RunParamsOpts dialog: allow negative values for console window position - they are valid in a multi monitor environment where a secondary monitor is left or above the main monitor

fix tab orders as well
This commit is contained in:
Ondrej Pokorny 2024-10-28 10:55:27 +01:00
parent 1db5f4272e
commit 4bd60bf2b5

View File

@ -1,24 +1,24 @@
object RunParamsOptsDlg: TRunParamsOptsDlg object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 443 Left = 755
Height = 560 Height = 741
Top = 176 Top = 126
Width = 531 Width = 781
BorderIcons = [biSystemMenu] BorderIcons = [biSystemMenu]
Caption = 'RunParamsOptsDlg' Caption = 'RunParamsOptsDlg'
ClientHeight = 560 ClientHeight = 741
ClientWidth = 531 ClientWidth = 781
Constraints.MinHeight = 450 Constraints.MinHeight = 450
Constraints.MinWidth = 400 Constraints.MinWidth = 400
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '3.99.0.0' LCLVersion = '4.99.0.0'
OnActivate = FormActivate OnActivate = FormActivate
OnClose = FormClose OnClose = FormClose
OnCreate = FormCreate OnCreate = FormCreate
object Notebook: TPageControl object Notebook: TPageControl
Left = 0 Left = 0
Height = 450 Height = 631
Top = 72 Top = 72
Width = 531 Width = 781
ActivePage = GeneralPage ActivePage = GeneralPage
Align = alClient Align = alClient
BorderSpacing.Bottom = 6 BorderSpacing.Bottom = 6
@ -27,36 +27,36 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
OnChange = NotebookChange OnChange = NotebookChange
object GeneralPage: TTabSheet object GeneralPage: TTabSheet
Caption = 'GeneralPage' Caption = 'GeneralPage'
ClientHeight = 422 ClientHeight = 603
ClientWidth = 523 ClientWidth = 773
object ScrollBox1: TScrollBox object ScrollBox1: TScrollBox
Left = 0 Left = 0
Height = 422 Height = 603
Top = 0 Top = 0
Width = 523 Width = 773
HorzScrollBar.Page = 314 HorzScrollBar.Page = 314
VertScrollBar.Page = 418 VertScrollBar.Page = 585
Align = alClient Align = alClient
ClientHeight = 418 ClientHeight = 599
ClientWidth = 502 ClientWidth = 769
TabOrder = 0 TabOrder = 0
object DisplayGroupBox: TGroupBox object DisplayGroupBox: TGroupBox
Left = 6 Left = 6
Height = 80 Height = 80
Top = 310 Top = 310
Width = 490 Width = 757
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'DisplayGroupBox' Caption = 'DisplayGroupBox'
ClientHeight = 60 ClientHeight = 60
ClientWidth = 486 ClientWidth = 753
TabOrder = 0 TabOrder = 3
object DisplayEdit: TEdit object DisplayEdit: TEdit
Left = 6 Left = 6
Height = 23 Height = 23
Top = 31 Top = 31
Width = 474 Width = 741
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Around = 6
TabOrder = 1 TabOrder = 1
@ -66,7 +66,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 19 Height = 19
Top = 6 Top = 6
Width = 474 Width = 741
Align = alTop Align = alTop
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -80,19 +80,19 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 151 Height = 151
Top = 67 Top = 67
Width = 490 Width = 757
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'CmdLineParametersGroupBox' Caption = 'CmdLineParametersGroupBox'
ClientHeight = 131 ClientHeight = 131
ClientWidth = 486 ClientWidth = 753
TabOrder = 1 TabOrder = 1
object CmdLineParametersComboBox: TComboBox object CmdLineParametersComboBox: TComboBox
Left = 6 Left = 6
Height = 23 Height = 23
Top = 6 Top = 6
Width = 474 Width = 741
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ItemHeight = 15 ItemHeight = 15
@ -109,7 +109,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 189 Left = 189
Height = 23 Height = 23
Top = 35 Top = 35
Width = 291 Width = 558
FilterIndex = 0 FilterIndex = 0
HideDirectories = False HideDirectories = False
ButtonWidth = 23 ButtonWidth = 23
@ -119,7 +119,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Right = 6 BorderSpacing.Right = 6
MaxLength = 0 MaxLength = 0
TabOrder = 1 TabOrder = 2
end end
object FileNameStdOut: TFileNameEdit object FileNameStdOut: TFileNameEdit
AnchorSideLeft.Control = FileNameStdIn AnchorSideLeft.Control = FileNameStdIn
@ -130,7 +130,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 189 Left = 189
Height = 23 Height = 23
Top = 61 Top = 61
Width = 291 Width = 558
FilterIndex = 0 FilterIndex = 0
HideDirectories = False HideDirectories = False
ButtonWidth = 23 ButtonWidth = 23
@ -139,7 +139,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
BorderSpacing.Top = 3 BorderSpacing.Top = 3
BorderSpacing.Right = 6 BorderSpacing.Right = 6
MaxLength = 0 MaxLength = 0
TabOrder = 2 TabOrder = 4
end end
object FileNameStdErr: TFileNameEdit object FileNameStdErr: TFileNameEdit
AnchorSideLeft.Control = FileNameStdIn AnchorSideLeft.Control = FileNameStdIn
@ -150,7 +150,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 189 Left = 189
Height = 23 Height = 23
Top = 87 Top = 87
Width = 291 Width = 558
FilterIndex = 0 FilterIndex = 0
HideDirectories = False HideDirectories = False
ButtonWidth = 23 ButtonWidth = 23
@ -160,7 +160,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
BorderSpacing.Right = 6 BorderSpacing.Right = 6
BorderSpacing.Bottom = 3 BorderSpacing.Bottom = 3
MaxLength = 0 MaxLength = 0
TabOrder = 3 TabOrder = 6
end end
object RedirectWarnLabel: TLabel object RedirectWarnLabel: TLabel
AnchorSideLeft.Control = CmdLineParametersGroupBox AnchorSideLeft.Control = CmdLineParametersGroupBox
@ -171,7 +171,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 15 Height = 15
Top = 113 Top = 113
Width = 474 Width = 741
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Right = 6 BorderSpacing.Right = 6
@ -195,7 +195,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
BorderSpacing.Right = 6 BorderSpacing.Right = 6
ItemHeight = 15 ItemHeight = 15
Style = csDropDownList Style = csDropDownList
TabOrder = 4 TabOrder = 1
end end
object cbRedirStdOut: TComboBox object cbRedirStdOut: TComboBox
AnchorSideLeft.Control = cbRedirStdIn AnchorSideLeft.Control = cbRedirStdIn
@ -209,7 +209,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
BorderSpacing.Right = 6 BorderSpacing.Right = 6
ItemHeight = 15 ItemHeight = 15
Style = csDropDownList Style = csDropDownList
TabOrder = 5 TabOrder = 3
end end
object cbRedirStdErr: TComboBox object cbRedirStdErr: TComboBox
AnchorSideLeft.Control = cbRedirStdIn AnchorSideLeft.Control = cbRedirStdIn
@ -223,7 +223,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
BorderSpacing.Right = 6 BorderSpacing.Right = 6
ItemHeight = 15 ItemHeight = 15
Style = csDropDownList Style = csDropDownList
TabOrder = 6 TabOrder = 5
end end
object lbStdIn: TLabel object lbStdIn: TLabel
AnchorSideLeft.Control = CmdLineParametersGroupBox AnchorSideLeft.Control = CmdLineParametersGroupBox
@ -265,19 +265,19 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 80 Height = 80
Top = 224 Top = 224
Width = 490 Width = 757
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'UseLaunchingApplicationGroupBox' Caption = 'UseLaunchingApplicationGroupBox'
ClientHeight = 60 ClientHeight = 60
ClientWidth = 486 ClientWidth = 753
TabOrder = 2 TabOrder = 2
object UseLaunchingApplicationCheckBox: TCheckBox object UseLaunchingApplicationCheckBox: TCheckBox
Left = 6 Left = 6
Height = 19 Height = 19
Top = 6 Top = 6
Width = 474 Width = 741
Align = alTop Align = alTop
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -291,7 +291,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 23 Height = 23
Top = 31 Top = 31
Width = 474 Width = 741
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ItemHeight = 15 ItemHeight = 15
@ -303,21 +303,21 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 55 Height = 55
Top = 6 Top = 6
Width = 490 Width = 757
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'HostApplicationGroupBox' Caption = 'HostApplicationGroupBox'
ClientHeight = 35 ClientHeight = 35
ClientWidth = 486 ClientWidth = 753
TabOrder = 3 TabOrder = 0
object HostApplicationBrowseBtn: TButton object HostApplicationBrowseBtn: TButton
AnchorSideTop.Control = HostApplicationGroupBox AnchorSideTop.Control = HostApplicationGroupBox
AnchorSideRight.Control = HostApplicationGroupBox AnchorSideRight.Control = HostApplicationGroupBox
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = HostApplicationEdit AnchorSideBottom.Control = HostApplicationEdit
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 312 Left = 579
Height = 23 Height = 23
Top = 6 Top = 6
Width = 168 Width = 168
@ -337,7 +337,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 23 Height = 23
Top = 6 Top = 6
Width = 300 Width = 567
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
TabOrder = 0 TabOrder = 0
@ -348,13 +348,13 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 55 Height = 55
Top = 396 Top = 396
Width = 490 Width = 757
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'WorkingDirectoryGroupBox' Caption = 'WorkingDirectoryGroupBox'
ClientHeight = 35 ClientHeight = 35
ClientWidth = 486 ClientWidth = 753
TabOrder = 4 TabOrder = 4
object WorkingDirectoryBtn: TButton object WorkingDirectoryBtn: TButton
AnchorSideTop.Control = WorkingDirectoryGroupBox AnchorSideTop.Control = WorkingDirectoryGroupBox
@ -362,7 +362,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = WorkingDirectoryComboBox AnchorSideBottom.Control = WorkingDirectoryComboBox
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 343 Left = 610
Height = 23 Height = 23
Top = 6 Top = 6
Width = 137 Width = 137
@ -381,7 +381,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 23 Height = 23
Top = 6 Top = 6
Width = 331 Width = 598
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ItemHeight = 15 ItemHeight = 15
@ -393,18 +393,18 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 0 Left = 0
Height = 128 Height = 128
Top = 457 Top = 457
Width = 502 Width = 769
Align = alTop Align = alTop
AutoSize = True AutoSize = True
Caption = 'ConsoleWinSizeGroupBox' Caption = 'ConsoleWinSizeGroupBox'
ClientHeight = 108 ClientHeight = 108
ClientWidth = 498 ClientWidth = 765
TabOrder = 5 TabOrder = 5
object ConsoleSizePanel: TPanel object ConsoleSizePanel: TPanel
Left = 0 Left = 0
Height = 93 Height = 93
Top = 0 Top = 0
Width = 498 Width = 765
Align = alClient Align = alClient
BevelOuter = bvNone BevelOuter = bvNone
Caption = '0' Caption = '0'
@ -417,89 +417,91 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 3 ChildSizing.ControlsPerLine = 3
ClientHeight = 93 ClientHeight = 93
ClientWidth = 498 ClientWidth = 765
TabOrder = 0 TabOrder = 0
object UseConsolePosCheckBox: TCheckBox object UseConsolePosCheckBox: TCheckBox
Left = 6 Left = 6
Height = 23 Height = 23
Top = 6 Top = 6
Width = 235 Width = 324
Caption = 'UseConsolePosCheckBox' Caption = 'UseConsolePosCheckBox'
TabOrder = 0 TabOrder = 0
OnChange = UseConsolePosCheckBoxChange OnChange = UseConsolePosCheckBoxChange
end end
object edConsolePosLeft: TSpinEdit object edConsolePosLeft: TSpinEdit
Left = 247 Left = 336
Height = 23 Height = 23
Top = 6 Top = 6
Width = 120 Width = 208
MaxValue = 20000 MaxValue = 20000
TabOrder = 2 MinValue = -20000
TabOrder = 1
end end
object edConsolePosTop: TSpinEdit object edConsolePosTop: TSpinEdit
Left = 373 Left = 550
Height = 23 Height = 23
Top = 6 Top = 6
Width = 119 Width = 209
MaxValue = 20000 MaxValue = 20000
TabOrder = 1 MinValue = -20000
TabOrder = 2
end end
object UseConsoleSizeCheckBox: TCheckBox object UseConsoleSizeCheckBox: TCheckBox
Left = 6 Left = 6
Height = 23 Height = 23
Top = 35 Top = 35
Width = 235 Width = 324
Caption = 'UseConsoleSizeCheckBox' Caption = 'UseConsoleSizeCheckBox'
TabOrder = 3 TabOrder = 3
OnChange = UseConsolePosCheckBoxChange OnChange = UseConsolePosCheckBoxChange
end end
object edConsoleSizeWidth: TSpinEdit object edConsoleSizeWidth: TSpinEdit
Left = 247 Left = 336
Height = 23 Height = 23
Top = 35 Top = 35
Width = 120 Width = 208
MaxValue = 20000
TabOrder = 5
end
object edConsoleSizeHeight: TSpinEdit
Left = 373
Height = 23
Top = 35
Width = 119
MaxValue = 20000 MaxValue = 20000
TabOrder = 4 TabOrder = 4
end end
object edConsoleSizeHeight: TSpinEdit
Left = 550
Height = 23
Top = 35
Width = 209
MaxValue = 20000
TabOrder = 5
end
object UseConsoleBufferCheckBox: TCheckBox object UseConsoleBufferCheckBox: TCheckBox
Left = 6 Left = 6
Height = 23 Height = 23
Top = 64 Top = 64
Width = 235 Width = 324
Caption = 'UseConsoleBufferCheckBox' Caption = 'UseConsoleBufferCheckBox'
TabOrder = 6 TabOrder = 6
OnChange = UseConsolePosCheckBoxChange OnChange = UseConsolePosCheckBoxChange
end end
object edConsoleBufferColumns: TSpinEdit object edConsoleBufferColumns: TSpinEdit
Left = 247 Left = 336
Height = 23 Height = 23
Top = 64 Top = 64
Width = 120 Width = 208
MaxValue = 20000
TabOrder = 8
end
object edConsoleBufferRows: TSpinEdit
Left = 373
Height = 23
Top = 64
Width = 119
MaxValue = 20000 MaxValue = 20000
TabOrder = 7 TabOrder = 7
end end
object edConsoleBufferRows: TSpinEdit
Left = 550
Height = 23
Top = 64
Width = 209
MaxValue = 20000
TabOrder = 8
end
end end
object ConsoleSizeWarnLabel: TLabel object ConsoleSizeWarnLabel: TLabel
Left = 0 Left = 0
Height = 15 Height = 15
Top = 93 Top = 93
Width = 498 Width = 765
Align = alBottom Align = alBottom
Caption = 'ConsoleSizeWarnLabel' Caption = 'ConsoleSizeWarnLabel'
Font.Color = clRed Font.Color = clRed
@ -511,14 +513,14 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
end end
object EnvVarsPage: TTabSheet object EnvVarsPage: TTabSheet
Caption = 'EnvVarsPage' Caption = 'EnvVarsPage'
ClientHeight = 422 ClientHeight = 603
ClientWidth = 523 ClientWidth = 773
OnResize = EnvVarsPageResize OnResize = EnvVarsPageResize
object IncludeSystemVariablesCheckBox: TCheckBox object IncludeSystemVariablesCheckBox: TCheckBox
Left = 6 Left = 6
Height = 19 Height = 19
Top = 397 Top = 578
Width = 511 Width = 761
Align = alBottom Align = alBottom
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'IncludeSystemVariablesCheckBox' Caption = 'IncludeSystemVariablesCheckBox'
@ -532,21 +534,21 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = IncludeSystemVariablesCheckBox AnchorSideBottom.Control = IncludeSystemVariablesCheckBox
Left = 6 Left = 6
Height = 162 Height = 343
Top = 229 Top = 229
Width = 511 Width = 761
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'UserOverridesGroupBox' Caption = 'UserOverridesGroupBox'
ClientHeight = 142 ClientHeight = 323
ClientWidth = 507 ClientWidth = 757
TabOrder = 1 TabOrder = 1
object UserOverridesListView: TListView object UserOverridesListView: TListView
AnchorSideBottom.Control = UserOverridesAddButton AnchorSideBottom.Control = UserOverridesAddButton
Left = 6 Left = 6
Height = 99 Height = 280
Top = 6 Top = 6
Width = 495 Width = 745
Align = alTop Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -573,7 +575,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 25 Height = 25
Top = 111 Top = 292
Width = 157 Width = 157
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
AutoSize = True AutoSize = True
@ -589,7 +591,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 343 Left = 343
Height = 25 Height = 25
Top = 111 Top = 292
Width = 155 Width = 155
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
AutoSize = True AutoSize = True
@ -605,7 +607,7 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 169 Left = 169
Height = 25 Height = 25
Top = 111 Top = 292
Width = 168 Width = 168
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
AutoSize = True AutoSize = True
@ -620,19 +622,19 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 6 Left = 6
Height = 217 Height = 217
Top = 6 Top = 6
Width = 511 Width = 761
Align = alTop Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'SystemVariablesGroupBox' Caption = 'SystemVariablesGroupBox'
ClientHeight = 197 ClientHeight = 197
ClientWidth = 507 ClientWidth = 757
TabOrder = 0 TabOrder = 0
object SystemVariablesListView: TListView object SystemVariablesListView: TListView
Left = 6 Left = 6
Height = 185 Height = 185
Top = 6 Top = 6
Width = 495 Width = 745
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Columns = < Columns = <
@ -656,13 +658,13 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
end end
object PreviewPage: TTabSheet object PreviewPage: TTabSheet
Caption = 'PreviewPage' Caption = 'PreviewPage'
ClientHeight = 422 ClientHeight = 603
ClientWidth = 523 ClientWidth = 773
object PreviewMemo: TMemo object PreviewMemo: TMemo
Left = 0 Left = 0
Height = 403 Height = 584
Top = 0 Top = 0
Width = 523 Width = 773
Align = alClient Align = alClient
Lines.Strings = ( Lines.Strings = (
'PreviewMemo' 'PreviewMemo'
@ -672,8 +674,8 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
object PreviewMultilineCheckBox: TCheckBox object PreviewMultilineCheckBox: TCheckBox
Left = 0 Left = 0
Height = 19 Height = 19
Top = 403 Top = 584
Width = 523 Width = 773
Align = alBottom Align = alBottom
Caption = 'PreviewMultilineCheckBox' Caption = 'PreviewMultilineCheckBox'
TabOrder = 1 TabOrder = 1
@ -684,8 +686,8 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
object ButtonPanel: TButtonPanel object ButtonPanel: TButtonPanel
Left = 6 Left = 6
Height = 26 Height = 26
Top = 528 Top = 709
Width = 519 Width = 769
OKButton.Name = 'OKButton' OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True OKButton.DefaultCaption = True
OKButton.OnClick = OkButtonClick OKButton.OnClick = OkButtonClick
@ -705,13 +707,13 @@ object RunParamsOptsDlg: TRunParamsOptsDlg
Left = 10 Left = 10
Height = 52 Height = 52
Top = 10 Top = 10
Width = 511 Width = 761
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 10 BorderSpacing.Around = 10
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 52 ClientHeight = 52
ClientWidth = 511 ClientWidth = 761
TabOrder = 0 TabOrder = 0
object ModesLabel: TLabel object ModesLabel: TLabel
Left = 0 Left = 0