unit1.dfm

手机串口通信的源代码

object Form1: TForm1
  Left = 269
  Top = 172
  BorderStyle = bsDialog
  Caption = #24799#26131'SI4904'#24179#21488' V2.1'
  ClientHeight = 417
  ClientWidth = 439
  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 GroupBox2: TGroupBox
    Left = 0
    Top = 171
    Width = 439
    Height = 246
    Align = alBottom
    Caption = #20449#24687#25552#31034':(www.ve100.com  www.xintel.com.cn)'
    TabOrder = 0
    object Gauge1: TGauge
      Left = 2
      Top = 229
      Width = 435
      Height = 15
      Align = alBottom
      Progress = 0
    end
    object RichEdit1: TRichEdit
      Left = 2
      Top = 15
      Width = 435
      Height = 214
      Align = alClient
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 439
    Height = 171
    Align = alClient
    TabOrder = 1
    object GroupBox1: TGroupBox
      Left = 1
      Top = 1
      Width = 437
      Height = 169
      Align = alClient
      Caption = #35774#32622':'
      TabOrder = 0
      object Label1: TLabel
        Left = 0
        Top = 63
        Width = 69
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = #23383#24211#25991#20214':'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = -10
        Top = 25
        Width = 46
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'COM:'
      end
      object Label3: TLabel
        Left = 121
        Top = 25
        Width = 61
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = #27874#29305#29575':'
      end
      object Label4: TLabel
        Left = 248
        Top = 25
        Width = 78
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = #23383#24211#22823#23567':'
      end
      object sibox: TComComboBox
        Left = 43
        Top = 21
        Width = 72
        Height = 21
        ComPort = siport
        ComProperty = cpPort
        Text = 'COM1'
        Style = csDropDownList
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 0
      end
      object Edit1: TEdit
        Left = 72
        Top = 60
        Width = 321
        Height = 21
        TabOrder = 1
      end
      object Open_btn: TButton
        Left = 398
        Top = 59
        Width = 25
        Height = 22
        Caption = '...'
        TabOrder = 2
        OnClick = Open_btnClick
      end
      object Write_btn: TBitBtn
        Left = 94
        Top = 98
        Width = 76
        Height = 31
        Caption = #20889#23383#24211
        TabOrder = 3
        OnClick = Write_btnClick
        Glyph.Data = {
          E2020000424DE202000000000000E20100002800000010000000100000000100
          08000000000000010000120B0000120B00006B0000006B0000008480AA00A19A
          B200BAB7BC00FF00FF00C7BCC600BBB7B70003650000015D0000035A05000467
          0600036E070010891A00118B1C0000510A00128E1F0013902100035E10001381
          210019982B001FAC340021AF370023B13C0023A63E0028B845002ABC49002DC0
          4D000056140028AD460031C5550033C95900035E1C0036CE600038D065003AD1
          68003CD36A003DD56C000075880000B1FF000074A6000079E1002075DC000047
          BB00005CFF00003ED0000037B6000036CE00002DC100516FDD000023BD000027
          FF000D2FF6000022FF000023FF000018F0000018EF000017EE000017EA000014
          FA000013D9000011D8000012D8000012D7000012D5000011D3000010CE00000E
          C600000FE600000DC500000DC100000CC000000BBF00000CBF00000CBD00000A
          B6000009B100020BB5000611B400222CC0007378C0000007A9000006A6000006
          A4000004A3000005A30000049E000107A5000D13A6000004AF0000039E000003
          9C000003990000029600000192000001910000028F000103960001018A000507
          910005058800070789000707880008098C0008088B0008098B001B1B8E00B7B7
          D500000000000303030303036464645D03030303030303030366646405004C3B
          5D030303030303646401024E4D575844415E030303036404692F32394240495A
          4A485D0303030368282A292D33373F4654524B6703032C27252626080833373E
          4753595565030330242608120F0834353D45515B5F63030330081619150E0834
          363C45505C600303081B211D18140C0834353A434F6203081B2323201C17130B
          0831386165030808080811231F080808080865030303030303031E2322082E2B
          56030303030303030303081B2308030303030303030303030303031023230803
          0303030303030303030303030908230803030303030303030303030303030A06
          071A0D030303}
      end
      object ComboBox1: TComboBox
        Left = 185
        Top = 21
        Width = 69
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 4
        Text = '921600'
        Items.Strings = (
          '921600'
          '460800'
          '230400'
          '115200')
      end
      object ComboBox2: TComboBox
        Left = 328
        Top = 21
        Width = 97
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 5
        Text = '0x800000(8M)'
        Items.Strings = (
          '0x800000(8M)'
          '0x1000000(16M)')
      end
      object Stop_btn: TBitBtn
        Left = 353
        Top = 98
        Width = 76
        Height = 31
        Caption = #20572#27490
        TabOrder = 6
        OnClick = Stop_btnClick
        Glyph.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
          FF00FFFF00FFFF00FF01079F0313A90418AE0419AE0313A90108A0FF00FFFF00