Files
0linux/spackgui/frmenvironementsettings.lfm
2023-10-06 15:59:41 +02:00

531 lines
14 KiB
Plaintext

object fEnvironmentSettings: TfEnvironmentSettings
Left = 2589
Height = 505
Top = 0
Width = 677
Caption = 'Environment parameters'
ClientHeight = 505
ClientWidth = 677
Constraints.MinHeight = 497
DesignTimePPI = 108
OnClose = FormClose
OnCreate = FormCreate
Position = poMainFormCenter
LCLVersion = '1.9.0.0'
object btnCancel: TBitBtn
Tag = -1
Left = 546
Height = 34
Top = 459
Width = 120
Anchors = [akRight, akBottom]
Cancel = True
Caption = 'Cancel'
ModalResult = 2
ParentFont = False
TabOrder = 1
end
object btnOk: TBitBtn
Tag = -1
Left = 405
Height = 34
Top = 459
Width = 120
Anchors = [akRight, akBottom]
Caption = 'OK'
Default = True
ModalResult = 1
OnClick = btnOkClick
ParentFont = False
TabOrder = 2
end
object pcMain: TPageControl
Left = 18
Height = 423
Top = 18
Width = 648
ActivePage = tsCommands
Anchors = [akTop, akLeft, akRight, akBottom]
Font.Color = clWindowText
ParentFont = False
TabIndex = 0
TabOrder = 0
object tsCommands: TTabSheet
Caption = '&Commands'
ClientHeight = 391
ClientWidth = 644
Font.Color = clWindowText
ParentFont = False
object lbInstall: TLabel
Left = 14
Height = 20
Top = 20
Width = 108
Caption = '&Install a package:'
FocusControl = edInstall
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edInstall: TEdit
Left = 188
Height = 34
Top = 16
Width = 442
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edInstallChange
ParentFont = False
TabOrder = 0
Text = 'edInstall'
end
object edReinstall: TEdit
Left = 188
Height = 34
Top = 56
Width = 442
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edInstallChange
ParentFont = False
TabOrder = 1
Text = 'edReinstall'
end
object lbReinstall: TLabel
Left = 14
Height = 20
Top = 61
Width = 123
Caption = '&Reinstall a package:'
FocusControl = edReinstall
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edRemove: TEdit
Left = 188
Height = 34
Top = 96
Width = 442
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edInstallChange
ParentFont = False
TabOrder = 2
Text = 'edRemove'
end
object lbRemove: TLabel
Left = 14
Height = 20
Top = 100
Width = 110
Caption = '&Delete a package:'
FocusControl = edRemove
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edUpdate: TEdit
Left = 188
Height = 34
Top = 136
Width = 442
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edInstallChange
ParentFont = False
TabOrder = 3
Text = 'edUpdate'
end
object lbUpdate: TLabel
Left = 14
Height = 20
Top = 141
Width = 124
Caption = '&Upgrade a package:'
FocusControl = edUpdate
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
end
object tsPaths: TTabSheet
Caption = '&Paths'
ClientHeight = 391
ClientWidth = 644
Font.Color = clWindowText
ParentFont = False
object lbInstPackageDir: TLabel
Left = 14
Height = 20
Top = 20
Width = 135
Caption = '&Installed package list:'
FocusControl = edInstPackageDir
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object lbPackageDwlDir: TLabel
Left = 14
Height = 20
Top = 57
Width = 144
Caption = '&Download packages in:'
FocusControl = edPackageDwlDir
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object lbRepoDwlDir: TLabel
Left = 14
Height = 20
Top = 93
Width = 192
Caption = '&Repositories indexes directory:'
FocusControl = edRepoDwlDir
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edInstPackageDir: TEdit
Left = 242
Height = 34
Top = 16
Width = 357
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edInstallChange
ParentFont = False
TabOrder = 0
Text = 'edInstPackageDir'
end
object edPackageDwlDir: TEdit
Left = 242
Height = 34
Top = 53
Width = 357
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edInstallChange
ParentFont = False
TabOrder = 1
Text = 'edPackageDwlDir'
end
object edRepoDwlDir: TEdit
Left = 242
Height = 34
Top = 89
Width = 357
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edInstallChange
ParentFont = False
TabOrder = 2
Text = 'edRepoDwlDir'
end
object btnBrowseInstPkgDir: TButton
Left = 602
Height = 27
Top = 17
Width = 21
Caption = '...'
Font.Color = clWindowText
OnClick = btnBrowseInstPkgDirClick
ParentFont = False
TabOrder = 3
end
object btnBrowsePkgDwlDir: TButton
Left = 602
Height = 27
Top = 53
Width = 21
Caption = '...'
Font.Color = clWindowText
OnClick = btnBrowsePkgDwlDirClick
ParentFont = False
TabOrder = 4
end
object btnBrowseRepoDwlDir: TButton
Left = 602
Height = 27
Top = 89
Width = 21
Caption = '...'
Font.Color = clWindowText
OnClick = btnBrowseRepoDwlDirClick
ParentFont = False
TabOrder = 5
end
end
object tsNetwork: TTabSheet
Caption = '&Network'
ClientHeight = 391
ClientWidth = 644
Font.Color = clWindowText
ParentFont = False
object gbHttpProxy: TGroupBox
Left = 14
Height = 144
Top = 16
Width = 613
Anchors = [akTop, akLeft, akRight]
Caption = 'HTTP Proxy'
ClientHeight = 112
ClientWidth = 609
Font.Color = clWindowText
ParentFont = False
TabOrder = 0
object lbHttpProxyAddress: TLabel
Left = 15
Height = 20
Top = 17
Width = 54
Caption = '&Address:'
FocusControl = edHttpProxyAddress
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edHttpProxyAddress: TEdit
Left = 118
Height = 34
Top = 12
Width = 282
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edHttpProxyAddressChange
ParentFont = False
TabOrder = 0
Text = 'edHttpProxyAddress'
end
object lbHttpProxyPort: TLabel
Left = 444
Height = 20
Top = 17
Width = 31
Anchors = [akTop, akRight]
Caption = 'P&ort:'
FocusControl = edHttpProxyPort
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edHttpProxyPort: TEdit
Left = 499
Height = 34
Top = 12
Width = 99
Anchors = [akTop, akRight]
Font.Color = clWindowText
OnChange = edHttpProxyAddressChange
ParentFont = False
TabOrder = 1
Text = 'edHttpProxyPort'
end
object lbHttpProxyName: TLabel
Left = 15
Height = 20
Top = 48
Width = 68
Caption = '&Username:'
FocusControl = edHttpProxyUser
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edHttpProxyUser: TEdit
Left = 118
Height = 34
Top = 44
Width = 282
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edHttpProxyAddressChange
ParentFont = False
TabOrder = 2
Text = 'edHttpProxyUser'
end
object medHttpProxyPass: TMaskEdit
Left = 118
Height = 34
Top = 75
Width = 282
Anchors = [akTop, akLeft, akRight]
CharCase = ecNormal
Font.Color = clWindowText
MaxLength = 0
ParentFont = False
TabOrder = 3
OnChange = edHttpProxyAddressChange
Text = 'medHttpProxyPass'
SpaceChar = '_'
end
object lbHttpProxyPass: TLabel
Left = 15
Height = 20
Top = 80
Width = 64
Caption = 'Pass&word:'
FocusControl = medHttpProxyPass
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object btnCopyToFtp: TBitBtn
Left = 418
Height = 34
Top = 64
Width = 180
Anchors = [akTop, akRight]
Caption = 'To &FTP proxy'
Font.Color = clWindowText
OnClick = btnCopyToFtpClick
ParentFont = False
TabOrder = 4
end
end
object gbFtpProxy: TGroupBox
Left = 14
Height = 144
Top = 178
Width = 613
Anchors = [akTop, akLeft, akRight]
Caption = 'Proxy FTP'
ClientHeight = 112
ClientWidth = 609
Font.Color = clWindowText
ParentFont = False
TabOrder = 1
object lbFtpProxyAddress: TLabel
Left = 15
Height = 20
Top = 17
Width = 54
Caption = 'A&ddress:'
FocusControl = edFtpProxyAddress
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edFtpProxyAddress: TEdit
Left = 118
Height = 34
Top = 12
Width = 282
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edFtpProxyAddressChange
ParentFont = False
TabOrder = 0
Text = 'edFtpProxyAddress'
end
object lbFtpProxyPort: TLabel
Left = 444
Height = 20
Top = 17
Width = 31
Anchors = [akTop, akRight]
Caption = 'Po&rt:'
FocusControl = edFtpProxyPort
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edFtpProxyPort: TEdit
Left = 499
Height = 34
Top = 12
Width = 99
Anchors = [akTop, akRight]
Font.Color = clWindowText
OnChange = edFtpProxyAddressChange
ParentFont = False
TabOrder = 1
Text = 'edFtpProxyPort'
end
object lbFtpProxyUser: TLabel
Left = 15
Height = 20
Top = 48
Width = 68
Caption = 'Us&ername:'
FocusControl = edFtpProxyUser
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object edFtpProxyUser: TEdit
Left = 118
Height = 34
Top = 44
Width = 282
Anchors = [akTop, akLeft, akRight]
Font.Color = clWindowText
OnChange = edFtpProxyAddressChange
ParentFont = False
TabOrder = 2
Text = 'edFtpProxyUser'
end
object medFtpProxyPass: TMaskEdit
Left = 118
Height = 34
Top = 75
Width = 282
Anchors = [akTop, akLeft, akRight]
CharCase = ecNormal
Font.Color = clWindowText
MaxLength = 0
ParentFont = False
TabOrder = 3
OnChange = edFtpProxyAddressChange
Text = 'medFtpProxyPass'
SpaceChar = '_'
end
object lbFtpProxyPass: TLabel
Left = 15
Height = 20
Top = 80
Width = 64
Caption = 'Pa&ssword:'
FocusControl = medFtpProxyPass
Font.Color = clWindowText
ParentColor = False
ParentFont = False
end
object btnCopyToHttp: TBitBtn
Tag = 40
Left = 418
Height = 34
Top = 64
Width = 180
Anchors = [akTop, akRight]
Caption = 'To &HTTP proxy'
Font.Color = clWindowText
OnClick = btnCopyToHttpClick
ParentFont = False
TabOrder = 4
end
end
object btnGetSystemProxy: TBitBtn
Tag = 33
Left = 14
Height = 34
Top = 340
Width = 609
Caption = '&Get system proxy parameters'
Font.Color = clWindowText
OnClick = btnGetSystemProxyClick
ParentFont = False
TabOrder = 2
end
end
end
object dlgSelectDirectory: TSelectDirectoryDialog
InitialDir = '/'
Options = [ofPathMustExist, ofCreatePrompt, ofNoNetworkButton, ofEnableSizing, ofViewDetail]
left = 72
top = 450
end
end