initial commit moved from svn

This commit is contained in:
fatalerrors
2022-10-24 22:07:20 +02:00
parent b2caa19213
commit 0e96f4f5e4
229 changed files with 20039 additions and 0 deletions

723
frmoptions.lfm Normal file
View File

@@ -0,0 +1,723 @@
object OptionsForm: TOptionsForm
Left = 4276
Height = 504
Top = 546
Width = 523
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'OptionsForm'
ClientHeight = 504
ClientWidth = 523
Color = clForm
DesignTimePPI = 108
OnCreate = FormCreate
Position = poMainFormCenter
LCLVersion = '1.9.0.0'
object btnOk: TBitBtn
Tag = 22
Left = 406
Height = 34
Top = 459
Width = 106
Anchors = [akRight, akBottom]
Caption = 'OK'
Default = True
ModalResult = 1
ParentFont = False
TabOrder = 0
end
object btnCancel: TBitBtn
Tag = 23
Left = 289
Height = 34
Top = 459
Width = 106
Anchors = [akRight, akBottom]
Caption = '&Cancel'
ModalResult = 2
ParentFont = False
TabOrder = 1
end
object pcMain: TPageControl
Left = 9
Height = 443
Top = 9
Width = 503
ActivePage = tsAppearance
Anchors = [akTop, akLeft, akRight, akBottom]
ParentFont = False
TabIndex = 0
TabOrder = 2
object tsAppearance: TTabSheet
Caption = 'Appearance'
ClientHeight = 411
ClientWidth = 499
ParentFont = False
object GroupBox3: TGroupBox
Left = 8
Height = 80
Top = 8
Width = 472
Caption = 'Icons'
ClientHeight = 48
ClientWidth = 468
ParentFont = False
TabOrder = 0
object Label4: TLabel
Left = 12
Height = 20
Top = 14
Width = 75
Caption = 'Icon theme:'
ParentColor = False
ParentFont = False
end
object cbIconTheme: TComboBox
Left = 93
Height = 34
Top = 9
Width = 342
ItemHeight = 20
OnChange = cbIconThemeChange
ParentFont = False
Style = csDropDownList
TabOrder = 0
end
end
object pcColors: TPageControl
Left = 8
Height = 290
Top = 104
Width = 472
ActivePage = TabSheet2
ParentFont = False
TabIndex = 1
TabOrder = 1
object TabSheet1: TTabSheet
Caption = 'Blocs colors'
ClientHeight = 229
ClientWidth = 400
ParentFont = False
object pnSBloc: TPanel
Left = 4
Height = 27
Top = 8
Width = 108
Caption = 'Bloc S'
ParentFont = False
TabOrder = 0
end
object pnPBloc: TPanel
Left = 4
Height = 27
Top = 35
Width = 108
Caption = 'Bloc P'
ParentFont = False
TabOrder = 1
end
object pnFBloc: TPanel
Left = 4
Height = 27
Top = 62
Width = 108
Caption = 'Bloc F'
ParentFont = False
TabOrder = 2
end
object pnDBloc: TPanel
Left = 4
Height = 27
Top = 89
Width = 108
Caption = 'Bloc D'
ParentFont = False
TabOrder = 3
end
object btnSBlocBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 8
Width = 156
Caption = 'Background'
OnClick = btnSBlocBGClick
ParentFont = False
TabOrder = 4
end
object btnSBlocFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 8
Width = 156
Caption = 'Foreground'
OnClick = btnSBlocFGClick
ParentFont = False
TabOrder = 5
end
object btnPBlocBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 35
Width = 156
Caption = 'Background'
OnClick = btnPBlocBGClick
ParentFont = False
TabOrder = 6
end
object btnPBlocFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 35
Width = 156
Caption = 'Foreground'
OnClick = btnPBlocFGClick
ParentFont = False
TabOrder = 7
end
object btnFBlocBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 62
Width = 156
Caption = 'Background'
OnClick = btnFBlocBGClick
ParentFont = False
TabOrder = 8
end
object btnFBlocFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 62
Width = 156
Caption = 'Foreground'
OnClick = btnFBlocFGClick
ParentFont = False
TabOrder = 9
end
object btnDBlocBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 89
Width = 156
Caption = 'Background'
OnClick = btnDBlocBGClick
ParentFont = False
TabOrder = 10
end
object btnDBlocFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 89
Width = 156
Caption = 'Foreground'
OnClick = btnDBlocFGClick
ParentFont = False
TabOrder = 11
end
end
object TabSheet2: TTabSheet
Caption = 'Family colors'
ClientHeight = 258
ClientWidth = 468
ParentFont = False
object pnAlkaline: TPanel
Left = 4
Height = 27
Top = 8
Width = 108
Caption = 'Alkaline'
ParentFont = False
TabOrder = 0
end
object pnAlkalieMetal: TPanel
Left = 4
Height = 27
Top = 35
Width = 108
Caption = 'Alkalie metal'
ParentFont = False
TabOrder = 1
end
object pnMetalloid: TPanel
Left = 4
Height = 27
Top = 62
Width = 108
Caption = 'Metalloid'
ParentFont = False
TabOrder = 2
end
object pnTransMetal: TPanel
Left = 4
Height = 27
Top = 89
Width = 108
Caption = 'Transition metal'
ParentFont = False
TabOrder = 3
end
object btnAlkalineBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 8
Width = 156
Caption = 'Background'
OnClick = btnAlkalineBGClick
ParentFont = False
TabOrder = 4
end
object btnAlkalieMetalBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 35
Width = 156
Caption = 'Background'
OnClick = btnAlkalieMetalBGClick
ParentFont = False
TabOrder = 5
end
object btnMetalloidBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 62
Width = 156
Caption = 'Background'
OnClick = btnMetalloidBGClick
ParentFont = False
TabOrder = 6
end
object btnTransMetalBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 89
Width = 156
Caption = 'Background'
OnClick = btnTransMetalBGClick
ParentFont = False
TabOrder = 7
end
object btnAlkalineFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 8
Width = 156
Caption = 'Foreground'
OnClick = btnAlkalineFGClick
ParentFont = False
TabOrder = 8
end
object btnAlkalieMetalFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 35
Width = 156
Caption = 'Foreground'
OnClick = btnAlkalieMetalFGClick
ParentFont = False
TabOrder = 9
end
object btnMetalloidFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 62
Width = 156
Caption = 'Foreground'
OnClick = btnMetalloidFGClick
ParentFont = False
TabOrder = 10
end
object btnTransMetalFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 89
Width = 156
Caption = 'Foreground'
OnClick = btnTransMetalFGClick
ParentFont = False
TabOrder = 11
end
object pnOtherMetal: TPanel
Left = 4
Height = 27
Top = 116
Width = 108
Caption = 'Other metal'
ParentFont = False
TabOrder = 12
end
object btnOtherMetalBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 116
Width = 156
Caption = 'Background'
OnClick = btnOtherMetalBGClick
ParentFont = False
TabOrder = 13
end
object btnOtherMetalFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 116
Width = 156
Caption = 'Foreground'
OnClick = btnOtherMetalFGClick
ParentFont = False
TabOrder = 14
end
object pnNonMetal: TPanel
Left = 4
Height = 27
Top = 143
Width = 108
Caption = 'Non metal'
ParentFont = False
TabOrder = 15
end
object btnNonMetalBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 143
Width = 156
Caption = 'Background'
OnClick = btnNonMetalBGClick
ParentFont = False
TabOrder = 16
end
object btnNonMetalFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 143
Width = 156
Caption = 'Foreground'
OnClick = btnNonMetalFGClick
ParentFont = False
TabOrder = 17
end
object pnHalogen: TPanel
Left = 4
Height = 27
Top = 170
Width = 108
Caption = 'Halogen'
ParentFont = False
TabOrder = 18
end
object btnHalogenBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 170
Width = 156
Caption = 'Background'
OnClick = btnHalogenBGClick
ParentFont = False
TabOrder = 19
end
object btnHalogenFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 170
Width = 156
Caption = 'Foreground'
OnClick = btnHalogenFGClick
ParentFont = False
TabOrder = 20
end
object pnNobleGas: TPanel
Left = 4
Height = 27
Top = 197
Width = 108
Caption = 'Noble gas'
ParentFont = False
TabOrder = 21
end
object btnNobleGasBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 197
Width = 156
Caption = 'Background'
OnClick = btnNobleGasBGClick
ParentFont = False
TabOrder = 22
end
object btnNobleGasFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 197
Width = 156
Caption = 'Foreground'
OnClick = btnNobleGasFGClick
ParentFont = False
TabOrder = 23
end
object pnRareEarth: TPanel
Left = 4
Height = 27
Top = 224
Width = 108
Caption = 'Rare earth'
ParentFont = False
TabOrder = 24
end
object btnRareEarthBG: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 224
Width = 156
Caption = 'Background'
OnClick = btnRareEarthBGClick
ParentFont = False
TabOrder = 25
end
object btnRareEarthFG: TBitBtn
Tag = -1
Left = 284
Height = 27
Top = 224
Width = 156
Caption = 'Foreground'
OnClick = btnRareEarthFGClick
ParentFont = False
TabOrder = 26
end
end
object TabSheet3: TTabSheet
Caption = 'Gradients color'
ClientHeight = 229
ClientWidth = 400
ParentFont = False
object pnMinGrad: TPanel
Left = 4
Height = 27
Top = 8
Width = 108
Caption = 'Min value'
ParentFont = False
TabOrder = 0
end
object pnMaxGrad: TPanel
Left = 4
Height = 27
Top = 35
Width = 108
Caption = 'Max value'
ParentFont = False
TabOrder = 1
end
object pnUnknowGrad: TPanel
Left = 4
Height = 27
Top = 62
Width = 108
Caption = 'Unknown'
ParentFont = False
TabOrder = 2
end
object btnMinGrad: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 8
Width = 156
Caption = 'Background'
OnClick = btnMinGradClick
ParentFont = False
TabOrder = 3
end
object btnMaxGrad: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 35
Width = 156
Caption = 'Background'
OnClick = btnMaxGradClick
ParentFont = False
TabOrder = 4
end
object btnUnknowGrad: TBitBtn
Tag = -1
Left = 122
Height = 27
Top = 62
Width = 156
Caption = 'Background'
OnClick = btnUnknowGradClick
ParentFont = False
TabOrder = 5
end
object btnTextGrad: TBitBtn
Tag = -1
Left = 284
Height = 81
Top = 8
Width = 156
Caption = 'Foreground'
OnClick = btnTextGradClick
ParentFont = False
TabOrder = 6
end
end
end
end
object tsAdvanced: TTabSheet
Caption = 'Advanced'
ClientHeight = 411
ClientWidth = 499
ParentFont = False
object GroupBox1: TGroupBox
Left = 4
Height = 160
Top = 8
Width = 480
Anchors = [akTop, akLeft, akRight]
Caption = 'Paths'
ClientHeight = 128
ClientWidth = 476
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 10
Height = 20
Top = 2
Width = 102
Caption = 'Home directory:'
ParentColor = False
ParentFont = False
end
object DirectoryEdit1: TDirectoryEdit
Left = 10
Height = 34
Top = 24
Width = 452
ShowHidden = False
ButtonWidth = 26
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
MaxLength = 0
ParentFont = False
TabOrder = 0
end
object DirectoryEdit2: TDirectoryEdit
Left = 10
Height = 34
Top = 92
Width = 452
ShowHidden = False
ButtonWidth = 26
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
MaxLength = 0
ParentFont = False
TabOrder = 1
end
object Label2: TLabel
Left = 10
Height = 20
Top = 70
Width = 122
Caption = 'Database directory:'
ParentColor = False
ParentFont = False
end
end
object GroupBox2: TGroupBox
Left = 4
Height = 130
Top = 184
Width = 480
Anchors = [akTop, akLeft, akRight]
Caption = 'Backup'
ClientHeight = 98
ClientWidth = 476
ParentFont = False
TabOrder = 1
object CheckBox1: TCheckBox
Left = 10
Height = 24
Top = 8
Width = 304
Caption = 'Create backup of the database before saving'
ParentFont = False
TabOrder = 0
end
object Label3: TLabel
Left = 10
Height = 20
Top = 40
Width = 83
Caption = 'Backup path:'
ParentColor = False
ParentFont = False
end
object DirectoryEdit3: TDirectoryEdit
Left = 10
Height = 34
Top = 61
Width = 452
ShowHidden = False
ButtonWidth = 26
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
MaxLength = 0
ParentFont = False
TabOrder = 1
end
end
end
end
object ColorDialog: TColorDialog
Color = clBlack
CustomColors.Strings = (
'ColorA=000000'
'ColorB=000080'
'ColorC=008000'
'ColorD=008080'
'ColorE=800000'
'ColorF=800080'
'ColorG=808000'
'ColorH=808080'
'ColorI=C0C0C0'
'ColorJ=0000FF'
'ColorK=00FF00'
'ColorL=00FFFF'
'ColorM=FF0000'
'ColorN=FF00FF'
'ColorO=FFFF00'
'ColorP=FFFFFF'
'ColorQ=C0DCC0'
'ColorR=F0CAA6'
'ColorS=F0FBFF'
'ColorT=A4A0A0'
)
left = 224
top = 472
end
end