object frmElementInfo: TfrmElementInfo Left = 283 Top = 242 HelpContext = 3 HorzScrollBar.Visible = False VertScrollBar.Visible = False ActiveControl = butClose BorderIcons = [biSystemMenu] BorderStyle = bsToolWindow Caption = 'Hydrogen - Element Information' ClientHeight = 397 ClientWidth = 359 Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poDefaultPosOnly OnCreate = FormCreate OnHide = FormHide OnPaint = FormPaint OnShow = UpdateInfo PixelsPerInch = 120 TextHeight = 16 object WinBevel1: TWinBevel Left = 5 Top = 5 Width = 349 Height = 37 WinBevel = True end object ElementName: TLabel Left = 1 Top = 8 Width = 359 Height = 29 Alignment = taCenter AutoSize = False Caption = 'Hydrogen' Font.Color = clWindowText Font.Height = -23 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Symbol: TLabel Left = 12 Top = 8 Width = 49 Height = 29 AutoSize = False Caption = 'H' Font.Color = clRed Font.Height = -23 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Number: TLabel Left = 297 Top = 8 Width = 50 Height = 29 Alignment = taRightJustify AutoSize = False Caption = '1' Font.Color = clBlue Font.Height = -23 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label1: TLabel Tag = 2 Left = 2 Top = 48 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Atomic Weight:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label2: TLabel Tag = 3 Left = 2 Top = 64 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Oxidation States:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label3: TLabel Tag = 2 Left = 2 Top = 80 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Boiling Point:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label4: TLabel Tag = 3 Left = 2 Top = 96 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Melting Point:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label5: TLabel Tag = 2 Left = 2 Top = 112 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Density:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label6: TLabel Tag = 3 Left = 2 Top = 128 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Electron Configuration:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label7: TLabel Tag = 2 Left = 2 Top = 144 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Acid/Base Properties:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label8: TLabel Tag = 3 Left = 2 Top = 160 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Crystal Structure:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label9: TLabel Tag = 2 Left = 2 Top = 176 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Electronegativity:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label10: TLabel Tag = 3 Left = 2 Top = 192 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Heat of Vaporization:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label11: TLabel Tag = 2 Left = 2 Top = 208 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Heat of Fusion:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label12: TLabel Tag = 3 Left = 2 Top = 224 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Electrical Conductivity:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label13: TLabel Tag = 2 Left = 2 Top = 240 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Thermal Conductivity:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label14: TLabel Tag = 3 Left = 2 Top = 256 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Specific Heat Capacity:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label15: TLabel Tag = 2 Left = 2 Top = 272 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'First Ionization Potential:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label16: TLabel Tag = 3 Left = 2 Top = 288 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Atomic Volume:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label17: TLabel Tag = 2 Left = 2 Top = 304 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Atomic Radius:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label18: TLabel Tag = 3 Left = 2 Top = 320 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Covalent Radius:' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label19: TLabel Tag = 2 Left = 2 Top = 336 Width = 170 Height = 16 Alignment = taRightJustify AutoSize = False Caption = 'Synthetic:' Font.Color = clNavy Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Weight: TEdit Tag = 4 Left = 177 Top = 48 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 0 Text = '1.00794 g/mol' end object OxidationStates: TEdit Tag = 5 Left = 177 Top = 64 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 1 Text = '1' end object BoilingPoint: TEdit Tag = 4 Left = 177 Top = 80 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 2 Text = '20.28 K' end object MeltingPoint: TEdit Tag = 5 Left = 177 Top = 96 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 3 Text = '13.81 K' end object Density: TEdit Tag = 4 Left = 177 Top = 112 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 4 Text = '0.0899 (Gas 273K) g/l' end object ElectronConfig: TEdit Tag = 5 Left = 177 Top = 128 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 5 Text = '1s1' end object AcidBaseProp: TEdit Tag = 4 Left = 177 Top = 144 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 6 Text = 'Amphoteric' end object CrystalStruct: TEdit Tag = 5 Left = 177 Top = 160 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 7 Text = 'Hexagonal' end object ElectroNeg: TEdit Tag = 4 Left = 177 Top = 176 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 8 Text = '2.10' end object HeatVapor: TEdit Tag = 5 Left = 177 Top = 192 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 9 Text = '0.4581 kj/mol' end object HeatFusion: TEdit Tag = 4 Left = 177 Top = 208 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 10 Text = '0.0585 kj/mol' end object ElectroConduct: TEdit Tag = 5 Left = 177 Top = 224 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 11 Text = '--' end object ThermalConduct: TEdit Tag = 4 Left = 177 Top = 240 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 12 Text = '0.1815 Wm-�K-�' end object SpecificHeat: TEdit Tag = 5 Left = 177 Top = 256 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 13 Text = '14.304 Jg-�K-�' end object FstIonPoten: TEdit Tag = 4 Left = 177 Top = 272 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 14 Text = '13.598 V' end object Volume: TEdit Tag = 5 Left = 177 Top = 288 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 15 Text = '14.10 cm�/mol' end object AtomicRadius: TEdit Tag = 4 Left = 177 Top = 304 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 16 Text = '2.08 �' end object CovalentRadius: TEdit Tag = 5 Left = 177 Top = 320 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 17 Text = '0.32 �' end object Synthetic: TEdit Tag = 4 Left = 177 Top = 336 Width = 180 Height = 17 AutoSize = False BorderStyle = bsNone Ctl3D = False Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = True ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 18 Text = 'False' end object butClose: TButton Left = 261 Top = 364 Width = 93 Height = 29 Cancel = True Caption = '&Close' Default = True TabOrder = 21 OnClick = butClick end object butHelp: TButton Left = 161 Top = 364 Width = 93 Height = 29 Caption = '&Help' TabOrder = 20 OnClick = butClick end object butCopy: TButton Left = 4 Top = 364 Width = 110 Height = 29 Caption = 'Copy &All Info' TabOrder = 19 OnClick = butClick end end