mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-15 18:02:42 +02:00
805 lines
24 KiB
Plaintext
805 lines
24 KiB
Plaintext
object OptionsFrm: TOptionsFrm
|
|
Left = 719
|
|
Height = 408
|
|
Top = 228
|
|
Width = 525
|
|
BorderIcons = [biSystemMenu]
|
|
Caption = 'Options'
|
|
ClientHeight = 408
|
|
ClientWidth = 525
|
|
Color = clBtnFace
|
|
Constraints.MinHeight = 300
|
|
Constraints.MinWidth = 475
|
|
KeyPreview = True
|
|
OnKeyPress = FormKeyPress
|
|
PopupMode = pmExplicit
|
|
Position = poOwnerFormCenter
|
|
LCLVersion = '1.7'
|
|
object pnBottom: TPanel
|
|
Left = 0
|
|
Height = 31
|
|
Top = 377
|
|
Width = 525
|
|
Align = alBottom
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 31
|
|
ClientWidth = 525
|
|
TabOrder = 1
|
|
object bOk: TButton
|
|
AnchorSideRight.Control = bCancel
|
|
AnchorSideBottom.Control = bRestore
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 353
|
|
Height = 25
|
|
Top = 0
|
|
Width = 80
|
|
Anchors = [akTop, akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 6
|
|
Caption = 'OK'
|
|
Constraints.MinWidth = 80
|
|
OnClick = bOkClick
|
|
TabOrder = 1
|
|
end
|
|
object bCancel: TButton
|
|
AnchorSideRight.Control = pnBottom
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = bRestore
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 439
|
|
Height = 25
|
|
Top = 0
|
|
Width = 80
|
|
Anchors = [akTop, akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 6
|
|
Caption = 'Cancel'
|
|
Constraints.MinWidth = 80
|
|
ModalResult = 2
|
|
TabOrder = 2
|
|
end
|
|
object bRestore: TButton
|
|
AnchorSideLeft.Control = pnBottom
|
|
AnchorSideBottom.Control = pnBottom
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 6
|
|
Height = 25
|
|
Top = 0
|
|
Width = 110
|
|
Anchors = [akTop, akLeft, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Bottom = 6
|
|
Caption = 'Restore defaults'
|
|
OnClick = bRestoreClick
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object pgOptions: TPageControl
|
|
Left = 6
|
|
Height = 365
|
|
Top = 6
|
|
Width = 513
|
|
ActivePage = tsGeneral
|
|
Align = alClient
|
|
BorderSpacing.Around = 6
|
|
TabIndex = 0
|
|
TabOrder = 0
|
|
object tsGeneral: TTabSheet
|
|
Caption = 'General'
|
|
ClientHeight = 337
|
|
ClientWidth = 505
|
|
object pnGeneral: TPanel
|
|
Left = 0
|
|
Height = 336
|
|
Top = 0
|
|
Width = 505
|
|
Align = alClient
|
|
BorderSpacing.Bottom = 1
|
|
BevelOuter = bvNone
|
|
ClientHeight = 336
|
|
ClientWidth = 505
|
|
Color = clBtnFace
|
|
ParentColor = False
|
|
TabOrder = 0
|
|
object lbRemoteRepository: TLabel
|
|
AnchorSideLeft.Control = pnGeneral
|
|
Left = 6
|
|
Height = 15
|
|
Top = 16
|
|
Width = 100
|
|
BorderSpacing.Left = 6
|
|
Caption = 'Remote repository:'
|
|
ParentColor = False
|
|
end
|
|
object cbForceDownloadExtract: TCheckBox
|
|
AnchorSideLeft.Control = lbRemoteRepository
|
|
AnchorSideTop.Control = pnRepositories
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 19
|
|
Top = 64
|
|
Width = 235
|
|
BorderSpacing.Top = 6
|
|
Caption = ' Force download and extract of packages'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
end
|
|
object cbDeleteZipAfterInstall: TCheckBox
|
|
AnchorSideLeft.Control = lbRemoteRepository
|
|
AnchorSideTop.Control = cbForceDownloadExtract
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 19
|
|
Top = 85
|
|
Width = 294
|
|
BorderSpacing.Top = 2
|
|
Caption = 'Delete downloaded zip files after installation/update'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 2
|
|
end
|
|
object lbUpdates: TLabel
|
|
AnchorSideLeft.Control = lbRemoteRepository
|
|
Left = 6
|
|
Height = 15
|
|
Top = 144
|
|
Width = 146
|
|
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 = 165
|
|
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 = 3
|
|
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 = 169
|
|
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 = 35
|
|
Width = 493
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Right = 6
|
|
BevelOuter = bvNone
|
|
ClientHeight = 23
|
|
ClientWidth = 493
|
|
TabOrder = 0
|
|
object cbRemoteRepository: TComboBox
|
|
AnchorSideLeft.Control = pnRepositories
|
|
AnchorSideTop.Control = pnRepositories
|
|
AnchorSideRight.Control = bOpen
|
|
Left = 0
|
|
Height = 23
|
|
Top = 0
|
|
Width = 430
|
|
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 = 432
|
|
Height = 22
|
|
Top = 0
|
|
Width = 61
|
|
Anchors = [akTop, akRight, akBottom]
|
|
BorderSpacing.Bottom = 1
|
|
Caption = '...'
|
|
OnClick = bOpenClick
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object lbDaysToShowNewPackages: TLabel
|
|
AnchorSideLeft.Control = lbRemoteRepository
|
|
Left = 6
|
|
Height = 15
|
|
Top = 216
|
|
Width = 204
|
|
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 = 212
|
|
Width = 76
|
|
BorderSpacing.Left = 6
|
|
MaxValue = 365
|
|
TabOrder = 4
|
|
Value = 31
|
|
end
|
|
object cbRegularIcons: TCheckBox
|
|
Left = 6
|
|
Height = 19
|
|
Top = 240
|
|
Width = 232
|
|
Caption = 'Show regular icon for installed packages'
|
|
TabOrder = 5
|
|
end
|
|
end
|
|
end
|
|
object tsProxy: TTabSheet
|
|
Caption = 'Proxy'
|
|
ClientHeight = 330
|
|
ClientWidth = 509
|
|
object pnProxy: TPanel
|
|
Left = 0
|
|
Height = 342
|
|
Top = 0
|
|
Width = 521
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
ClientHeight = 342
|
|
ClientWidth = 521
|
|
Color = clBtnFace
|
|
ParentColor = False
|
|
TabOrder = 0
|
|
object cbProxy: TCheckBox
|
|
Left = 8
|
|
Height = 24
|
|
Top = 15
|
|
Width = 93
|
|
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 = 45
|
|
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 = 27
|
|
Top = 24
|
|
Width = 304
|
|
BorderSpacing.Top = 4
|
|
OnKeyPress = edRemoteRepositoryKeyPress
|
|
TabOrder = 0
|
|
Text = 'http://localhost/packages/'
|
|
end
|
|
object lbServer: TLabel
|
|
Left = 8
|
|
Height = 17
|
|
Top = 3
|
|
Width = 43
|
|
Caption = 'Server'
|
|
ParentColor = False
|
|
end
|
|
object lbUserName: TLabel
|
|
AnchorSideLeft.Control = lbServer
|
|
AnchorSideTop.Control = edProxyServer
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 8
|
|
Height = 17
|
|
Top = 57
|
|
Width = 68
|
|
BorderSpacing.Top = 6
|
|
Caption = 'Username'
|
|
ParentColor = False
|
|
end
|
|
object edProxyUser: TEdit
|
|
AnchorSideLeft.Control = lbUserName
|
|
AnchorSideTop.Control = lbUserName
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 8
|
|
Height = 27
|
|
Top = 78
|
|
Width = 186
|
|
BorderSpacing.Top = 4
|
|
OnKeyPress = edRemoteRepositoryKeyPress
|
|
TabOrder = 2
|
|
Text = 'username'
|
|
end
|
|
object lbPort: TLabel
|
|
AnchorSideLeft.Control = seProxyPort
|
|
AnchorSideTop.Control = lbServer
|
|
Left = 318
|
|
Height = 17
|
|
Top = 3
|
|
Width = 30
|
|
Caption = 'Port'
|
|
ParentColor = False
|
|
end
|
|
object lbPassword: TLabel
|
|
AnchorSideLeft.Control = edProxyUser
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = lbUserName
|
|
Left = 200
|
|
Height = 17
|
|
Top = 57
|
|
Width = 66
|
|
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 = 27
|
|
Top = 78
|
|
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 = 27
|
|
Top = 24
|
|
Width = 75
|
|
BorderSpacing.Left = 6
|
|
MaxValue = 65635
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object tsFolders: TTabSheet
|
|
Caption = 'Folders'
|
|
ClientHeight = 330
|
|
ClientWidth = 509
|
|
object pnFolders: TPanel
|
|
Left = 0
|
|
Height = 298
|
|
Top = 0
|
|
Width = 521
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
ClientHeight = 298
|
|
ClientWidth = 521
|
|
Color = clBtnFace
|
|
ParentColor = False
|
|
TabOrder = 0
|
|
object lbLocalRepositoryPackages: TLabel
|
|
Left = 8
|
|
Height = 17
|
|
Top = 16
|
|
Width = 110
|
|
Caption = 'Local repository'
|
|
ParentColor = False
|
|
ParentShowHint = False
|
|
end
|
|
object lbLocalRepositoryArchive: TLabel
|
|
AnchorSideLeft.Control = lbLocalRepositoryPackages
|
|
AnchorSideTop.Control = edLocalRepositoryPackages
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 8
|
|
Height = 17
|
|
Top = 76
|
|
Width = 161
|
|
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 = 17
|
|
Top = 136
|
|
Width = 161
|
|
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 = 27
|
|
Top = 37
|
|
Width = 507
|
|
Directory = 'edLocalRepositoryPackages'
|
|
ShowHidden = False
|
|
ButtonWidth = 50
|
|
NumGlyphs = 1
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Right = 6
|
|
MaxLength = 0
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 0
|
|
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 = 27
|
|
Top = 97
|
|
Width = 507
|
|
ShowHidden = False
|
|
ButtonWidth = 50
|
|
NumGlyphs = 1
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 4
|
|
MaxLength = 0
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
end
|
|
object edLocalRepositoryUpdate: TDirectoryEdit
|
|
Tag = 2
|
|
AnchorSideLeft.Control = lbLocalRepositoryUpdate
|
|
AnchorSideTop.Control = lbLocalRepositoryUpdate
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = edLocalRepositoryArchive
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 8
|
|
Height = 27
|
|
Top = 157
|
|
Width = 507
|
|
ShowHidden = False
|
|
ButtonWidth = 50
|
|
NumGlyphs = 1
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 4
|
|
MaxLength = 0
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
end
|
|
object tsProfiles: TTabSheet
|
|
Caption = 'Profiles'
|
|
ClientHeight = 337
|
|
ClientWidth = 505
|
|
object pnProfiles: TPanel
|
|
Left = 0
|
|
Height = 337
|
|
Top = 0
|
|
Width = 505
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
ClientHeight = 337
|
|
ClientWidth = 505
|
|
Color = clBtnFace
|
|
ParentColor = False
|
|
TabOrder = 0
|
|
object pnProfilesTop: TPanel
|
|
Left = 0
|
|
Height = 48
|
|
Top = 0
|
|
Width = 505
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
ClientHeight = 48
|
|
ClientWidth = 505
|
|
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 = 289
|
|
Top = 48
|
|
Width = 505
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
ClientHeight = 289
|
|
ClientWidth = 505
|
|
TabOrder = 1
|
|
OnResize = pnProfilesMainResize
|
|
object pnProfilesLeft: TPanel
|
|
AnchorSideLeft.Control = pnProfilesMain
|
|
AnchorSideTop.Control = pnProfilesMain
|
|
Left = 0
|
|
Height = 289
|
|
Top = 0
|
|
Width = 245
|
|
Align = alLeft
|
|
BevelOuter = bvNone
|
|
ClientHeight = 289
|
|
ClientWidth = 245
|
|
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 = 260
|
|
Top = 23
|
|
Width = 153
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Right = 6
|
|
BorderSpacing.Bottom = 6
|
|
Color = clBtnFace
|
|
ItemHeight = 0
|
|
Options = [lboDrawFocusRect]
|
|
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 = 165
|
|
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 = 165
|
|
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 = 165
|
|
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 = 245
|
|
Height = 289
|
|
Top = 0
|
|
Width = 254
|
|
Align = alClient
|
|
BorderSpacing.Right = 6
|
|
BevelOuter = bvNone
|
|
ClientHeight = 289
|
|
ClientWidth = 254
|
|
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 = 260
|
|
Top = 23
|
|
Width = 162
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Right = 6
|
|
BorderSpacing.Bottom = 6
|
|
Color = clBtnFace
|
|
ItemHeight = 0
|
|
Options = [lboDrawFocusRect]
|
|
ParentShowHint = False
|
|
ScrollWidth = 164
|
|
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 = 174
|
|
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 = 174
|
|
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 = 174
|
|
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
|