object OptionsFrm: TOptionsFrm Left = 399 Height = 597 Top = 156 Width = 644 BorderIcons = [biSystemMenu] Caption = 'Options' ClientHeight = 597 ClientWidth = 644 Constraints.MinHeight = 300 Constraints.MinWidth = 475 KeyPreview = True OnCreate = FormCreate OnDestroy = FormDestroy OnKeyPress = FormKeyPress PopupMode = pmExplicit Position = poOwnerFormCenter LCLVersion = '2.1.0.0' object pnBottom: TPanel Left = 0 Height = 46 Top = 551 Width = 644 Align = alBottom AutoSize = True BevelOuter = bvNone ClientHeight = 46 ClientWidth = 644 TabOrder = 1 object bpOptions: TButtonPanel Left = 6 Height = 34 Top = 6 Width = 632 OKButton.Name = 'OKButton' OKButton.DefaultCaption = True OKButton.OnClick = OKButtonClick HelpButton.Name = 'HelpButton' HelpButton.Caption = '&Restore defaults' HelpButton.DefaultCaption = False HelpButton.OnClick = HelpButtonClick CloseButton.Name = 'CloseButton' CloseButton.DefaultCaption = True CancelButton.Name = 'CancelButton' CancelButton.DefaultCaption = True TabOrder = 0 ShowButtons = [pbOK, pbCancel, pbHelp] end end object pgOptions: TPageControl Left = 6 Height = 539 Top = 6 Width = 632 ActivePage = tsGeneral Align = alClient BorderSpacing.Around = 6 TabIndex = 0 TabOrder = 0 object tsGeneral: TTabSheet Caption = 'General' ClientHeight = 511 ClientWidth = 624 object pnGeneral: TPanel Left = 0 Height = 511 Top = 0 Width = 624 Align = alClient BevelOuter = bvNone ClientHeight = 511 ClientWidth = 624 ParentColor = False TabOrder = 0 object lbRemoteRepository: TLabel AnchorSideLeft.Control = pnGeneral Left = 6 Height = 15 Top = 8 Width = 100 BorderSpacing.Left = 6 Caption = 'Remote repository:' ParentColor = False end object cbForceDownloadExtract: TCheckBox AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = cbLoadJsonLocally AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 77 Width = 236 BorderSpacing.Top = 2 Caption = ' Force download and extract of packages' ParentShowHint = False ShowHint = True TabOrder = 2 end object cbDeleteZipAfterInstall: TCheckBox AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = cbForceDownloadExtract AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 98 Width = 294 BorderSpacing.Top = 2 Caption = 'Delete downloaded zip files after installation/update' ParentShowHint = False ShowHint = True TabOrder = 3 end object lbUpdates: TLabel AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = Bevel1 Left = 6 Height = 15 Top = 220 Width = 146 BorderSpacing.Top = 5 Caption = 'Check for package updates:' ParentColor = False end object cbCheckForUpdates: TComboBox AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = lbUpdates AnchorSideTop.Side = asrBottom Left = 6 Height = 23 Top = 241 Width = 209 BorderSpacing.Top = 6 ItemHeight = 15 ItemIndex = 0 Items.Strings = ( 'Every few minutes' 'Every hour ' 'Once per day' 'Weekly' 'Montly' 'Never' ) Style = csDropDownList TabOrder = 7 Text = 'Every few minutes' end object lbLastUpdate: TLabel AnchorSideLeft.Control = cbCheckForUpdates AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cbCheckForUpdates AnchorSideTop.Side = asrCenter Left = 230 Height = 15 Top = 245 Width = 64 BorderSpacing.Left = 15 Caption = 'Last update:' ParentColor = False end object pnRepositories: TPanel AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = lbRemoteRepository AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnGeneral AnchorSideRight.Side = asrBottom Left = 6 Height = 23 Top = 27 Width = 612 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Top = 4 BorderSpacing.Right = 6 BevelOuter = bvNone ClientHeight = 23 ClientWidth = 612 TabOrder = 0 object cbRemoteRepository: TComboBox AnchorSideLeft.Control = pnRepositories AnchorSideTop.Control = pnRepositories AnchorSideRight.Control = bOpen Left = 0 Height = 23 Top = 0 Width = 587 Anchors = [akTop, akLeft, akRight] BorderSpacing.Right = 2 ItemHeight = 15 Style = csDropDownList TabOrder = 0 end object bOpen: TButton AnchorSideLeft.Control = cbRemoteRepository AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cbRemoteRepository AnchorSideRight.Control = pnRepositories AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = cbRemoteRepository AnchorSideBottom.Side = asrBottom Left = 589 Height = 23 Top = 0 Width = 23 Anchors = [akTop, akRight, akBottom] Caption = '...' OnClick = bOpenClick TabOrder = 1 end end object lbDaysToShowNewPackages: TLabel AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = cbCheckForUpdates AnchorSideTop.Side = asrBottom Left = 6 Height = 15 Top = 279 Width = 204 BorderSpacing.Top = 15 Caption = 'Show newly added packages for(days):' ParentColor = False end object spDaysToShowNewPackages: TSpinEdit AnchorSideLeft.Control = lbDaysToShowNewPackages AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = lbDaysToShowNewPackages AnchorSideTop.Side = asrCenter Left = 216 Height = 23 Top = 275 Width = 76 BorderSpacing.Left = 6 MaxValue = 365 TabOrder = 8 Value = 31 end object cbRegularIcons: TCheckBox AnchorSideLeft.Control = lbDaysToShowNewPackages AnchorSideTop.Control = lbDaysToShowNewPackages AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 304 Width = 232 BorderSpacing.Top = 10 Caption = 'Show regular icon for installed packages' TabOrder = 9 end object cbUseDefaultTheme: TCheckBox AnchorSideLeft.Control = lbDaysToShowNewPackages AnchorSideTop.Control = Bevel3 AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 462 Width = 116 BorderSpacing.Top = 7 Caption = 'Use default theme' TabOrder = 11 end object Bevel1: TBevel AnchorSideTop.Control = lbConTimeOut AnchorSideTop.Side = asrBottom Left = 0 Height = 2 Top = 215 Width = 620 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 25 end object Bevel2: TBevel AnchorSideTop.Control = cbRegularIcons AnchorSideTop.Side = asrBottom Left = 4 Height = 2 Top = 348 Width = 620 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 25 end object lbConTimeOut: TLabel AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = cbAlreadyInstalledPackages AnchorSideTop.Side = asrBottom Left = 6 Height = 15 Top = 175 Width = 164 BorderSpacing.Top = 16 Caption = 'Connection timeout(seconds): ' ParentColor = False ParentShowHint = False ShowHint = True end object spConTimeOut: TSpinEdit AnchorSideLeft.Control = lbConTimeOut AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = lbConTimeOut AnchorSideTop.Side = asrCenter Left = 176 Height = 23 Top = 171 Width = 55 BorderSpacing.Left = 6 MinValue = 1 TabOrder = 6 Value = 10 end object Bevel3: TBevel AnchorSideTop.Control = rbHintFormOptions AnchorSideTop.Side = asrBottom Left = 4 Height = 2 Top = 453 Width = 620 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 10 end object rbHintFormOptions: TRadioGroup AnchorSideTop.Control = Bevel2 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnGeneral AnchorSideRight.Side = asrBottom Left = 6 Height = 88 Top = 355 Width = 608 Anchors = [akTop, akLeft, akRight] AutoFill = True BorderSpacing.Top = 5 BorderSpacing.Right = 10 Caption = 'Options' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 68 ClientWidth = 604 ItemIndex = 0 Items.Strings = ( 'Behaves like a regular hint window' 'It''s triggered by SHIFT, moves with the mouse' 'Off' ) TabOrder = 10 object bColors: TButton AnchorSideTop.Control = rbHintFormOptions AnchorSideRight.Control = rbHintFormOptions AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = rbHintFormOptions AnchorSideBottom.Side = asrBottom Left = 489 Height = 26 Top = 21 Width = 105 Anchors = [akTop, akRight, akBottom] BorderSpacing.Top = 21 BorderSpacing.Right = 10 BorderSpacing.Bottom = 21 Caption = 'Colors' OnClick = bColorsClick TabOrder = 3 end end object cbIncompatiblePackages: TCheckBox AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = cbDeleteZipAfterInstall AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 119 Width = 227 BorderSpacing.Top = 2 Caption = 'Warn me about incompatible packages' ParentShowHint = False ShowHint = True TabOrder = 4 end object cbAlreadyInstalledPackages: TCheckBox AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = cbIncompatiblePackages AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 140 Width = 242 BorderSpacing.Top = 2 Caption = 'Warn me about already installed packages' ParentShowHint = False ShowHint = True TabOrder = 5 end object cbLoadJsonLocally: TCheckBox AnchorSideLeft.Control = lbRemoteRepository AnchorSideTop.Control = pnRepositories AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 56 Width = 230 BorderSpacing.Top = 6 Caption = 'If available, parse json from local source' ParentShowHint = False ShowHint = True TabOrder = 1 end end end object tsProxy: TTabSheet Caption = 'Proxy' ClientHeight = 470 ClientWidth = 615 object pnProxy: TPanel Left = 0 Height = 470 Top = 0 Width = 615 Align = alClient BevelOuter = bvNone ClientHeight = 470 ClientWidth = 615 ParentColor = False TabOrder = 0 object cbProxy: TCheckBox Left = 8 Height = 19 Top = 15 Width = 71 Caption = 'Use Proxy' OnChange = cbProxyChange TabOrder = 0 end object gbProxySettings: TGroupBox AnchorSideLeft.Control = cbProxy AnchorSideTop.Control = cbProxy AnchorSideTop.Side = asrBottom Left = 8 Height = 144 Top = 40 Width = 411 BorderSpacing.Top = 6 Caption = 'Proxy Settings' ClientHeight = 124 ClientWidth = 407 TabOrder = 1 object edProxyServer: TEdit AnchorSideLeft.Control = lbServer AnchorSideTop.Control = lbServer AnchorSideTop.Side = asrBottom Left = 8 Height = 23 Top = 22 Width = 304 BorderSpacing.Top = 4 OnKeyPress = edRemoteRepositoryKeyPress TabOrder = 0 Text = 'http://localhost/packages/' end object lbServer: TLabel Left = 8 Height = 15 Top = 3 Width = 32 Caption = 'Server' ParentColor = False end object lbUserName: TLabel AnchorSideLeft.Control = lbServer AnchorSideTop.Control = edProxyServer AnchorSideTop.Side = asrBottom Left = 8 Height = 15 Top = 51 Width = 53 BorderSpacing.Top = 6 Caption = 'Username' ParentColor = False end object edProxyUser: TEdit AnchorSideLeft.Control = lbUserName AnchorSideTop.Control = lbUserName AnchorSideTop.Side = asrBottom Left = 8 Height = 23 Top = 70 Width = 186 BorderSpacing.Top = 4 OnKeyPress = edRemoteRepositoryKeyPress TabOrder = 2 Text = 'username' end object lbPort: TLabel AnchorSideLeft.Control = seProxyPort AnchorSideTop.Control = lbServer Left = 318 Height = 15 Top = 3 Width = 22 Caption = 'Port' ParentColor = False end object lbPassword: TLabel AnchorSideLeft.Control = edProxyUser AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = lbUserName Left = 200 Height = 15 Top = 51 Width = 50 BorderSpacing.Left = 6 Caption = 'Password' ParentColor = False end object edProxyPassword: TEdit AnchorSideLeft.Control = lbPassword AnchorSideTop.Control = edProxyUser AnchorSideRight.Control = seProxyPort AnchorSideRight.Side = asrBottom Left = 200 Height = 23 Top = 70 Width = 193 Anchors = [akTop, akLeft, akRight] EchoMode = emPassword OnKeyPress = edRemoteRepositoryKeyPress PasswordChar = '*' TabOrder = 3 Text = 'password' end object seProxyPort: TSpinEdit AnchorSideLeft.Control = edProxyServer AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = edProxyServer Left = 318 Height = 23 Top = 22 Width = 75 BorderSpacing.Left = 6 MaxValue = 65635 TabOrder = 1 end end end end object tsOpenSSL: TTabSheet Caption = 'OpenSSL' ClientHeight = 470 ClientWidth = 615 object rbOpenSSL: TRadioGroup AnchorSideLeft.Control = tsOpenSSL AnchorSideTop.Control = tsOpenSSL AnchorSideRight.Control = tsOpenSSL AnchorSideRight.Side = asrBottom Left = 10 Height = 113 Top = 10 Width = 595 Anchors = [akTop, akLeft, akRight] AutoFill = True BorderSpacing.Left = 10 BorderSpacing.Top = 10 BorderSpacing.Right = 10 Caption = 'In order to work properly, OPM needs the OpenSSL libraries: "libeay32.dll" and "ssleay32.dll"' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 93 ClientWidth = 591 Items.Strings = ( 'Automatically download files' 'Show confirmation dialog before download' 'Never download files' ) TabOrder = 0 end end object tsFolders: TTabSheet Caption = 'Folders' ClientHeight = 470 ClientWidth = 615 object pnFolders: TPanel Left = 0 Height = 470 Top = 0 Width = 615 Align = alClient BevelOuter = bvNone ClientHeight = 470 ClientWidth = 615 ParentColor = False TabOrder = 0 object lbLocalRepositoryPackages: TLabel Left = 8 Height = 15 Top = 16 Width = 84 Caption = 'Local repository' ParentColor = False ParentShowHint = False end object lbLocalRepositoryArchive: TLabel AnchorSideLeft.Control = lbLocalRepositoryPackages AnchorSideTop.Control = edLocalRepositoryPackages AnchorSideTop.Side = asrBottom Left = 8 Height = 15 Top = 70 Width = 125 BorderSpacing.Top = 12 Caption = 'Local repository archive' ParentColor = False ParentShowHint = False end object lbLocalRepositoryUpdate: TLabel AnchorSideLeft.Control = lbLocalRepositoryPackages AnchorSideTop.Control = edLocalRepositoryArchive AnchorSideTop.Side = asrBottom Left = 8 Height = 15 Top = 124 Width = 124 BorderSpacing.Top = 12 Caption = 'Local repository update' ParentColor = False ParentShowHint = False end object edLocalRepositoryPackages: TDirectoryEdit AnchorSideLeft.Control = lbLocalRepositoryPackages AnchorSideTop.Control = lbLocalRepositoryPackages AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnFolders AnchorSideRight.Side = asrBottom Left = 8 Height = 23 Top = 35 Width = 601 Directory = 'edLocalRepositoryPackages' ShowHidden = False ButtonWidth = 23 NumGlyphs = 1 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 4 BorderSpacing.Right = 6 MaxLength = 0 ParentShowHint = False ShowHint = True TabOrder = 0 OnButtonClick = edLocalRepositoryPackagesButtonClick Text = 'edLocalRepositoryPackages' end object edLocalRepositoryArchive: TDirectoryEdit Tag = 1 AnchorSideLeft.Control = lbLocalRepositoryArchive AnchorSideTop.Control = lbLocalRepositoryArchive AnchorSideTop.Side = asrBottom AnchorSideRight.Control = edLocalRepositoryPackages AnchorSideRight.Side = asrBottom Left = 8 Height = 23 Top = 89 Width = 601 ShowHidden = False ButtonWidth = 23 NumGlyphs = 1 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 4 MaxLength = 0 ParentShowHint = False ShowHint = True TabOrder = 1 OnButtonClick = edLocalRepositoryPackagesButtonClick end object edLocalRepositoryUpdate: TDirectoryEdit Tag = 2 AnchorSideLeft.Control = lbLocalRepositoryUpdate AnchorSideTop.Control = lbLocalRepositoryUpdate AnchorSideTop.Side = asrBottom AnchorSideRight.Control = edLocalRepositoryArchive AnchorSideRight.Side = asrBottom Left = 8 Height = 23 Top = 143 Width = 601 ShowHidden = False ButtonWidth = 23 NumGlyphs = 1 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 4 MaxLength = 0 ParentShowHint = False ShowHint = True TabOrder = 2 OnButtonClick = edLocalRepositoryPackagesButtonClick end end end object tsProfiles: TTabSheet Caption = 'Profiles' ClientHeight = 470 ClientWidth = 615 object pnProfiles: TPanel Left = 0 Height = 470 Top = 0 Width = 615 Align = alClient BevelOuter = bvNone ClientHeight = 470 ClientWidth = 615 ParentColor = False TabOrder = 0 object pnProfilesTop: TPanel Left = 0 Height = 48 Top = 0 Width = 615 Align = alTop BevelOuter = bvNone ClientHeight = 48 ClientWidth = 615 TabOrder = 0 OnResize = pnProfilesTopResize object lbSelectProfile: TLabel Left = 8 Height = 15 Top = 15 Width = 68 Caption = 'Select profile' ParentColor = False end object cbSelectProfile: TComboBox AnchorSideLeft.Control = lbSelectProfile AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = lbSelectProfile AnchorSideTop.Side = asrCenter Left = 82 Height = 23 Top = 11 Width = 192 BorderSpacing.Left = 6 ItemHeight = 15 ItemIndex = 0 Items.Strings = ( 'Regular user' 'Package maintainer' ) OnChange = cbSelectProfileChange ParentShowHint = False ShowHint = True Style = csDropDownList TabOrder = 0 Text = 'Regular user' end end object pnProfilesMain: TPanel Left = 0 Height = 422 Top = 48 Width = 615 Align = alClient BevelOuter = bvNone ClientHeight = 422 ClientWidth = 615 TabOrder = 1 OnResize = pnProfilesMainResize object pnProfilesLeft: TPanel AnchorSideLeft.Control = pnProfilesMain AnchorSideTop.Control = pnProfilesMain Left = 0 Height = 422 Top = 0 Width = 282 Align = alLeft BevelOuter = bvNone ClientHeight = 422 ClientWidth = 282 TabOrder = 0 object lbExcludeFiles: TListBox AnchorSideLeft.Control = lbFilterFiles AnchorSideTop.Control = lbFilterFiles AnchorSideTop.Side = asrBottom AnchorSideRight.Control = bFilesAdd AnchorSideBottom.Control = pnProfilesLeft AnchorSideBottom.Side = asrBottom Left = 6 Height = 393 Top = 23 Width = 190 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Top = 4 BorderSpacing.Right = 6 BorderSpacing.Bottom = 6 ItemHeight = 0 ParentShowHint = False ScrollWidth = 151 ShowHint = True Sorted = True TabOrder = 0 end object lbFilterFiles: TLabel AnchorSideLeft.Control = pnProfilesLeft AnchorSideTop.Control = pnProfilesLeft Left = 6 Height = 15 Top = 4 Width = 117 BorderSpacing.Left = 6 BorderSpacing.Top = 4 Caption = 'Exclude file extensions' ParentColor = False end object bFilesAdd: TButton AnchorSideTop.Control = lbExcludeFiles AnchorSideRight.Control = pnProfilesLeft AnchorSideRight.Side = asrBottom Left = 202 Height = 25 Top = 23 Width = 80 Anchors = [akTop, akRight] AutoSize = True Caption = 'Add' Constraints.MinWidth = 80 OnClick = bFilesAddClick TabOrder = 1 end object bFilesEdit: TButton AnchorSideLeft.Control = bFilesAdd AnchorSideTop.Control = bFilesAdd AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnProfilesLeft AnchorSideRight.Side = asrBottom Left = 202 Height = 25 Top = 52 Width = 80 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Top = 4 Caption = 'Edit' OnClick = bFilesEditClick TabOrder = 2 end object bFilesDelete: TButton AnchorSideLeft.Control = bFilesAdd AnchorSideTop.Control = bFilesEdit AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnProfilesLeft AnchorSideRight.Side = asrBottom Left = 202 Height = 25 Top = 81 Width = 80 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Top = 4 Caption = 'Delete' OnClick = bFilesDeleteClick TabOrder = 3 end end object pnProfilesRight: TPanel Left = 282 Height = 422 Top = 0 Width = 327 Align = alClient BorderSpacing.Right = 6 BevelOuter = bvNone ClientHeight = 422 ClientWidth = 327 TabOrder = 1 object lbExcludeFolders: TListBox AnchorSideLeft.Control = lbFilterDirs AnchorSideTop.Control = lbFilterDirs AnchorSideTop.Side = asrBottom AnchorSideRight.Control = bFoldersAdd AnchorSideBottom.Control = pnProfilesRight AnchorSideBottom.Side = asrBottom Left = 6 Height = 393 Top = 23 Width = 235 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Top = 4 BorderSpacing.Right = 6 BorderSpacing.Bottom = 6 ItemHeight = 0 ParentShowHint = False ScrollWidth = 160 ShowHint = True Sorted = True TabOrder = 0 end object lbFilterDirs: TLabel AnchorSideLeft.Control = pnProfilesRight AnchorSideTop.Control = pnProfilesRight Left = 6 Height = 15 Top = 4 Width = 79 BorderSpacing.Left = 6 BorderSpacing.Top = 4 Caption = 'Exclude folders' ParentColor = False end object bFoldersAdd: TButton Tag = 1 AnchorSideTop.Control = lbExcludeFolders AnchorSideRight.Control = pnProfilesRight AnchorSideRight.Side = asrBottom Left = 247 Height = 25 Top = 23 Width = 80 Anchors = [akTop, akRight] AutoSize = True Caption = 'Add' Constraints.MinWidth = 80 OnClick = bFilesAddClick TabOrder = 1 end object bFoldersEdit: TButton Tag = 1 AnchorSideLeft.Control = bFoldersAdd AnchorSideTop.Control = bFoldersAdd AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnProfilesRight AnchorSideRight.Side = asrBottom Left = 247 Height = 25 Top = 52 Width = 80 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Top = 4 Caption = 'Edit' OnClick = bFilesEditClick TabOrder = 2 end object bFoldersDelete: TButton Tag = 1 AnchorSideLeft.Control = bFoldersAdd AnchorSideTop.Control = bFoldersEdit AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnProfilesRight AnchorSideRight.Side = asrBottom Left = 247 Height = 25 Top = 81 Width = 80 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Top = 4 Caption = 'Delete' OnClick = bFilesDeleteClick TabOrder = 3 end end end end end end object SDD: TSelectDirectoryDialog left = 448 top = 280 end end