serialdebug.dfm

GPS对讲机接收

object MainForm: TMainForm
  Left = 364
  Top = 168
  Width = 721
  Height = 528
  Caption = #23545#35762'GPS'#24212#29992#31243#24207'  '
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 337
    Width = 713
    Height = 157
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    OnClick = Panel2Click
    object shpSerial: TShape
      Left = 144
      Top = 13
      Width = 17
      Height = 17
      Brush.Color = clRed
      Shape = stCircle
    end
    object Label5: TLabel
      Left = 312
      Top = 8
      Width = 96
      Height = 13
      Caption = #25509#25910#21040#30340#25968#25454#65306'    '
    end
    object Panel1: TPanel
      Left = 2
      Top = 2
      Width = 135
      Height = 153
      Align = alLeft
      BevelInner = bvRaised
      BevelOuter = bvLowered
      Enabled = False
      TabOrder = 0
      object Label1: TLabel
        Left = 8
        Top = 8
        Width = 42
        Height = 13
        Caption = #20018#21475#21495'  '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -9
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 8
        Top = 38
        Width = 45
        Height = 13
        Caption = #27874#29305#29575'   '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -9
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 8
        Top = 68
        Width = 42
        Height = 13
        Caption = #25968#25454#20301'  '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -9
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 8
        Top = 99
        Width = 45
        Height = 13
        Caption = #20572#27490#20301'   '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -9
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 8
        Top = 129
        Width = 42
        Height = 13
        Caption = #26657#39564#20301'  '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -9
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object cmbbxComNum: TComboBox
        Left = 56
        Top = 8
        Width = 65
        Height = 21
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 13
        TabOrder = 0
        Text = 'COM1'
        Items.Strings = (
          'COM1'
          'COM2'
          'COM3')
      end
      object cmbbxBaud: TComboBox
        Left = 56
        Top = 38
        Width = 65
        Height = 21
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 13
        TabOrder = 1
        Text = '9600'
        Items.Strings = (
          '110'
          '300'
          '600'
          '1200'
          '2400'
          '4800'
          '9600'
          '14400'
          '19200'
          '38400'
          '56000')
      end
      object cmbbxDataNum: TComboBox
        Left = 56
        Top = 68
        Width = 65
        Height = 21
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 13
        TabOrder = 2
        Text = '8'
        Items.Strings = (
          '5'
          '6'
          '7'
          '8')
      end
      object cmbbxStopBit: TComboBox
        Left = 56
        Top = 99
        Width = 65
        Height = 21
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 13
        TabOrder = 3
        Text = '1'
        Items.Strings = (
          '1'
          '2')
      end
      object cmbbxCheckBit: TComboBox
        Left = 56
        Top = 129
        Width = 65
        Height = 21
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 13
        TabOrder = 4
        Text = 'N'
        Items.Strings = (
          'N'
          'M'
          'N'
          'O'
          'S')
      end
    end
    object btnSerial: TButton
      Left = 176
      Top = 8
      Width = 75
      Height = 30
      Caption = #25171#24320#20018#21475
      TabOrder = 1
      OnClick = btnSerialClick
    end
    object btnClear: TButton
      Left = 176
      Top = 108
      Width = 75
      Height = 25
      Caption = #28165#25509#25910#26174#31034' '
      TabOrder = 2
      OnClick = btnClearClick
    end
    object mmReceive: TMemo
      Left = 272
      Top = 24
      Width = 425
      Height = 121
      Lines.Strings = (
        '')
      TabOrder = 3
    end
    object Button2: TButton
      Left = 176
      Top = 44
      Width = 75
      Height = 25
      Caption = #20027#31449#35774#23450
      TabOrder = 4
      OnClick = Button2Click
    end
  end
  object MSComm: TMSComm
    Left = 296
    Top = 240
    Width = 32
    Height = 32
    OnComm = MSCommComm
    ControlData = {
      2143341208000000ED030000ED03000001568A64000006000000010000040000
      00020100802500000000080000000000000000003F00000005000000}
  end
  object Button3: TButton
    Left = 240
    Top = 128
    Width = 75
    Height = 25
    Caption = #25509#25910#25968#25454
    TabOrder = 2
    Visible = False
    OnClick = Button3Click
  end
  object Button1: TButton
    Left = 120
    Top = 128
    Width = 75
    Height = 25
    Caption = #20572#27490#25509#25910
    TabOrder = 3
    OnClick = Button1Click
  end
  object GroupBox1: TGroupBox
    Left = 360
    Top = 8
    Width = 321
    Height = 321
    Caption = #22810#21488'GPS'
    TabOrder = 4
    object CheckListBox1: TCheckListBox
      Left = 16
      Top = 16
      Width = 217
      Height = 289
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
      ItemHeight = 13
      TabOrder = 0
    end
    object Button8: TButton
      Left = 238
      Top = 48
      Width = 75
      Height = 25
      Caption = #22810#21488#22810#32452
      TabOrder = 1
      OnClick = Button8Click
    end
    object Button9: TButton
      Left = 238
      Top = 16
      Width = 75
      Height = 25
      Caption = #22810#21488#21333#32452
      TabOrder = 2
      OnClick = Button9Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 16
    Top = 8
    Width = 329
    Height = 113
    Caption = #21333#21488'GPS'
    TabOrder = 5
    object Label7: TLabel
      Left = 16
      Top = 27
      Width = 58
      Height = 13
      Caption = 'GPS'#32534#21495#65306
    end
    object Label8: TLabel
      Left = 120
      Top = 88
      Width = 108
      Height = 13
      Caption = #38388#38548'30'#31186#65307'32'#32452#25968#25454
      Color = clRed
      ParentColor = False
    end
    object Edit2: TEdit
      Left = 80
      Top = 24
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object Button5: TButton
      Left = 120
      Top = 56
      Width = 75
      Height = 25
      Caption = #21333#21488#22810#32452
      TabOrder = 1
      OnClick = Button5Click
    end
    object Button6: TButton
      Left = 40
      Top = 56
      Width = 75
      Height = 25
      Caption = #21333#21488#21333#32452
      TabOrder = 2
      OnClick = Button6Click
    end
    object Button4: TButton
      Left = 202
      Top = 56
      Width = 75
      Height = 25
      Caption = #31227#21160#21488#35774#23450
      TabOrder = 3
      OnClick = Button4Click
    end
  end
  object Timer1: TTimer
    Left = 328
    Top = 128
  end
end