config.dfm

求是科技出版的《Delphi串口通信工程开发实例导航》所有的源代码。是一本很好的书。拿出来与大家共享。

object frmConfig: TfrmConfig
  Left = 368
  Top = 281
  Width = 492
  Height = 269
  Caption = #21442#25968#35774#32622
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 8
    Top = 8
    Width = 465
    Height = 193
    ActivePage = TabSheet3
    TabIndex = 2
    TabOrder = 2
    object TabSheet1: TTabSheet
      Caption = #26816#27979#21442#25968
      object Label1: TLabel
        Left = 144
        Top = 56
        Width = 168
        Height = 13
        Caption = #26816#27979#21040#26032#37038#20214#26102#25773#25918#30340#22768#38899#25991#20214
      end
      object Label2: TLabel
        Left = 136
        Top = 112
        Width = 48
        Height = 13
        Caption = #26816#27979#26102#38388
      end
      object GroupBox2: TGroupBox
        Left = 24
        Top = 16
        Width = 401
        Height = 129
        TabOrder = 0
        object Label9: TLabel
          Left = 16
          Top = 16
          Width = 168
          Height = 13
          Caption = #26816#27979#21040#26032#37038#20214#26102#25773#25918#30340#22768#38899#25991#20214
        end
        object Label10: TLabel
          Left = 14
          Top = 68
          Width = 84
          Height = 13
          Caption = #26816#27979#26102#38388#65288#20998#65289
        end
        object Label11: TLabel
          Left = 189
          Top = 68
          Width = 84
          Height = 13
          Caption = #36229#26102#26102#38388#65288#20998#65289
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object edtWaveFile: TEdit
          Left = 24
          Top = 35
          Width = 273
          Height = 21
          TabOrder = 0
        end
        object btnOpenDlg: TButton
          Left = 304
          Top = 32
          Width = 33
          Height = 25
          Caption = '...'
          TabOrder = 1
          OnClick = btnOpenDlgClick
        end
        object btnPlay: TButton
          Left = 344
          Top = 32
          Width = 41
          Height = 25
          Caption = #25773#25918
          TabOrder = 2
          OnClick = btnPlayClick
        end
        object edtInterval: TEdit
          Left = 112
          Top = 64
          Width = 49
          Height = 21
          TabOrder = 3
          Text = '5'
        end
        object edtTimeOut: TEdit
          Left = 288
          Top = 64
          Width = 57
          Height = 21
          TabOrder = 4
          Text = '2'
        end
        object chkHide: TCheckBox
          Left = 16
          Top = 96
          Width = 121
          Height = 25
          Caption = #26368#23567#21270#26102#38544#34255
          Checked = True
          State = cbChecked
          TabOrder = 5
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #20018#21475#21442#25968
      ImageIndex = 1
      object GroupBox1: TGroupBox
        Left = 24
        Top = 16
        Width = 401
        Height = 129
        TabOrder = 0
        object Label4: TLabel
          Left = 16
          Top = 24
          Width = 36
          Height = 13
          Caption = #27874#29289#29575
        end
        object Label5: TLabel
          Left = 200
          Top = 24
          Width = 36
          Height = 13
          Caption = #36739#39564#20301
        end
        object Label6: TLabel
          Left = 16
          Top = 56
          Width = 36
          Height = 13
          Caption = #25968#25454#20301
        end
        object Label7: TLabel
          Left = 200
          Top = 56
          Width = 36
          Height = 13
          Caption = #20572#27490#20301
        end
        object Label8: TLabel
          Left = 16
          Top = 91
          Width = 36
          Height = 13
          Caption = #20018#21475#21495
        end
        object cmbBaudRate: TComboBox
          Left = 72
          Top = 20
          Width = 105
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 0
          TabOrder = 0
          Text = '19200'
          Items.Strings = (
            '19200'
            '9600'
            '2400'
            '1200'
            '300')
        end
        object cmbParity: TComboBox
          Left = 264
          Top = 20
          Width = 113
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 0
          TabOrder = 1
          Text = 'None'
          Items.Strings = (
            'None'
            'Odd'
            'Even'
            'Mark'
            'Space')
        end
        object cmbDatabits: TComboBox
          Left = 72
          Top = 52
          Width = 105
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 0
          TabOrder = 2
          Text = '8'
          Items.Strings = (
            '8'
            '7'
            '6')
        end
        object cmbStopbits: TComboBox
          Left = 264
          Top = 52
          Width = 113
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 0
          TabOrder = 3
          Text = '1'
          Items.Strings = (
            '1'
            '1.5'
            '2')
        end
        object cmbCom: TComboBox
          Left = 72
          Top = 87
          Width = 105
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 0
          TabOrder = 4
          Text = 'COM1'
          Items.Strings = (
            'COM1'
            'COM2'
            'COM3'
            'COM4')
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = #30701#20449#21442#25968
      ImageIndex = 2
      object GroupBox3: TGroupBox
        Left = 24
        Top = 16
        Width = 401
        Height = 129
        TabOrder = 0
        object Label3: TLabel
          Left = 24
          Top = 32
          Width = 75
          Height = 13
          Caption = #30701#20449#20013#24515#21495#30721':'
        end
        object Label12: TLabel
          Left = 24
          Top = 80
          Width = 51
          Height = 13
          Caption = #21457#36865#26041#24335':'
        end
        object edtSMSCenter: TEdit
          Left = 120
          Top = 26
          Width = 137
          Height = 24
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
        end
        object RadText: TRadioButton
          Left = 120
          Top = 78
          Width = 89
          Height = 17
          Caption = #33521#25991'(Text)'
          TabOrder = 1
        end
        object RadPdu: TRadioButton
          Left = 216
          Top = 78
          Width = 81
          Height = 17
          Caption = #20013#25991'(Pdu)'
          Checked = True
          TabOrder = 2
          TabStop = True
        end
      end
    end
  end
  object btnOK: TBitBtn
    Left = 296
    Top = 208
    Width = 81
    Height = 25
    Caption = #30830#23450
    Default = True
    ModalResult = 1
    TabOrder = 0
    OnClick = btnOKClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object btnCancel: TBitBtn
    Left = 392
    Top = 208
    Width = 81
    Height = 25
    Caption = #21462#28040
    TabOrder = 1
    Kind = bkCancel
  end
  object dlgOpenFile: TOpenDialog
    Filter = #27874#24418#25991#20214'(*.wav)|*.wav'
    Left = 112
    Top = 208
  end
end