gpstestu.~dfm

根据水潭改编

          TabOrder = 8
          OnClick = BitBtn4Click
        end
      end
    end
    object TabSheet4: TTabSheet
      Caption = #31995#32479#35774#32622
      ImageIndex = 1
      object GroupBox2: TGroupBox
        Left = 0
        Top = 4
        Width = 153
        Height = 249
        Caption = #31995#32479#37197#32622
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object Label14: TLabel
          Left = 8
          Top = 192
          Width = 73
          Height = 20
          AutoSize = False
          Caption = #27874#29305#29575':'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = [fsBold]
          ParentFont = False
        end
        object CheckBox1: TCheckBox
          Left = 16
          Top = 24
          Width = 73
          Height = 17
          Caption = 'GPGGA'
          Checked = True
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          State = cbChecked
          TabOrder = 0
        end
        object CheckBox2: TCheckBox
          Left = 16
          Top = 48
          Width = 73
          Height = 17
          Caption = 'GPGSA'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object CheckBox3: TCheckBox
          Left = 16
          Top = 72
          Width = 73
          Height = 17
          Caption = 'GPGSV'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
        object CheckBox4: TCheckBox
          Left = 16
          Top = 96
          Width = 73
          Height = 17
          Caption = 'GPRMC'
          Checked = True
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          State = cbChecked
          TabOrder = 3
        end
        object CheckBox5: TCheckBox
          Left = 16
          Top = 120
          Width = 73
          Height = 17
          Caption = 'GPVTG'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 4
        end
        object CheckBox6: TCheckBox
          Left = 16
          Top = 144
          Width = 65
          Height = 17
          Caption = 'LCGLL'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 5
        end
        object CheckBox7: TCheckBox
          Left = 16
          Top = 168
          Width = 73
          Height = 17
          Caption = 'LCVTG'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 6
        end
        object CheckBox8: TCheckBox
          Left = 80
          Top = 24
          Width = 65
          Height = 17
          Caption = 'PGRMB'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 7
        end
        object CheckBox9: TCheckBox
          Left = 80
          Top = 48
          Width = 65
          Height = 17
          Caption = 'PGRME'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 8
        end
        object CheckBox10: TCheckBox
          Left = 80
          Top = 72
          Width = 65
          Height = 17
          Caption = 'PGRMF'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 9
        end
        object CheckBox11: TCheckBox
          Left = 80
          Top = 96
          Width = 65
          Height = 17
          Caption = 'PGRMT'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 10
        end
        object CheckBox12: TCheckBox
          Left = 80
          Top = 120
          Width = 65
          Height = 17
          Caption = 'PGRMV'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 11
        end
        object CheckBox13: TCheckBox
          Left = 80
          Top = 144
          Width = 65
          Height = 17
          Caption = 'PGRMM'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 12
        end
        object CheckBox14: TCheckBox
          Left = 80
          Top = 168
          Width = 65
          Height = 17
          Caption = 'GPGLL'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 13
        end
        object BitBtn5: TBitBtn
          Left = 8
          Top = 216
          Width = 65
          Height = 25
          Caption = #36339#39057
          TabOrder = 14
          OnClick = BitBtn5Click
        end
        object BitBtn6: TBitBtn
          Left = 80
          Top = 216
          Width = 67
          Height = 25
          Caption = #37197#32622
          TabOrder = 15
          OnClick = BitBtn6Click
        end
        object ComboBox3: TComboBox
          Left = 64
          Top = 192
          Width = 73
          Height = 20
          ItemHeight = 12
          TabOrder = 16
          Text = '4800'
          Items.Strings = (
            '1200'
            '2400'
            '4800'
            '9600'
            '19200'
            '300'
            '600'
            '38400'
            '')
        end
      end
      object GroupBox5: TGroupBox
        Left = 0
        Top = 256
        Width = 153
        Height = 81
        Caption = #26657#39564#30721
        TabOrder = 1
        object Edit18: TEdit
          Left = 8
          Top = 16
          Width = 137
          Height = 21
          TabOrder = 0
        end
        object Edit19: TEdit
          Left = 8
          Top = 48
          Width = 73
          Height = 21
          TabOrder = 1
        end
        object Button1: TButton
          Left = 88
          Top = 42
          Width = 59
          Height = 33
          Caption = #30830#23450
          TabOrder = 2
          OnClick = Button1Click
        end
      end
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 5000
    OnTimer = Timer1Timer
    Left = 568
    Top = 368
  end
  object Comm1: TComm
    CommName = 'COM1'
    BaudRate = 9600
    ParityCheck = False
    Outx_CtsFlow = False
    Outx_DsrFlow = False
    DtrControl = DtrEnable
    DsrSensitivity = False
    TxContinueOnXoff = True
    Outx_XonXoffFlow = True
    Inx_XonXoffFlow = True
    ReplaceWhenParityError = False
    IgnoreNullChar = False
    RtsControl = RtsEnable