unit11.dfm

Delphi串口通信

      Top = 112
      Width = 81
      Height = 13
      AutoSize = False
      Caption = #25195#25551#32467#26463#20301#32622':'
    end
    object Label3: TLabel
      Left = 16
      Top = 184
      Width = 51
      Height = 13
      AutoSize = False
      Caption = #25195#25551#27493#38271':'
    end
    object Label4: TLabel
      Left = 16
      Top = 248
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #28783#30340#27425#25968':'
    end
    object Label5: TLabel
      Left = 16
      Top = 88
      Width = 50
      Height = 13
      Caption = '228,60 nm'
    end
    object Label6: TLabel
      Left = 16
      Top = 152
      Width = 35
      Height = 13
      Caption = '756 nm'
    end
    object Label9: TLabel
      Left = 16
      Top = 228
      Width = 32
      Height = 13
      Caption = 'Label9'
    end
    object UpDown1: TUpDown
      Left = 65
      Top = 64
      Width = 15
      Height = 21
      Associate = Edit2
      Max = 20000
      TabOrder = 0
      OnClick = UpDown1Click
    end
    object Edit2: TEdit
      Left = 16
      Top = 64
      Width = 49
      Height = 21
      AutoSelect = False
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
      Text = '0'
      OnKeyPress = Edit2KeyPress
    end
    object Edit3: TEdit
      Left = 16
      Top = 128
      Width = 49
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 2
      Text = '1,460'
      OnKeyPress = Edit3KeyPress
    end
    object UpDown2: TUpDown
      Left = 65
      Top = 128
      Width = 15
      Height = 21
      Associate = Edit3
      Max = 20000
      Position = 1460
      TabOrder = 3
      OnClick = UpDown2Click
    end
    object Edit4: TEdit
      Left = 16
      Top = 200
      Width = 49
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 4
      Text = '10'
      OnKeyPress = Edit4KeyPress
    end
    object UpDown3: TUpDown
      Left = 65
      Top = 200
      Width = 15
      Height = 21
      Associate = Edit4
      Min = 1
      Position = 10
      TabOrder = 5
      OnClick = UpDown3Click
    end
    object Edit5: TEdit
      Left = 16
      Top = 264
      Width = 49
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 6
      Text = '5'
      OnKeyPress = Edit5KeyPress
    end
    object UpDown4: TUpDown
      Left = 65
      Top = 264
      Width = 15
      Height = 21
      Associate = Edit5
      Min = 1
      Position = 5
      TabOrder = 7
    end
  end
  object Button1: TButton
    Left = 40
    Top = 345
    Width = 75
    Height = 25
    Caption = 'Etalone file...'
    TabOrder = 4
    OnClick = Button1Click
  end
  object StringGrid1: TStringGrid
    Left = 152
    Top = 377
    Width = 513
    Height = 49
    ColCount = 4
    FixedCols = 0
    RowCount = 2
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
    TabOrder = 5
    OnExit = StringGrid1Exit
    ColWidths = (
      64
      64
      64
      64)
  end
  object GroupBox3: TGroupBox
    Left = 680
    Top = -15
    Width = 105
    Height = 385
    Caption = #28388#27874#29255#35774#32622':'
    TabOrder = 6
    object RadioGroup1: TRadioGroup
      Left = 8
      Top = 24
      Width = 89
      Height = 129
      Caption = #33639#20809':'
      ItemIndex = 0
      Items.Strings = (
        '290 nm'
        '370 nm'
        '515 nm'
        '680 nm'
        'Empty ')
      TabOrder = 0
      OnClick = RadioGroup1Click
    end
    object RadioGroup2: TRadioGroup
      Left = 8
      Top = 160
      Width = 89
      Height = 129
      Caption = '2-nd order:'
      Enabled = False
      ItemIndex = 0
      Items.Strings = (
        'Base'
        'Filter')
      TabOrder = 1
      Visible = False
    end
    object Button2: TButton
      Left = 14
      Top = 344
      Width = 75
      Height = 25
      Caption = 'Manual set'
      TabOrder = 2
      Visible = False
      OnClick = Button2Click
    end
  end
  object Button3: TButton
    Left = 40
    Top = 417
    Width = 75
    Height = 25
    Caption = 'Calc relations'
    TabOrder = 7
    Visible = False
    OnClick = Button3Click
  end
  object ProgressBar1: TProgressBar
    Left = 136
    Top = 433
    Width = 513
    Height = 16
    TabOrder = 8
  end
  object Button4: TButton
    Left = 40
    Top = 585
    Width = 75
    Height = 25
    Caption = 'Manual lit'
    TabOrder = 9
    Visible = False
    OnClick = Button4Click
  end
  object Button6: TButton
    Left = 608
    Top = 585
    Width = 75
    Height = 25
    Caption = 'Diap scan'
    TabOrder = 10
    Visible = False
    OnClick = Button6Click
  end
  object Button7: TButton
    Left = 688
    Top = 585
    Width = 75
    Height = 25
    Caption = 'Resh base'
    TabOrder = 11
    Visible = False
    OnClick = Button7Click
  end
  object CheckBox1: TCheckBox
    Left = 784
    Top = 593
    Width = 129
    Height = 17
    Caption = 'Do not move Engine ?'
    TabOrder = 12
    Visible = False
  end
  object Button5: TButton
    Left = 512
    Top = 585
    Width = 75
    Height = 25
    Caption = '14400'
    TabOrder = 13
    Visible = False
    OnClick = Button5Click
  end
  object MainMenu1: TMainMenu
    Left = 528
    Top = 72
    object File1: TMenuItem
      Caption = #25991#20214
      object Open1: TMenuItem
        Caption = #25171#24320
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = #20445#23384
        OnClick = Save1Click
      end
      object OpenTotal1: TMenuItem
        Caption = #25171#24320#20840#37096
        OnClick = OpenTotal1Click
      end
      object SaveAs1: TMenuItem
        Caption = #20445#23384#20840#37096
        OnClick = SaveAs1Click
      end
      object Exit1: TMenuItem
        Caption = #36864#20986
        OnClick = Exit1Click
      end
    end
    object Edit1: TMenuItem
      Caption = #32534#36753
      object Copy2: TMenuItem
        Caption = #25335#36125
        ShortCut = 16451
        OnClick = Copy2Click
      end
      object Cut2: TMenuItem
        Caption = #21098#20999
        ShortCut = 16472
        OnClick = Cut2Click
      end
      object Paste2: TMenuItem
        Caption = #31896#36148
        ShortCut = 16470
      end
      object Clear2: TMenuItem
        Caption = #28165#38500
        ShortCut = 16466
      end
    end
    object Mode1: TMenuItem
      Caption = #27169#24335
      object Chartaxis1: TMenuItem
        Caption = #22352#26631#36724':'
        object ElemNumTonm1: TMenuItem
          Caption = #27874#38271'(nm)?'
          Checked = True
          OnClick = ElemNumTonm1Click
        end
      end
      object Chartmode1: TMenuItem
        Caption = #33639#20809':'
        object Bar1: TMenuItem
          Caption = #26609#29366#22270
          OnClick = Bar1Click
        end