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