test.dfm

化学式

object Form1: TForm1
  Left = 343
  Top = 96
  Width = 426
  Height = 328
  Caption = #31351#20030'[e-mail]'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 288
    Top = 248
    Width = 9
    Height = 13
    BiDiMode = bdLeftToRight
    Caption = 'M'
    ParentBiDiMode = False
  end
  object Label2: TLabel
    Left = 8
    Top = 200
    Width = 7
    Height = 13
    Caption = 'C'
    Color = clActiveBorder
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Label3: TLabel
    Left = 88
    Top = 200
    Width = 8
    Height = 13
    Caption = 'H'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 168
    Top = 200
    Width = 8
    Height = 13
    Caption = 'O'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 248
    Top = 200
    Width = 8
    Height = 13
    Caption = 'N'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 336
    Top = 200
    Width = 9
    Height = 13
    Caption = 'Cl'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 8
    Top = 248
    Width = 7
    Height = 13
    Caption = 'S'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 80
    Top = 248
    Width = 14
    Height = 13
    Caption = 'Na'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 152
    Top = 248
    Width = 9
    Height = 13
    Caption = 'Al'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label10: TLabel
    Left = 224
    Top = 248
    Width = 7
    Height = 13
    BiDiMode = bdLeftToRight
    Caption = 'A'
    ParentBiDiMode = False
  end
  object ListBox1: TListBox
    Left = 0
    Top = 0
    Width = 417
    Height = 185
    ItemHeight = 13
    TabOrder = 0
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 279
    Width = 418
    Height = 22
    Panels = <
      item
        Text = #23601#32490'...'
        Width = 50
      end>
    SimplePanel = False
  end
  object eM: TEdit
    Left = 304
    Top = 248
    Width = 41
    Height = 21
    Color = clInfoBk
    TabOrder = 2
    OnKeyPress = eMKeyPress
  end
  object btnStart: TButton
    Left = 352
    Top = 248
    Width = 49
    Height = 25
    Caption = #24320#22987
    Font.Charset = OEM_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = btnStartClick
  end
  object eC: TEdit
    Left = 24
    Top = 200
    Width = 49
    Height = 21
    TabOrder = 4
    OnKeyPress = eCKeyPress
  end
  object eH: TEdit
    Left = 104
    Top = 200
    Width = 49
    Height = 21
    TabOrder = 5
    OnKeyPress = eHKeyPress
  end
  object eO: TEdit
    Left = 184
    Top = 200
    Width = 49
    Height = 21
    TabOrder = 6
    OnKeyPress = eOKeyPress
  end
  object eN: TEdit
    Left = 272
    Top = 200
    Width = 49
    Height = 21
    TabOrder = 7
    OnKeyPress = eNKeyPress
  end
  object eCl: TEdit
    Left = 352
    Top = 200
    Width = 49
    Height = 21
    TabOrder = 8
    OnKeyPress = eClKeyPress
  end
  object eS: TEdit
    Left = 24
    Top = 248
    Width = 49
    Height = 21
    TabOrder = 9
    OnKeyPress = eSKeyPress
  end
  object eNa: TEdit
    Left = 96
    Top = 248
    Width = 49
    Height = 21
    TabOrder = 10
    OnKeyPress = eNaKeyPress
  end
  object eAl: TEdit
    Left = 168
    Top = 248
    Width = 49
    Height = 21
    TabOrder = 11
    OnKeyPress = eAlKeyPress
  end
  object eA: TEdit
    Left = 240
    Top = 248
    Width = 41
    Height = 21
    Color = clInfoBk
    TabOrder = 12
    OnKeyPress = eAKeyPress
  end
end