PC World Komputer 1999 January/pcwk_01_1999.iso/Top100sh/Edukacja/BKPERLIB/PERLIB32.EXE/0/RCDATA/TFRMGRAPH/TFRMGRAPH.txt

Text File | 1997-10-19 | 7KB | 300 lines

object frmGraph: TfrmGraph
  Left = 286
  Top = 222
  Width = 555
  Height = 429
  HelpContext = 6
  Caption = 'Trend Graph - BK Periodic Library'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = GraphMenu
  Position = poDefault
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnPaint = FormPaint
  PixelsPerInch = 120
  TextHeight = 16
  object panBack: TPanel
    Left = 0
    Top = 0
    Width = 547
    Height = 360
    Align = alClient
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Color = clWindow
    TabOrder = 0
    OnResize = panBackResize
    object pntGraph: TPaintBox
      Left = 0
      Top = 0
      Width = 543
      Height = 356
      Align = alClient
      PopupMenu = GraphPopup
      OnDblClick = MenuClick
      OnMouseMove = pntGraphMouseMove
      OnPaint = pntGraphPaint
    end
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 360
    Width = 547
    Height = 23
    Panels = <
      item
        Width = 50
      end
      item
        Width = 50
      end>
    SimplePanel = False
    OnResize = StatusBarResize
  end
  object GraphMenu: TMainMenu
    Left = 408
    Top = 104
    object mnuProperty: TMenuItem
      Caption = '&Property'
      ShortCut = 0
      object mnuAtomicRadius: TMenuItem
        Caption = 'Atomic &Radius'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuAtomicVolume: TMenuItem
        Caption = 'Atomic &Volume'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuAtomicWeight: TMenuItem
        Caption = 'Atomic &Weight'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuBoilingPoint: TMenuItem
        Caption = '&Boiling Point'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuCovalentRadius: TMenuItem
        Caption = '&Covalent Radius'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuDensity: TMenuItem
        Caption = '&Density'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuElectroConduct: TMenuItem
        Caption = '&Electrical Conductivity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuElectroneg: TMenuItem
        Caption = 'Electro&negativity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuFirstIonPoten: TMenuItem
        Caption = '&First Ionization Potential'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuHeatFusion: TMenuItem
        Caption = '&Heat of Fusion'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuHeatVapor: TMenuItem
        Caption = 'Heat of &Vaporization'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuMeltingPoint: TMenuItem
        Caption = '&Melting Point'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuSpecificHeat: TMenuItem
        Caption = '&Specific Heat'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuThermalConduct: TMenuItem
        Caption = '&Thermal Conductivity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuShowSymbolPos: TMenuItem
        Caption = 'Sho&w Symbol Positions'
        ShortCut = 0
        OnClick = MenuClick
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuClose: TMenuItem
        Caption = 'C&lose'
        ShortCut = 0
        OnClick = MenuClick
      end
    end
    object mnuHelp: TMenuItem
      Caption = '&Help'
      ShortCut = 0
      object mnuHelpTrends: TMenuItem
        Caption = '&Help On Trends'
        ShortCut = 112
        OnClick = MenuClick
      end
      object mnuAbout: TMenuItem
        Caption = '&About BK Periodic Library...'
        ShortCut = 0
        OnClick = MenuClick
      end
    end
  end
  object GraphPopup: TPopupMenu
    Left = 432
    Top = 148
    object mnuPropertyPopup: TMenuItem
      Caption = '&Property'
      ShortCut = 0
      object mnuAtomicRadiusPopup: TMenuItem
        Caption = 'Atomic &Radius'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuAtomicVolumePopup: TMenuItem
        Caption = 'Atomic &Volume'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuAtomicWeightPopup: TMenuItem
        Caption = 'Atomic &Weight'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuBoilingPointPopup: TMenuItem
        Caption = '&Boiling Point'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuCovalentRadiusPopup: TMenuItem
        Caption = '&Covalent Radius'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuDensityPopup: TMenuItem
        Caption = '&Density'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuElectroConductPopup: TMenuItem
        Caption = '&Electrical Conductivity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuElectronegPopup: TMenuItem
        Caption = 'Electro&negativity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuFirstIonPotenPopup: TMenuItem
        Caption = '&First Ionization Potential'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuHeatFusionPopup: TMenuItem
        Caption = '&Heat of Fustion'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuHeatVaporPopup: TMenuItem
        Caption = 'Heat of &Vaporization'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuMeltingPointPopup: TMenuItem
        Caption = '&Melting Point'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuSpecificHeatPopup: TMenuItem
        Caption = '&Specific Heat'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuThermalConductPopup: TMenuItem
        Caption = '&Thermal Conductivity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuClick
      end
    end
    object mnuShowSymbolPosPopup: TMenuItem
      Caption = '&Show Symbol Positions'
      ShortCut = 0
      OnClick = MenuClick
    end
    object N4: TMenuItem
      Caption = '-'
      ShortCut = 0
      OnClick = MenuClick
    end
    object mnuElementInfo: TMenuItem
      Caption = '&Element Information'
      ShortCut = 0
      OnClick = MenuClick
    end
    object N3: TMenuItem
      Caption = '-'
      ShortCut = 0
      OnClick = MenuClick
    end
    object mnuClosePopup: TMenuItem
      Caption = '&Close'
      ShortCut = 0
      OnClick = MenuClick
    end
  end
end