main.dfm

Delphi编写的串口测试程序

object Form1: TForm1
  Left = 239
  Top = 191
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #20018#21475#27979#35797
  ClientHeight = 372
  ClientWidth = 710
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 185
    Height = 201
    Caption = #20018#21475#35774#32622#65306
    TabOrder = 0
    object Label1: TLabel
      Left = 40
      Top = 16
      Width = 24
      Height = 12
      Caption = #20018#21475
    end
    object Label2: TLabel
      Left = 32
      Top = 40
      Width = 36
      Height = 12
      Caption = #27874#29305#29575
    end
    object Label3: TLabel
      Left = 28
      Top = 64
      Width = 36
      Height = 12
      Caption = #25968#25454#20301
    end
    object Label4: TLabel
      Left = 32
      Top = 88
      Width = 36
      Height = 12
      Caption = #20572#27490#20301
    end
    object Label5: TLabel
      Left = 16
      Top = 112
      Width = 48
      Height = 12
      Caption = #22855#20598#26657#39564
    end
    object Label6: TLabel
      Left = 32
      Top = 136
      Width = 36
      Height = 12
      Caption = #27969#25511#21046
    end
    object Label16: TLabel
      Left = 12
      Top = 160
      Width = 66
      Height = 12
      Caption = '*'#35831#20808#35774#32622#22909
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label17: TLabel
      Left = 12
      Top = 176
      Width = 72
      Height = 12
      Caption = #20018#21475#20877#21457#36865#65281
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object ComboBox1: TComboBox
      Left = 80
      Top = 16
      Width = 89
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      ItemIndex = 0
      TabOrder = 0
      Text = 'COM1'
      Items.Strings = (
        'COM1'
        'COM2'
        'COM3'
        'COM4'
        'COM5'
        'COM6'
        'COM7'
        'COM8')
    end
    object ComboBox2: TComboBox
      Left = 80
      Top = 40
      Width = 89
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      ItemIndex = 2
      TabOrder = 1
      Text = '9600'
      Items.Strings = (
        '2400'
        '4800'
        '9600'
        '14400'
        '19200'
        '38400'
        '57600'
        '115200'
        '128000')
    end
    object ComboBox3: TComboBox
      Left = 80
      Top = 64
      Width = 89
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      ItemIndex = 3
      TabOrder = 2
      Text = '8'
      Items.Strings = (
        '5'
        '6'
        '7'
        '8')
    end
    object ComboBox4: TComboBox
      Left = 80
      Top = 88
      Width = 89
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      ItemIndex = 0
      TabOrder = 3
      Text = '1'
      Items.Strings = (
        '1'
        '1.5'
        '2')
    end
    object ComboBox5: TComboBox
      Left = 80
      Top = 112
      Width = 89
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      ItemIndex = 2
      TabOrder = 4
      Text = #26080
      Items.Strings = (
        #20598
        #22855
        #26080
        #26631#24535
        #31354#26684)
    end
    object ComboBox6: TComboBox
      Left = 80
      Top = 136
      Width = 89
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      ItemIndex = 2
      TabOrder = 5
      Text = #26080
      Items.Strings = (
        'Xon/Xoff'
        #30828#20214
        #26080)
    end
    object BitBtn1: TBitBtn
      Left = 96
      Top = 168
      Width = 75
      Height = 25
      Caption = #35774#32622'(&S)'
      TabOrder = 6
      OnClick = BitBtn1Click
      Glyph.Data = {
        3E030000424D3E030000000000003E0200002800000010000000100000000100
        08000000000000010000120B0000120B0000820000008200000000000000FFFF
        FF00FF00FF00D8B6B600B3A5A500ABA0A000ACA2A200ABA1A100A39E9E009996
        9600A5A3A300EAE9E900E5E4E400E1E0E00097969600DCB5B400E1B7B500E0B8
        B600DDB6B400E9E3E200E9E2E000ECE5E200E5E3E200C6C7C700B2B3B300B1B2
        B200AEAFAF007DEBFF008DEFFF0092EFFF009CF0FF0002D2FF001CD8FF001ED7
        FF0027DAFF0052E2FF005AE5FF005CB8CC0079E8FF0071D3E80095EDFF00ACEC
        F90004CFFE0007D1FF0008C9F50009D0FE0014D3FE001ED2FB001DC7F0002AC7
        EB003ADBFF0039C8EC003FCBEE0048D7F80045BCD80059DCFA005FD4F10050B2
        C90065E1FD007CE4FB0085DBEF0091C7D300B5EFFC00B0E1EC000EB4E10011A1
        CB0014AED90024AED60033B1D50037B8DC0051C0DE005CC1DD006DD7F60068CA
        E60067C4DE0081DFF7000C9ECB00149AC3001E9AC10020A1C90024A5CC002CAA
        CF002BA3C90031B1D90032A5C90034A6CA003DA8CB0043ABCC0048B0D2004EB5
        D5005ACFF40053BEE00060BAD70075C6DF008ACBE00090CEE1000579A4000D8F
        BE000E80AA000F84AE001082AC001391C000148CB8001389B4001787AF00188B
        B4001C8EB8001B8BB50022A6D7001E92BC0027ADDF0027ACDD00208CB40028AD
        DE002293BA002CA4CE0031B4E30036BCEB002C98BD003FBBE70047C5EF003FA4
        C6003D9BBD004EC3EA0048A5C40020A2D3001F9DCD00BCBCBC00B2B2B200A0A0
        A000020202020202024F51640202020202020202025250634D43446968575602
        020202020254454241303555474A79020202027076593C46332132385D3F5F6B
        0202025C585B281C24222023261B3453730202656C7B4B1D272539312B2A2D2C
        4002026A7177483D0E0E0E0E361F2E2F4C02026D6E745A0E131806100E371E3E
        7A0202667E6F780E1419060F0E3B295E7C020202627D750E141906120E3A4960
        020202020267610E151906110E4E7202020202020202020E161A07030E020202
        020202020202020E808109050E020202020202020202020E0D170A040E020202
        020202020202020E0C0B7F080E02020202020202020202020E0E0E0E02020202
        0202}
    end
  end
  object GroupBox2: TGroupBox
    Left = 192
    Top = 0
    Width = 513
    Height = 183
    Caption = #21457#36865#21306#65306
    TabOrder = 1
    object Label7: TLabel
      Left = 8
      Top = 160
      Width = 48
      Height = 12
      Caption = #24050#21457#36865#65306
    end
    object Label9: TLabel
      Left = 64
      Top = 160
      Width = 36
      Height = 12
      Caption = 'Label9'
    end
    object Memo1: TMemo
      Left = 2
      Top = 14
      Width = 509
      Height = 132
      Align = alTop
      ScrollBars = ssVertical
      TabOrder = 0
    end
    object BitBtn2: TBitBtn
      Left = 432
      Top = 152
      Width = 75
      Height = 25
      Caption = #21457#36865'(&T)'
      TabOrder = 1
      OnClick = BitBtn2Click
      Glyph.Data = {
        D2020000424DD202000000000000D20100002800000010000000100000000100
        08000000000000010000120B0000120B0000670000006700000000000000FFFF
        FF00FF00FF00A46769008E5D590080504B00A0675B00A7756B00BC826800CF8E
        6800D1926D00DA9D7500FFFCFA00E7AB7900FCF4EB00F6E3C900F8E7D100FBF3
        E900FEF8F000FEFBF700E9BF8200EAC18600EAC28700EBC48A00EBC58C00EBC5
        8E00EBC68F00EDC79200EBC79100EDC99300EECA9800EECB9900EECC9A00EECE
        9E00EFD1A500F2D5AC00F0D4AA00F0D4AB00F2D8B100F2D9B400F2DAB600F4DE
        BD00F6E0C100F6E1C400F6E2C500F6E3C700F7E7CF00F8E9D300F8EBD900FAEE
        DC00FAF0E100FBF2E500FCF4E900FBF4EA00FCF7F000FEFAF400EBC48900EDCA
        9500EFD0A000EFD1A300F2D7AD00F2D9B200F3DCB800F4DDBA00F3DDBB00F4E0
        C000F4E1C200F4E3C700F7E6CA00F7E9D300F8EBD700F8EDDC00FAF0E000EFD4
        A700F2DCB700F6E6CB00F8EBD400F8EBD500F8EDD900FCF7EE00B6AC9800F8EF
        DE00FAF2E300FAF3E600FFFEFC00FFFEFB00FCFBF600B7B4A400BABAB000FEFE
        FC00BBBDB700BBBFBA00BBBFBB00FEFFFE00BCC4C400BFC9CF0049ACFF00C0CE
        D900C1D0DE001F86F300C1D0E000C1CFDE0007397A0002020202020202020202
        0202020202020203040404040404040404040405020202033E262522211E1B19
        38151405020202064240273C666666391A171605020202064B2C666663636366
        661C1805020202074C2E5A6660606066501F1D05020202075146105B66606657
        493A20050202020853484E2F5C66584A26243B05020202084F3452314D2E2D2A
        3F3D23050202020A56120E33666666442B2928050202020A5513666663636366
        664341050202020B01596566606060665E2E0F050202020B01015D626660665F
        483045050202020D010101016466614F113247050202020D0101010101540C37
        363533050202020D0909090909090909090909050202}
    end
  end
  object GroupBox3: TGroupBox
    Left = 192
    Top = 186
    Width = 513
    Height = 182
    Caption = #25509#25910#21306#65306
    TabOrder = 2
    object Label8: TLabel
      Left = 10
      Top = 163
      Width = 48
      Height = 12
      Caption = #24050#25509#25910#65306
    end
    object Label10: TLabel
      Left = 66
      Top = 163
      Width = 42