object TableForm: TTableForm Left = 2560 Height = 620 Hint = 'Calcul de masse molaire (c) 1997-2000 Geoffray BRANDIN.' Top = 566 Width = 1029 ActiveControl = PageControl1 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'YaPeTaVi - Yet another Periodic Table Viewer' ClientHeight = 588 ClientWidth = 1029 Constraints.MaxHeight = 620 Constraints.MaxWidth = 1029 Constraints.MinHeight = 620 Constraints.MinWidth = 1029 DesignTimePPI = 108 Menu = MainMenu OnCreate = FormCreate OnShow = FormShow Position = poDefault ShowInTaskBar = stAlways LCLVersion = '1.9.0.0' Visible = True object PageControl1: TPageControl Left = 8 Height = 568 Top = 8 Width = 1012 ActivePage = tsTable Anchors = [akTop, akLeft, akRight, akBottom] ParentFont = False TabIndex = 0 TabOrder = 0 object tsTable: TTabSheet Caption = ' Mendeleev Table' ClientHeight = 536 ClientWidth = 1008 OnMouseMove = tsTableMouseMove ParentFont = False object lbContextInfo: TLabel Left = 304 Height = 20 Top = 45 Width = 91 Caption = 'lbContextInfo' Font.Style = [fsBold] ParentColor = False ParentFont = False end object pnH: TPanel Tag = 1 Left = 14 Height = 45 Top = 37 Width = 36 Caption = 'H' Color = clNavy ParentColor = False ParentFont = False TabOrder = 0 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnLi: TPanel Left = 14 Height = 45 Top = 82 Width = 36 Caption = 'Li' Color = clNavy ParentColor = False ParentFont = False TabOrder = 1 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnBe: TPanel Left = 50 Height = 45 Top = 82 Width = 36 Caption = 'Be' Color = clNavy ParentColor = False ParentFont = False TabOrder = 2 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnNa: TPanel Left = 14 Height = 45 Top = 127 Width = 36 Caption = 'Na' Color = clNavy ParentColor = False ParentFont = False TabOrder = 3 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnMg: TPanel Left = 50 Height = 45 Top = 127 Width = 36 Caption = 'Mg' Color = clNavy ParentColor = False ParentFont = False TabOrder = 4 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnK: TPanel Left = 14 Height = 45 Top = 172 Width = 36 Caption = 'K' Color = clNavy ParentColor = False ParentFont = False TabOrder = 5 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCs: TPanel Left = 14 Height = 45 Top = 262 Width = 36 Caption = 'Cs' Color = clNavy ParentColor = False ParentFont = False TabOrder = 6 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnFr: TPanel Left = 14 Height = 45 Top = 307 Width = 36 Caption = 'Fr' Color = clNavy ParentColor = False ParentFont = False TabOrder = 7 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnRb: TPanel Left = 14 Height = 45 Top = 217 Width = 36 Caption = 'Rb' Color = clNavy ParentColor = False ParentFont = False TabOrder = 8 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCa: TPanel Left = 50 Height = 45 Top = 172 Width = 36 Caption = 'Ca' Color = clNavy ParentColor = False ParentFont = False TabOrder = 9 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnSr: TPanel Left = 50 Height = 45 Top = 217 Width = 36 Caption = 'Sr' Color = clNavy ParentColor = False ParentFont = False TabOrder = 10 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnBa: TPanel Left = 50 Height = 45 Top = 262 Width = 36 Caption = 'Ba' Color = clNavy ParentColor = False ParentFont = False TabOrder = 11 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnRa: TPanel Left = 50 Height = 45 Top = 307 Width = 36 Caption = 'Ra' Color = clNavy ParentColor = False ParentFont = False TabOrder = 12 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnSc: TPanel Left = 86 Height = 45 Top = 172 Width = 36 Caption = 'Sc' Color = clPurple ParentColor = False ParentFont = False TabOrder = 13 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnTi: TPanel Left = 122 Height = 45 Top = 172 Width = 36 Caption = 'Ti' Color = clPurple ParentColor = False ParentFont = False TabOrder = 14 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnY: TPanel Left = 86 Height = 45 Top = 217 Width = 36 Caption = 'Y' Color = clPurple ParentColor = False ParentFont = False TabOrder = 15 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnZr: TPanel Left = 122 Height = 45 Top = 217 Width = 36 Caption = 'Zr' Color = clPurple ParentColor = False ParentFont = False TabOrder = 16 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnV: TPanel Left = 158 Height = 45 Top = 172 Width = 36 Caption = 'V' Color = clPurple ParentColor = False ParentFont = False TabOrder = 17 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnNb: TPanel Left = 158 Height = 45 Top = 217 Width = 36 Caption = 'Nb' Color = clPurple ParentColor = False ParentFont = False TabOrder = 18 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnHf: TPanel Left = 122 Height = 45 Top = 262 Width = 36 Caption = 'Hf' Color = clPurple ParentColor = False ParentFont = False TabOrder = 19 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnRf: TPanel Left = 122 Height = 45 Top = 307 Width = 36 Caption = 'Rf' Color = clPurple ParentColor = False ParentFont = False TabOrder = 20 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCr: TPanel Left = 194 Height = 45 Top = 172 Width = 36 Caption = 'Cr' Color = clPurple ParentColor = False ParentFont = False TabOrder = 21 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnMo: TPanel Left = 194 Height = 45 Top = 217 Width = 36 Caption = 'Mo' Color = clPurple ParentColor = False ParentFont = False TabOrder = 22 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnTa: TPanel Left = 158 Height = 45 Top = 262 Width = 36 Caption = 'Ta' Color = clPurple ParentColor = False ParentFont = False TabOrder = 23 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnDb: TPanel Left = 158 Height = 45 Top = 307 Width = 36 Caption = 'Db' Color = clPurple ParentColor = False ParentFont = False TabOrder = 24 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnW: TPanel Left = 194 Height = 45 Top = 262 Width = 36 Caption = 'W' Color = clPurple ParentColor = False ParentFont = False TabOrder = 25 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnSg: TPanel Left = 194 Height = 45 Top = 307 Width = 36 Caption = 'Sg' Color = clPurple ParentColor = False ParentFont = False TabOrder = 26 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnMn: TPanel Left = 230 Height = 45 Top = 172 Width = 36 Caption = 'Mn' Color = clPurple ParentColor = False ParentFont = False TabOrder = 27 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnTc: TPanel Left = 230 Height = 45 Top = 217 Width = 36 Caption = 'Tc' Color = clPurple ParentColor = False ParentFont = False TabOrder = 28 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnRe: TPanel Left = 230 Height = 45 Top = 262 Width = 36 Caption = 'Re' Color = clPurple ParentColor = False ParentFont = False TabOrder = 29 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnBh: TPanel Left = 230 Height = 45 Top = 307 Width = 36 Caption = 'Bh' Color = clPurple ParentColor = False ParentFont = False TabOrder = 30 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnFe: TPanel Left = 266 Height = 45 Top = 172 Width = 36 Caption = 'Fe' Color = clPurple ParentColor = False ParentFont = False TabOrder = 31 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCo: TPanel Left = 302 Height = 45 Top = 172 Width = 36 Caption = 'Co' Color = clPurple ParentColor = False ParentFont = False TabOrder = 32 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnNi: TPanel Left = 338 Height = 45 Top = 172 Width = 36 Caption = 'Ni' Color = clPurple ParentColor = False ParentFont = False TabOrder = 33 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCu: TPanel Left = 374 Height = 45 Top = 172 Width = 36 Caption = 'Cu' Color = clPurple ParentColor = False ParentFont = False TabOrder = 34 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnZn: TPanel Left = 410 Height = 45 Top = 172 Width = 36 Caption = 'Zn' Color = clPurple ParentColor = False ParentFont = False TabOrder = 35 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCd: TPanel Left = 410 Height = 45 Top = 217 Width = 36 Caption = 'Cd' Color = clPurple ParentColor = False ParentFont = False TabOrder = 36 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnAg: TPanel Left = 374 Height = 45 Top = 217 Width = 36 Caption = 'Ag' Color = clPurple ParentColor = False ParentFont = False TabOrder = 37 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnPd: TPanel Left = 338 Height = 45 Top = 217 Width = 36 Caption = 'Pd' Color = clPurple ParentColor = False ParentFont = False TabOrder = 38 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnRh: TPanel Left = 302 Height = 45 Top = 217 Width = 36 Caption = 'Rh' Color = clPurple ParentColor = False ParentFont = False TabOrder = 39 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnRu: TPanel Left = 266 Height = 45 Top = 217 Width = 36 Caption = 'Ru' Color = clPurple ParentColor = False ParentFont = False TabOrder = 40 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnIr: TPanel Left = 302 Height = 45 Top = 262 Width = 36 Caption = 'Ir' Color = clPurple ParentColor = False ParentFont = False TabOrder = 41 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnPt: TPanel Left = 338 Height = 45 Top = 262 Width = 36 Caption = 'Pt' Color = clPurple ParentColor = False ParentFont = False TabOrder = 42 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnAu: TPanel Left = 374 Height = 45 Top = 262 Width = 36 Caption = 'Au' Color = clPurple ParentColor = False ParentFont = False TabOrder = 43 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnHg: TPanel Left = 410 Height = 45 Top = 262 Width = 36 Caption = 'Hg' Color = clPurple ParentColor = False ParentFont = False TabOrder = 44 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnRg: TPanel Left = 374 Height = 45 Top = 307 Width = 36 Caption = 'Rg' Color = clPurple ParentColor = False ParentFont = False TabOrder = 45 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnDs: TPanel Left = 338 Height = 45 Top = 307 Width = 36 Caption = 'Ds' Color = clPurple ParentColor = False ParentFont = False TabOrder = 46 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnMt: TPanel Left = 302 Height = 45 Top = 307 Width = 36 Caption = 'Mt' Color = clPurple ParentColor = False ParentFont = False TabOrder = 47 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnOs: TPanel Left = 266 Height = 45 Top = 262 Width = 36 Caption = 'Os' Color = clPurple ParentColor = False ParentFont = False TabOrder = 48 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnHs: TPanel Left = 266 Height = 45 Top = 307 Width = 36 Caption = 'Hs' Color = clPurple ParentColor = False ParentFont = False TabOrder = 49 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnGa: TPanel Left = 446 Height = 45 Top = 172 Width = 36 Caption = 'Ga' Color = clGreen ParentColor = False ParentFont = False TabOrder = 50 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnGe: TPanel Left = 482 Height = 45 Top = 172 Width = 36 Caption = 'Ge' Color = clGreen ParentColor = False ParentFont = False TabOrder = 51 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnAs: TPanel Left = 518 Height = 45 Top = 172 Width = 36 Caption = 'As' Color = clGreen ParentColor = False ParentFont = False TabOrder = 52 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnSe: TPanel Left = 554 Height = 45 Top = 172 Width = 36 Caption = 'Se' Color = clGreen ParentColor = False ParentFont = False TabOrder = 53 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnBr: TPanel Left = 590 Height = 45 Top = 172 Width = 36 Caption = 'Br' Color = clGreen ParentColor = False ParentFont = False TabOrder = 54 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnKr: TPanel Left = 626 Height = 45 Top = 172 Width = 36 Caption = 'Kr' Color = clGreen ParentColor = False ParentFont = False TabOrder = 55 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnIn: TPanel Left = 446 Height = 45 Top = 217 Width = 36 Caption = 'In' Color = clGreen ParentColor = False ParentFont = False TabOrder = 56 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnSn: TPanel Left = 482 Height = 45 Top = 217 Width = 36 Caption = 'Sn' Color = clGreen ParentColor = False ParentFont = False TabOrder = 57 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnSb: TPanel Left = 518 Height = 45 Top = 217 Width = 36 Caption = 'Sb' Color = clGreen ParentColor = False ParentFont = False TabOrder = 58 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnTe: TPanel Left = 554 Height = 45 Top = 217 Width = 36 Caption = 'Te' Color = clGreen ParentColor = False ParentFont = False TabOrder = 59 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnI: TPanel Left = 590 Height = 45 Top = 217 Width = 36 Caption = 'I' Color = clGreen ParentColor = False ParentFont = False TabOrder = 60 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnXe: TPanel Left = 626 Height = 45 Top = 217 Width = 36 Caption = 'Xe' Color = clGreen ParentColor = False ParentFont = False TabOrder = 61 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnAl: TPanel Left = 446 Height = 45 Top = 127 Width = 36 Caption = 'Al' Color = clGreen ParentColor = False ParentFont = False TabOrder = 62 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnSi: TPanel Left = 482 Height = 45 Top = 127 Width = 36 Caption = 'Si' Color = clGreen ParentColor = False ParentFont = False TabOrder = 63 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnP: TPanel Left = 518 Height = 45 Top = 127 Width = 36 Caption = 'P' Color = clGreen ParentColor = False ParentFont = False TabOrder = 64 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnS: TPanel Left = 554 Height = 45 Top = 127 Width = 36 Caption = 'S' Color = clGreen ParentColor = False ParentFont = False TabOrder = 65 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCl: TPanel Left = 590 Height = 45 Top = 127 Width = 36 Caption = 'Cl' Color = clGreen ParentColor = False ParentFont = False TabOrder = 66 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnAr: TPanel Left = 626 Height = 45 Top = 127 Width = 36 Caption = 'Ar' Color = clGreen ParentColor = False ParentFont = False TabOrder = 67 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnB: TPanel Left = 446 Height = 45 Top = 82 Width = 36 Caption = 'B' Color = clGreen ParentColor = False ParentFont = False TabOrder = 68 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnC: TPanel Left = 482 Height = 45 Top = 82 Width = 36 Caption = 'C' Color = clGreen ParentColor = False ParentFont = False TabOrder = 69 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnN: TPanel Left = 518 Height = 45 Top = 82 Width = 36 Caption = 'N' Color = clGreen ParentColor = False ParentFont = False TabOrder = 70 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnO: TPanel Left = 554 Height = 45 Top = 82 Width = 36 Caption = 'O' Color = clGreen ParentColor = False ParentFont = False TabOrder = 71 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnF: TPanel Left = 590 Height = 45 Top = 82 Width = 36 Caption = 'F' Color = clGreen ParentColor = False ParentFont = False TabOrder = 72 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnNe: TPanel Left = 626 Height = 45 Top = 82 Width = 36 Caption = 'Ne' Color = clGreen ParentColor = False ParentFont = False TabOrder = 73 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnHe: TPanel Left = 626 Height = 45 Top = 37 Width = 36 Caption = 'He' Color = clGreen ParentColor = False ParentFont = False TabOrder = 74 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnBi: TPanel Left = 518 Height = 45 Top = 262 Width = 36 Caption = 'Bi' Color = clGreen ParentColor = False ParentFont = False TabOrder = 75 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnPo: TPanel Left = 554 Height = 45 Top = 262 Width = 36 Caption = 'Po' Color = clGreen ParentColor = False ParentFont = False TabOrder = 76 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnPb: TPanel Left = 482 Height = 45 Top = 262 Width = 36 Caption = 'Pb' Color = clGreen ParentColor = False ParentFont = False TabOrder = 77 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnTl: TPanel Left = 446 Height = 45 Top = 262 Width = 36 Caption = 'Tl' Color = clGreen ParentColor = False ParentFont = False TabOrder = 78 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnAt: TPanel Left = 590 Height = 45 Top = 262 Width = 36 Caption = 'At' Color = clGreen ParentColor = False ParentFont = False TabOrder = 79 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnRn: TPanel Left = 626 Height = 45 Top = 262 Width = 36 Caption = 'Rn' Color = clGreen ParentColor = False ParentFont = False TabOrder = 80 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnLa: TPanel Left = 86 Height = 45 Top = 262 Width = 36 Caption = 'La' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 81 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnAc: TPanel Left = 86 Height = 45 Top = 307 Width = 36 Caption = 'Ac' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 82 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnLa2: TPanel Left = 590 Height = 45 Top = 363 Width = 36 Caption = 'Lu' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 83 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnPr: TPanel Left = 158 Height = 45 Top = 363 Width = 36 Caption = 'Pr' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 84 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnNd: TPanel Left = 194 Height = 45 Top = 363 Width = 36 Caption = 'Nd' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 85 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnPm: TPanel Left = 230 Height = 45 Top = 363 Width = 36 Caption = 'Pm' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 86 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnYb: TPanel Left = 554 Height = 45 Top = 363 Width = 36 Caption = 'Yb' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 87 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnTm: TPanel Left = 518 Height = 45 Top = 363 Width = 36 Caption = 'Tm' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 88 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnEr: TPanel Left = 482 Height = 45 Top = 363 Width = 36 Caption = 'Er' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 89 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnHo: TPanel Left = 446 Height = 45 Top = 363 Width = 36 Caption = 'Ho' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 90 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnDy: TPanel Left = 410 Height = 45 Top = 363 Width = 36 Caption = 'Dy' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 91 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnTb: TPanel Left = 374 Height = 45 Top = 363 Width = 36 Caption = 'Tb' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 92 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnGd: TPanel Left = 338 Height = 45 Top = 363 Width = 36 Caption = 'Gd' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 93 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnEu: TPanel Left = 302 Height = 45 Top = 363 Width = 36 Caption = 'Eu' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 94 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnSm: TPanel Left = 266 Height = 45 Top = 363 Width = 36 Caption = 'Sm' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 95 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCe: TPanel Left = 122 Height = 45 Top = 363 Width = 36 Caption = 'Ce' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 96 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnTh: TPanel Left = 122 Height = 45 Top = 408 Width = 36 Caption = 'Th' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 97 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnPa: TPanel Left = 158 Height = 45 Top = 408 Width = 36 Caption = 'Pa' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 98 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnU: TPanel Left = 194 Height = 45 Top = 408 Width = 36 Caption = 'U' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 99 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnNp: TPanel Left = 230 Height = 45 Top = 408 Width = 36 Caption = 'Np' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 100 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnPu: TPanel Left = 266 Height = 45 Top = 408 Width = 36 Caption = 'Pu' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 101 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnAm: TPanel Left = 302 Height = 45 Top = 408 Width = 36 Caption = 'Am' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 102 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCm: TPanel Left = 338 Height = 45 Top = 408 Width = 36 Caption = 'Cm' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 103 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnBk: TPanel Left = 374 Height = 45 Top = 408 Width = 36 Caption = 'Bk' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 104 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnCf: TPanel Left = 410 Height = 45 Top = 408 Width = 36 Caption = 'Cf' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 105 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnEs: TPanel Left = 446 Height = 45 Top = 408 Width = 36 Caption = 'Es' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 106 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnFm: TPanel Left = 482 Height = 45 Top = 408 Width = 36 Caption = 'Fm' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 107 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnMd: TPanel Left = 518 Height = 45 Top = 408 Width = 36 Caption = 'Md' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 108 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnNo: TPanel Left = 554 Height = 45 Top = 408 Width = 36 Caption = 'No' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 109 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnLr: TPanel Left = 590 Height = 45 Top = 408 Width = 36 Caption = 'Lr' Color = clMaroon ParentColor = False ParentFont = False TabOrder = 110 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object pnHighlight: TPanel Left = 151 Height = 120 Top = 43 Width = 130 Caption = 'XX' ClientHeight = 120 ClientWidth = 130 Font.Height = -18 Font.Style = [fsBold] ParentFont = False TabOrder = 111 object lbPName: TLabel Left = 7 Height = 20 Top = 7 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbPAtNum: TLabel Left = 44 Height = 20 Top = 66 Width = 8 Alignment = taRightJustify Caption = '0' ParentColor = False ParentFont = False end object lbPMass: TLabel Left = 101 Height = 20 Top = 99 Width = 21 Alignment = taRightJustify Caption = '0 U' ParentColor = False ParentFont = False end end object GroupBox6: TGroupBox Left = 682 Height = 115 Top = 9 Width = 316 Anchors = [akTop, akRight, akBottom] Caption = 'Table options' ClientHeight = 83 ClientWidth = 312 ParentFont = False TabOrder = 112 object Label20: TLabel Left = 11 Height = 27 Top = 8 Width = 47 AutoSize = False Caption = 'Layout:' Layout = tlCenter ParentColor = False ParentFont = False end object cbxLayout: TComboBox Left = 76 Height = 34 Top = 8 Width = 216 ItemHeight = 26 ItemIndex = 0 Items.Strings = ( 'Standard (electronic blocs)' 'Family' 'Mass' 'Discovery year' 'Melting point' 'Boiling point' 'Electronic affinity' 'Covalent radius' 'Van Der Waals radius' 'First ionization energy' 'Second ionization energy' 'Third ionization energy' 'Electronegativity' ) OnChange = cbxLayoutChange OnClick = cbxLayoutChange ParentFont = False Style = csDropDownList TabOrder = 0 Text = 'Standard (electronic blocs)' end object cbTableApplyFilters: TCheckBox Left = 11 Height = 24 Top = 44 Width = 112 Caption = 'Apply filter(s)' OnChange = cbTableApplyFiltersChange ParentFont = False TabOrder = 1 end end object gbLegend: TGroupBox Left = 682 Height = 146 Top = 152 Width = 316 Anchors = [akTop, akLeft, akRight, akBottom] Caption = 'Legend' ParentFont = False TabOrder = 113 end object pnNum1: TPanel Left = 14 Height = 18 Top = 17 Width = 36 Caption = '1' ParentFont = False TabOrder = 114 OnClick = pnElmClick end object pnNum2: TPanel Left = 50 Height = 18 Top = 17 Width = 36 Caption = '2' ParentFont = False TabOrder = 115 OnClick = pnElmClick end object pnNum3: TPanel Left = 86 Height = 18 Top = 17 Width = 36 Caption = '3' ParentFont = False TabOrder = 116 OnClick = pnElmClick end object pnNum4: TPanel Left = 122 Height = 18 Top = 17 Width = 36 Caption = '4' ParentFont = False TabOrder = 117 OnClick = pnElmClick end object pnNum5: TPanel Left = 158 Height = 18 Top = 17 Width = 36 Caption = '5' ParentFont = False TabOrder = 118 OnClick = pnElmClick end object pnNum6: TPanel Left = 194 Height = 18 Top = 17 Width = 36 Caption = '6' ParentFont = False TabOrder = 119 OnClick = pnElmClick end object pnNum7: TPanel Left = 230 Height = 18 Top = 17 Width = 36 Caption = '7' ParentFont = False TabOrder = 120 OnClick = pnElmClick end object pnNum8: TPanel Left = 266 Height = 18 Top = 17 Width = 36 Caption = '8' ParentFont = False TabOrder = 121 OnClick = pnElmClick end object pnNum9: TPanel Left = 302 Height = 18 Top = 17 Width = 36 Caption = '9' ParentFont = False TabOrder = 122 OnClick = pnElmClick end object pnNum10: TPanel Left = 338 Height = 18 Top = 17 Width = 36 Caption = '10' ParentFont = False TabOrder = 123 OnClick = pnElmClick end object pnNum11: TPanel Left = 374 Height = 18 Top = 17 Width = 36 Caption = '11' ParentFont = False TabOrder = 124 OnClick = pnElmClick end object pnNum12: TPanel Left = 410 Height = 18 Top = 17 Width = 36 Caption = '12' ParentFont = False TabOrder = 125 OnClick = pnElmClick end object pnNum13: TPanel Left = 446 Height = 18 Top = 17 Width = 36 Caption = '13' ParentFont = False TabOrder = 126 OnClick = pnElmClick end object pnNum14: TPanel Left = 482 Height = 18 Top = 17 Width = 36 Caption = '14' ParentFont = False TabOrder = 127 OnClick = pnElmClick end object pnNum15: TPanel Left = 518 Height = 18 Top = 17 Width = 36 Caption = '15' ParentFont = False TabOrder = 128 OnClick = pnElmClick end object pnNum16: TPanel Left = 554 Height = 18 Top = 17 Width = 36 Caption = '16' ParentFont = False TabOrder = 129 OnClick = pnElmClick end object pnNum17: TPanel Left = 590 Height = 18 Top = 17 Width = 36 Caption = '17' ParentFont = False TabOrder = 130 OnClick = pnElmClick end object pnNum18: TPanel Left = 626 Height = 18 Top = 17 Width = 36 Caption = '18' ParentFont = False TabOrder = 131 OnClick = pnElmClick end object pnCn: TPanel Left = 410 Height = 45 Top = 307 Width = 36 Caption = 'Cn' Color = clPurple ParentColor = False ParentFont = False TabOrder = 132 OnClick = pnElmClick OnMouseMove = pnElmMouseMove end object imgAtom1: TImage Left = 682 Height = 179 Top = 320 Width = 316 Proportional = True Stretch = True end object Label17: TLabel Left = 682 Height = 20 Top = 504 Width = 317 Caption = 'Image courtesy of the Wikipedia free encyclopedia.' ParentColor = False ParentFont = False end end object tsList: TTabSheet Caption = 'List' ClientHeight = 536 ClientWidth = 1008 ParentFont = False object Panel1: TPanel Left = 0 Height = 536 Top = 0 Width = 291 Align = alLeft BevelOuter = bvNone ClientHeight = 536 ClientWidth = 291 ParentFont = False TabOrder = 0 object lvList: TListView Left = 14 Height = 477 Top = 16 Width = 271 Anchors = [akTop, akLeft, akRight, akBottom] Columns = < item Caption = 'Number' Width = 62 end item Caption = 'Symbol' Width = 62 end item Caption = 'Name' Width = 135 end> ColumnClick = False HideSelection = False ParentFont = False RowSelect = True TabOrder = 0 ViewStyle = vsReport OnClick = lbListClick OnDblClick = lbListDblClick OnKeyPress = lvListKeyPress OnKeyUp = lvListKeyUp end object btnAdd: TButton Left = 16 Height = 28 Top = 500 Width = 81 Anchors = [akLeft, akBottom] Caption = 'Add...' OnClick = btnAddClick ParentFont = False TabOrder = 1 end end object Splitter1: TSplitter Left = 291 Height = 536 Top = 0 Width = 6 end object Panel2: TPanel Left = 297 Height = 536 Top = 0 Width = 711 Align = alClient BevelOuter = bvNone ClientHeight = 536 ClientWidth = 711 ParentFont = False TabOrder = 2 object GroupBox5: TGroupBox Left = 0 Height = 110 Top = 408 Width = 558 Anchors = [akTop, akLeft, akRight] Caption = 'List options' ClientHeight = 78 ClientWidth = 554 ParentFont = False TabOrder = 0 object lbUnknownSort: TLabel Left = 353 Height = 16 Top = 9 Width = 154 AutoSize = False Caption = 'Unknown values comes:' Layout = tlCenter ParentColor = False ParentFont = False end object Label15: TLabel Left = 12 Height = 15 Top = 9 Width = 277 Caption = 'Short by (change the second column display):' ParentColor = False ParentFont = False end object cbxSort: TComboBox Left = 12 Height = 29 Top = 26 Width = 311 Anchors = [akTop, akLeft, akRight] ItemHeight = 26 ItemIndex = 0 Items.Strings = ( 'Atomic number' 'Alphabetically (Name)' 'Alphabetically (Symbol)' 'Discovery year' 'Mass' 'Melting point' 'Boiling point' 'Electronic affinity' 'Covalent radius' 'Van Der Waals radius' 'First ionisation energy' 'Second ionisation energy' 'Third ionisation energy' 'Electronegativity' ) OnChange = cbxSortChange ParentFont = False Style = csDropDownList TabOrder = 0 Text = 'Atomic number' end object cbListApplyFilter: TCheckBox Left = 190 Height = 20 Top = 60 Width = 110 Caption = 'Apply filter(s)' OnChange = cbListApplyFilterChange ParentFont = False TabOrder = 1 end object rbSortFirst: TRadioButton Left = 353 Height = 20 Top = 24 Width = 54 Caption = 'First' OnChange = rbSortFirstChange ParentFont = False TabOrder = 2 end object rbSortLast: TRadioButton Left = 353 Height = 20 Top = 47 Width = 53 Caption = 'Last' Checked = True OnChange = rbSortFirstChange ParentFont = False TabOrder = 3 TabStop = True end object cbxInvertSortOrder: TCheckBox Left = 12 Height = 20 Top = 60 Width = 126 Caption = 'Invert sort order' OnChange = cbxInvertSortOrderChange ParentFont = False TabOrder = 4 end end object PageControl2: TPageControl Left = 0 Height = 384 Top = 16 Width = 558 ActivePage = tsGlobalInfo Anchors = [akTop, akLeft, akRight, akBottom] ParentFont = False TabIndex = 0 TabOrder = 1 object tsGlobalInfo: TTabSheet Caption = 'Scientific informations' ClientHeight = 352 ClientWidth = 554 ParentFont = False object GroupBox1: TGroupBox Left = 9 Height = 332 Top = 9 Width = 537 Anchors = [akTop, akLeft, akRight, akBottom] Caption = 'Scientific informations' ClientHeight = 300 ClientWidth = 533 ParentFont = False TabOrder = 0 object Label2: TLabel Left = 15 Height = 15 Hint = 'Nom de l''atome sélectionné' Top = 15 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Name:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object lbName: TLabel Left = 195 Height = 15 Hint = 'Nom de l''atome sélectionné' Top = 15 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object Label4: TLabel Left = 15 Height = 15 Hint = 'Masse molaire de l''atome selectionné' Top = 82 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Mass:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label5: TLabel Left = 15 Height = 15 Hint = 'Indique si l''atome selectionné est radioactif ou artificiel' Top = 267 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Naturally radioactive:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object lbMass: TLabel Left = 195 Height = 15 Hint = 'Masse molaire de l''atome selectionné' Top = 82 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbNatRadio: TLabel Left = 195 Height = 15 Hint = 'Indique si l''atome selectionné est radioactif ou artificiel' Top = 267 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object Label9: TLabel Left = 15 Height = 15 Hint = 'Numéro atomique de l''atome selectionné' Top = 65 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Atomic Number:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object lbAtNumber: TLabel Left = 195 Height = 15 Hint = 'Numéro atomique de l''atome selectionné' Top = 65 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object Label11: TLabel Left = 15 Height = 15 Hint = 'Durée d''existance des 80% de la radioactivité' Top = 284 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Half-life:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object lbRadioHalfLife: TLabel Left = 195 Height = 15 Hint = 'Durée d''existance des 80% de la radioactivité' Top = 284 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object Label1: TLabel Left = 15 Height = 15 Top = 99 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Melting point:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label3: TLabel Left = 15 Height = 15 Top = 116 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Boiling point:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object lbMeltingPt: TLabel Left = 195 Height = 15 Top = 99 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbBoilingPt: TLabel Left = 195 Height = 15 Top = 116 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object Label6: TLabel Left = 15 Height = 15 Top = 150 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Electronic configuration:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label7: TLabel Left = 15 Height = 15 Top = 133 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Electronic affinity:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label8: TLabel Left = 15 Height = 15 Top = 166 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Covalent radius:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label10: TLabel Left = 15 Height = 15 Top = 183 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Van der Waals radius:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label12: TLabel Left = 15 Height = 15 Top = 200 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Ionisation energy:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label13: TLabel Left = 15 Height = 15 Top = 250 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Electronegativity:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object lbElecAff: TLabel Left = 195 Height = 15 Top = 133 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbVanDerWalsRd: TLabel Left = 195 Height = 15 Top = 183 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbCovalentRd: TLabel Left = 195 Height = 15 Top = 166 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbElecConf: TLabel Left = 195 Height = 15 Top = 150 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbElectroneg: TLabel Left = 195 Height = 15 Top = 250 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbFirsIonisationEnergy: TLabel Left = 195 Height = 15 Top = 200 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object Label19: TLabel Left = 15 Height = 15 Hint = 'Nom de l''atome sélectionné' Top = 48 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'Family:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object lbFamily: TLabel Left = 195 Height = 15 Hint = 'Nom de l''atome sélectionné' Top = 48 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object Label16: TLabel Left = 15 Height = 15 Top = 32 Width = 174 Alignment = taRightJustify AutoSize = False Caption = 'CAS Number:' Font.Style = [fsBold] ParentColor = False ParentFont = False end object lbCASNumber: TLabel Left = 195 Height = 15 Top = 32 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbSecondIonisationEnergy: TLabel Left = 195 Height = 15 Top = 218 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbThirdIonisationEnergy: TLabel Left = 195 Height = 15 Top = 234 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end end end object tsElecConf: TTabSheet Caption = 'Electronic Configuration' ClientHeight = 352 ClientWidth = 554 ParentFont = False object lbExpandedElecConf: TLabel Left = 9 Height = 15 Top = 7 Width = 209 Caption = 'Unknow electronic distribution' Font.Style = [fsBold] ParentColor = False ParentFont = False end end object Isotopes: TTabSheet Caption = 'Isotopes' ParentFont = False end object tsHistory: TTabSheet Caption = 'History' ClientHeight = 352 ClientWidth = 554 ParentFont = False object GroupBox2: TGroupBox Left = 4 Height = 126 Top = 7 Width = 546 Anchors = [akTop, akLeft, akRight] Caption = 'Discovery' ClientHeight = 94 ClientWidth = 542 ParentFont = False TabOrder = 0 object lbDiscovery: TLabel Left = 11 Height = 88 Top = 11 Width = 510 Anchors = [akTop, akLeft, akRight] AutoSize = False ParentColor = False ParentFont = False WordWrap = True end end object GroupBox4: TGroupBox Left = 4 Height = 136 Top = 151 Width = 546 Anchors = [akTop, akLeft, akRight] Caption = 'Etymology' ClientHeight = 104 ClientWidth = 542 ParentFont = False TabOrder = 1 object lbEtimology: TLabel Left = 11 Height = 90 Top = 11 Width = 510 Anchors = [akTop, akLeft, akRight] AutoSize = False ParentColor = False ParentFont = False WordWrap = True end end end object tsAspectUse: TTabSheet Caption = 'Aspect && Use' ClientHeight = 352 ClientWidth = 554 ParentFont = False object imgAtom: TImage Left = 360 Height = 135 Top = 16 Width = 171 Proportional = True Stretch = True end object GroupBox10: TGroupBox Left = 9 Height = 135 Top = 16 Width = 342 Caption = 'Aspect' ClientHeight = 103 ClientWidth = 338 ParentFont = False TabOrder = 0 object mmAspect: TMemo Left = 16 Height = 92 Top = 9 Width = 306 BorderStyle = bsNone Color = clForm ParentFont = False ScrollBars = ssAutoVertical TabOrder = 0 end end object GroupBox11: TGroupBox Left = 9 Height = 199 Top = 160 Width = 523 Caption = 'Use' ClientHeight = 167 ClientWidth = 519 ParentFont = False TabOrder = 1 object mmUse: TMemo Left = 16 Height = 155 Top = 9 Width = 486 BorderStyle = bsNone Color = clForm ParentFont = False ScrollBars = ssAutoVertical TabOrder = 0 end end object lbNoPic: TLabel Left = 387 Height = 15 Top = 74 Width = 136 Caption = 'No picture available... ' ParentColor = False ParentFont = False end end end object pnSelected: TPanel Left = 567 Height = 120 Top = 26 Width = 130 Caption = 'XX' ClientHeight = 120 ClientWidth = 130 Font.Height = -18 Font.Style = [fsBold] ParentFont = False TabOrder = 2 object lbPName1: TLabel Left = 7 Height = 15 Top = 7 Width = 21 Caption = '(...)' ParentColor = False ParentFont = False end object lbPAtNum1: TLabel Left = 44 Height = 15 Top = 66 Width = 8 Alignment = taRightJustify Caption = '0' ParentColor = False ParentFont = False end object lbPMass1: TLabel Left = 101 Height = 15 Top = 99 Width = 21 Alignment = taRightJustify Caption = '0 U' ParentColor = False ParentFont = False end end object btnWikipedia: TBitBtn Tag = 35 Left = 567 Height = 43 Top = 475 Width = 130 Caption = 'Wikipedia' OnClick = btnWikipediaClick ParentFont = False TabOrder = 3 end end end object tsElemDB: TTabSheet Caption = 'Elements database' ParentFont = False end object TabSheet1: TTabSheet Caption = 'Charts' ClientHeight = 536 ClientWidth = 1008 ParentFont = False object Label14: TLabel Left = 16 Height = 15 Top = 440 Width = 76 Anchors = [akLeft, akBottom] Caption = 'Show labels:' ParentColor = False ParentFont = False end object Chart: TChart Left = 4 Height = 368 Top = 7 Width = 756 AxisList = < item Grid.Color = clGray TickColor = clWindowText Marks.LabelBrush.Style = bsClear Minors = <> Title.LabelFont.Color = clGreen Title.LabelFont.Orientation = 900 Title.LabelBrush.Style = bsClear end item Grid.Color = clGray TickColor = clWindowText Alignment = calBottom Marks.LabelBrush.Style = bsClear Minors = <> Title.LabelFont.Color = clNavy Title.LabelBrush.Style = bsClear end> BackColor = clBlack Foot.Brush.Color = clBlack Foot.Font.Color = clYellow Foot.Frame.Color = clWhite Frame.Color = clWhite Legend.Font.Color = clWhite Legend.Frame.Color = clWhite ReticuleMode = rmCross Title.Brush.Color = clBlack Title.Font.Color = clLime Title.Frame.Color = clYellow Title.Text.Strings = ( 'TAChart' ) Toolset = ChartToolset Anchors = [akTop, akLeft, akRight, akBottom] PopupMenu = pmChart end object GroupBox7: TGroupBox Left = 331 Height = 142 Top = 384 Width = 331 Anchors = [akLeft, akBottom] Caption = 'X-Axis' ClientHeight = 110 ClientWidth = 327 ParentFont = False TabOrder = 1 object lbMaxX: TLabel Left = 282 Height = 15 Top = 42 Width = 21 Alignment = taRightJustify Caption = '(...)' ParentColor = False ParentFont = False end object lbMinX: TLabel Left = 282 Height = 15 Top = 60 Width = 21 Alignment = taRightJustify Caption = '(...)' ParentColor = False ParentFont = False end object lbAverageX: TLabel Left = 282 Height = 15 Top = 78 Width = 21 Alignment = taRightJustify Caption = '(...)' ParentColor = False ParentFont = False end object lbUnitX: TLabel Left = 282 Height = 15 Top = 96 Width = 21 Alignment = taRightJustify Caption = '(...)' ParentColor = False ParentFont = False end object lbMaxX1: TLabel Left = 12 Height = 15 Top = 42 Width = 66 Caption = 'Max value:' ParentColor = False ParentFont = False end object lbMinX1: TLabel Left = 12 Height = 15 Top = 60 Width = 62 Caption = 'Min value:' ParentColor = False ParentFont = False end object lbAverageX1: TLabel Left = 12 Height = 15 Top = 78 Width = 90 Caption = 'Average value:' ParentColor = False ParentFont = False end object lbUnitX1: TLabel Left = 12 Height = 15 Top = 96 Width = 29 Caption = 'Unit:' ParentColor = False ParentFont = False end object cbxXAxis: TComboBox Left = 12 Height = 29 Top = 8 Width = 294 ItemHeight = 26 ItemIndex = 0 Items.Strings = ( 'Atomic number' 'Mass' 'Melting point' 'Boiling point' 'Electronic affinity' 'Covalent radius' 'Van Der Waals radius' 'First ionisation energy' ) OnChange = cbxXAxisChange ParentFont = False Style = csDropDownList TabOrder = 0 Text = 'Atomic number' end end object GroupBox9: TGroupBox Left = 772 Height = 371 Top = 4 Width = 227 Anchors = [akTop, akRight, akBottom] Caption = 'Range' ClientHeight = 339 ClientWidth = 223 ParentFont = False TabOrder = 3 object edRange: TEdit Left = 9 Height = 29 Top = 8 Width = 130 Anchors = [akTop, akLeft, akRight] OnChange = edRangeChange ParentFont = False TabOrder = 0 Text = '1-111' end object btnFullRange: TButton Left = 146 Height = 28 Top = 9 Width = 57 Anchors = [akTop, akRight] Caption = 'Full' OnClick = btnFullRangeClick ParentFont = False TabOrder = 1 end object clbRange: TCheckListBox Left = 9 Height = 265 Top = 39 Width = 194 Anchors = [akTop, akLeft, akRight, akBottom] Items.Strings = ( 's bloc' 'p bloc' 'd bloc' 'f bloc' 'Alkalines' 'Alkalie metals' 'Transition metals' 'Other metals' 'Metalloids' 'Non-metals' 'Halogens' 'Noble gas' 'Rare earths' ) ItemHeight = 26 OnClick = clbRangeClick OnClickCheck = clbRangeClick ParentFont = False TabOrder = 2 Data = { 0D00000000000000000000000000000000 } end object cbChartApplyFilters: TCheckBox Left = 9 Height = 20 Top = 312 Width = 100 Anchors = [akLeft, akBottom] Caption = 'Apply filters' OnChange = cbChartApplyFiltersChange ParentFont = False TabOrder = 3 end end object cbDrawLines: TCheckBox Left = 16 Height = 20 Top = 384 Width = 91 Anchors = [akLeft, akBottom] Caption = 'Draw lines' OnChange = cbxChartLabelsChange ParentFont = False TabOrder = 4 end object cbChartUnknowVal: TCheckBox Left = 16 Height = 20 Top = 408 Width = 226 Anchors = [akLeft, akBottom] Caption = 'Show atoms with unknown value' OnChange = cbxChartLabelsChange ParentFont = False TabOrder = 5 end object cbxChartLabels: TComboBox Left = 104 Height = 29 Top = 436 Width = 212 Anchors = [akLeft, akBottom] ItemHeight = 26 ItemIndex = 0 Items.Strings = ( 'None' 'Atom names' 'Atom symbols' 'X values' 'Y values' ) OnChange = cbxChartLabelsChange ParentFont = False Style = csDropDownList TabOrder = 6 Text = 'None' end object GroupBox8: TGroupBox Left = 667 Height = 142 Top = 384 Width = 332 Anchors = [akLeft, akBottom] Caption = 'Y-Axis' ClientHeight = 110 ClientWidth = 328 ParentFont = False TabOrder = 2 object lbMaxY: TLabel Left = 287 Height = 15 Top = 42 Width = 21 Alignment = taRightJustify Caption = '(...)' ParentColor = False ParentFont = False end object lbMinY: TLabel Left = 287 Height = 15 Top = 60 Width = 21 Alignment = taRightJustify Caption = '(...)' ParentColor = False ParentFont = False end object lbAverageY: TLabel Left = 287 Height = 15 Top = 78 Width = 21 Alignment = taRightJustify Caption = '(...)' ParentColor = False ParentFont = False end object lbUnitY: TLabel Left = 287 Height = 15 Top = 96 Width = 21 Alignment = taRightJustify Caption = '(...)' ParentColor = False ParentFont = False end object lbMaxY1: TLabel Left = 12 Height = 15 Top = 42 Width = 66 Caption = 'Max value:' ParentColor = False ParentFont = False end object lbMinY1: TLabel Left = 12 Height = 15 Top = 60 Width = 62 Caption = 'Min value:' ParentColor = False ParentFont = False end object lbAverageY1: TLabel Left = 12 Height = 15 Top = 78 Width = 90 Caption = 'Average value:' ParentColor = False ParentFont = False end object lbUnitY1: TLabel Left = 12 Height = 15 Top = 96 Width = 29 Caption = 'Unit:' ParentColor = False ParentFont = False end object cbxYAxis: TComboBox Left = 12 Height = 29 Top = 8 Width = 298 ItemHeight = 26 ItemIndex = 0 Items.Strings = ( 'Atomic number' 'Mass' 'Melting point' 'Boiling point' 'Electronic affinity' 'Covalent radius' 'Van Der Waals radius' 'First ionisation energy' ) OnChange = cbxYAxisChange ParentFont = False Style = csDropDownList TabOrder = 0 Text = 'Atomic number' end end object Label38: TLabel Left = 16 Height = 15 Top = 482 Width = 44 Caption = 'X start:' ParentColor = False ParentFont = False end object Label39: TLabel Left = 16 Height = 15 Top = 511 Width = 44 Caption = 'Y start:' ParentColor = False ParentFont = False end object Label40: TLabel Left = 176 Height = 15 Top = 482 Width = 39 Caption = 'X end:' ParentColor = False ParentFont = False end object Label41: TLabel Left = 177 Height = 15 Top = 511 Width = 38 Caption = 'Y end:' ParentColor = False ParentFont = False end object sedXStart: TFloatSpinEdit Left = 68 Height = 29 Top = 472 Width = 94 MaxValue = 10000 MinValue = -10000 OnChange = sedXStartChange ParentFont = False TabOrder = 7 Value = 0 end object sedYStart: TFloatSpinEdit Left = 68 Height = 29 Top = 504 Width = 94 MaxValue = 10000 MinValue = -10000 OnChange = sedYStartChange ParentFont = False TabOrder = 8 Value = 0 end object sedXEnd: TFloatSpinEdit Left = 224 Height = 29 Top = 472 Width = 94 MaxValue = 10000 MinValue = -10000 OnChange = sedXEndChange ParentFont = False TabOrder = 9 Value = 0 end object sedYEnd: TFloatSpinEdit Left = 224 Height = 29 Top = 504 Width = 94 MaxValue = 10000 MinValue = -10000 OnChange = sedYEndChange ParentFont = False TabOrder = 10 Value = 0 end end object TabSheet2: TTabSheet Caption = 'Filters' ClientHeight = 536 ClientWidth = 1008 ParentFont = False object lvFilters: TListView Left = 14 Height = 261 Top = 17 Width = 972 Columns = < item Caption = 'Kind' Width = 338 end item Alignment = taRightJustify Caption = 'Minimum' Width = 79 end item Alignment = taRightJustify Caption = 'Maximum' Width = 79 end item Caption = 'Display unknown' Width = 105 end> HideSelection = False ParentFont = False RowSelect = True TabOrder = 0 ViewStyle = vsReport OnChange = lvFiltersChange OnClick = lvFiltersClick OnSelectItem = lvFiltersSelectItem end object gbState: TGroupBox Left = 428 Height = 230 Top = 287 Width = 387 Caption = 'By state of matter' ClientHeight = 198 ClientWidth = 383 ParentFont = False TabOrder = 1 object Label32: TLabel Left = 12 Height = 15 Top = 24 Width = 36 Caption = 'State:' ParentColor = False ParentFont = False end object cbxState: TComboBox Left = 125 Height = 29 Top = 15 Width = 245 ItemHeight = 26 Items.Strings = ( 'Gas' 'Liquid' 'Solid' 'Not Gas' 'Not Liquid' 'Not Solid' ) ParentFont = False Style = csDropDownList TabOrder = 0 end object Label33: TLabel Left = 12 Height = 15 Top = 55 Width = 96 Caption = 'At temperature:' ParentColor = False ParentFont = False end object rbStateKelvin: TRadioButton Left = 125 Height = 20 Top = 84 Width = 64 Caption = 'Kelvin' Checked = True OnChange = rbStateKelvinChange ParentFont = False TabOrder = 1 TabStop = True end object rbStateCelcius: TRadioButton Left = 242 Height = 20 Top = 84 Width = 71 Caption = 'Celcius' OnChange = rbStateCelciusChange ParentFont = False TabOrder = 3 end object cbStateShowUnknown: TCheckBox Left = 12 Height = 20 Top = 109 Width = 217 Caption = 'Display when value is unknown' Checked = True ParentFont = False State = cbChecked TabOrder = 2 end object sedStateTemp: TFloatSpinEdit Left = 125 Height = 29 Top = 48 Width = 245 MaxValue = 5870 MinValue = -273.16 ParentFont = False TabOrder = 4 Value = 0 end object btnAddState: TBitBtn Tag = 36 Left = 245 Height = 34 Top = 160 Width = 125 Caption = 'Add state' OnClick = btnAddStateClick ParentFont = False TabOrder = 5 end end object GroupBox3: TGroupBox Left = 14 Height = 230 Top = 287 Width = 405 Caption = 'Filter' ClientHeight = 198 ClientWidth = 401 ParentFont = False TabOrder = 2 object cbFilterKind: TComboBox Left = 120 Height = 29 Top = 10 Width = 261 ItemHeight = 26 ItemIndex = 0 Items.Strings = ( 'Discovery date' 'Mass' 'Electronic affinity' 'Melting point' 'Boiling point' 'Covalent radius' 'Van der Waals radius' 'First ionisation energy' 'Second ionisation energy' 'Third ionisation energy' 'Electronegativity' ) OnChange = cbFilterKindChange ParentFont = False Style = csDropDownList TabOrder = 0 Text = 'Discovery date' end object Label42: TLabel Left = 12 Height = 15 Top = 15 Width = 31 Caption = 'Kind:' ParentColor = False ParentFont = False end object Label22: TLabel Left = 12 Height = 15 Top = 52 Width = 97 Caption = 'Minimum value:' ParentColor = False ParentFont = False end object Label23: TLabel Left = 12 Height = 15 Top = 82 Width = 100 Caption = 'Maximum value:' ParentColor = False ParentFont = False end object sedFilterMin: TFloatSpinEdit Left = 120 Height = 29 Top = 44 Width = 261 DecimalPlaces = 5 MinValue = 0 ParentFont = False TabOrder = 1 Value = 0 end object sedFilterMax: TFloatSpinEdit Left = 120 Height = 29 Top = 76 Width = 267 DecimalPlaces = 5 MaxValue = 3800 MinValue = 0 ParentFont = False TabOrder = 2 Value = 0 end object cbShowUnknown: TCheckBox Left = 12 Height = 20 Top = 119 Width = 277 Caption = 'Display elements when value is unknown' Checked = True OnChange = cbShowUnknownChange ParentFont = False State = cbChecked TabOrder = 3 end object btnChangeFilter: TBitBtn Tag = 38 Left = 270 Height = 34 Top = 160 Width = 117 Caption = 'Change' OnClick = btnChangeFilterClick ParentFont = False TabOrder = 4 end object btnAddFilter: TBitBtn Tag = 36 Left = 144 Height = 34 Top = 160 Width = 117 Caption = 'Add' OnClick = btnAddFilterClick ParentFont = False TabOrder = 5 end end object btnSaveFilterSet: TBitBtn Tag = 4 Left = 824 Height = 34 Top = 287 Width = 162 Caption = 'Save filter set...' OnClick = btnSaveFilterSetClick ParentFont = False TabOrder = 3 end object btnOpenFilterSet: TBitBtn Tag = 2 Left = 824 Height = 34 Top = 344 Width = 162 Caption = 'Open filter set...' OnClick = btnOpenFilterSetClick ParentFont = False TabOrder = 4 end object btnAddFilterSet: TBitBtn Tag = 36 Left = 824 Height = 34 Top = 384 Width = 162 Caption = 'Add filter set...' OnClick = btnAddFilterSetClick ParentFont = False TabOrder = 5 end object btnClearFilterSet: TBitBtn Tag = 32 Left = 824 Height = 34 Top = 480 Width = 162 Caption = 'Clear filter set' OnClick = btnClearFilterSetClick ParentFont = False TabOrder = 6 end object btnRemoveFilter: TBitBtn Tag = 37 Left = 824 Height = 34 Top = 439 Width = 162 Caption = 'Remove' OnClick = btnRemoveFilterClick ParentFont = False TabOrder = 7 end end end object MainMenu: TMainMenu left = 603 object mnuFile: TMenuItem Caption = '&File' object MenuItem4: TMenuItem Caption = 'Debug' object mnuHeapStatus: TMenuItem Caption = 'Heap Status...' OnClick = mnuHeapStatusClick end object mnuShowFilterList: TMenuItem Caption = 'Show filter list...' OnClick = mnuShowFilterListClick end object MenuItem5: TMenuItem Caption = 'New Item17' OnClick = MenuItem5Click end end object mnuOpenConsole: TMenuItem Caption = 'Open &console' OnClick = mnuOpenConsoleClick end object MenuItem3: TMenuItem Caption = '-' end object mnuExit: TMenuItem Caption = 'E&xit' ImageIndex = 9 ShortCut = 16384 OnClick = btnExitClick end end object mnuTools: TMenuItem Caption = '&Tools' object mnuDiscoverer: TMenuItem Caption = '&Discoverer list' OnClick = mnuDiscovererClick end object mnuMassCalc: TMenuItem Caption = '&Mass calculator' OnClick = btnMassCalcClick end object MenuItem2: TMenuItem Caption = '-' end object mnuConfigure: TMenuItem Caption = '&Configure YaPeTaVi...' ImageIndex = 34 OnClick = mnuConfigureClick end end object mnuHelp: TMenuItem Caption = '&Help' object mnuManual: TMenuItem Caption = 'Online manual' ImageIndex = 31 end object MenuItem1: TMenuItem Caption = '-' end object mnuAbout: TMenuItem Caption = '&About...' ImageIndex = 26 OnClick = mnuAboutClick end end end object pmChart: TPopupMenu left = 665 object mnuFullZoom: TMenuItem Caption = 'Zoom full' OnClick = mnuFullZoomClick end end object ChartToolset: TChartToolset left = 729 end object dlgSave: TSaveDialog left = 807 end object dlgOpen: TOpenDialog left = 873 end object IniPropStorage: TIniPropStorage StoredValues = <> left = 531 end end