unit_set_comm.~dfm

平台:c++ builder V6.0 功能:利用串口设备通讯,

object Form_Set_Comm: TForm_Set_Comm
  Left = 466
  Top = 138
  BorderStyle = bsToolWindow
  BorderWidth = 5
  Caption = #35774#32622#20018#21475#36890#35759#21442#25968
  ClientHeight = 247
  ClientWidth = 354
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object GroupBox_Comm_Par: TGroupBox
    Left = 0
    Top = 0
    Width = 245
    Height = 247
    Align = alLeft
    Caption = #36890#35759#21442#25968' (&A)'
    TabOrder = 0
    object Label_Warn: TLabel
      Left = 8
      Top = 68
      Width = 101
      Height = 39
      Alignment = taRightJustify
      AutoSize = False
      Caption = '             '#26080#21487#29992#31471'                '#21475','#35831#26816#26597#20320#30340#35745#31639#26426#30828#20214'!!!'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object Label1: TLabel
      Left = 8
      Top = 20
      Width = 66
      Height = 14
      Caption = #21487#29992#31471#21475'(&P) '
      Color = clBtnFace
      FocusControl = ComboBox_Comm_Port
      ParentColor = False
    end
    object Label2: TLabel
      Left = 120
      Top = 20
      Width = 52
      Height = 14
      Caption = #27874#29305#29575'(&R)'
      FocusControl = ComboBox_Baudrate
    end
    object Label3: TLabel
      Left = 120
      Top = 68
      Width = 51
      Height = 14
      Caption = #25968#25454#20301'(&B)'
      FocusControl = ComboBox_Data_Bit
    end
    object Label4: TLabel
      Left = 120
      Top = 112
      Width = 54
      Height = 14
      Caption = #26657#39564#20301'(&V) '
      FocusControl = ComboBox_Check_Bit
      ParentShowHint = False
      ShowHint = False
      WordWrap = True
    end
    object Label5: TLabel
      Left = 120
      Top = 168
      Width = 51
      Height = 14
      Caption = #20572#27490#20301'(&S)'
      FocusControl = ComboBox_Stop_Bit
    end
    object Image_Warn: TImage
      Left = 8
      Top = 60
      Width = 32
      Height = 32
      AutoSize = True
      Picture.Data = {
        055449636F6E0000010001002020100000000000E80200001600000028000000
        2000000040000000010004000000000080020000000000000000000000000000
        00000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000
        C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
        FFFFFF0000000000000000000000000000000000000000000000BBBBBBBB0000
        00000000000000000BBBBBBBBBBBBBB00000000000000000BBBBBBBBBBBBBBBB
        00000000000000BBBBBBBBBBBBBBBBBBBB00000000000BBBBBBBBBBBBBBBBBBB
        BBB000000000BBBB0BBBBBBBBBBBBBBB0BBB00000000BBBB0BBBBBBBBBBBBBBB
        0BBB0000000BBBBB0BBBBBBBBBBBBBBB0BBBB00000BBBBBB00BBBBBBBBBBBBB0
        0BBBBB0000BBBBBBB00BBBBBBBBBBB00BBBBBB0000BBBBBBBB00BBBBBBBBB00B
        BBBBBB000BBBBBBBBBB000BBBBB000BBBBBBBBB00BBBBBBBBBBBB0000000BBBB
        BBBBBBB00BBBBBBBBBBBBBBBBBBBBBBBBBBBBBB00BBBBBBBBBBBBBBBBBBBBBBB
        BBBBBBB00BBBBBBBBBBBBBBBBBBBBBBBBBBBBBB00BBBBBBBBBB00BBBBBB00BBB
        BBBBBBB00BBBBBBBBB0000BBBB0000BBBBBBBBB00BBBBBBBBB0000BBBB0000BB
        BBBBBBB000BBBBBBBB0000BBBB0000BBBBBBBB0000BBBBBBBB0000BBBB0000BB
        BBBBBB0000BBBBBBBB0000BBBB0000BBBBBBBB00000BBBBBBBB00BBBBBB00BBB
        BBBBB0000000BBBBBBBBBBBBBBBBBBBBBBBB00000000BBBBBBBBBBBBBBBBBBBB
        BBBB000000000BBBBBBBBBBBBBBBBBBBBBB00000000000BBBBBBBBBBBBBBBBBB
        BB00000000000000BBBBBBBBBBBBBBBB00000000000000000BBBBBBBBBBBBBB0
        00000000000000000000BBBBBBBB000000000000000000000000000000000000
        00000000FFF00FFFFF8001FFFE00007FFC00003FF800001FF000000FE0000007
        C0000003C0000003800000018000000180000001000000000000000000000000
        0000000000000000000000000000000000000000800000018000000180000001
        C0000003C0000003E0000007F000000FF800001FFC00003FFE00007FFF8001FF
        FFF00FFF}
      Stretch = True
    end
    object Label_Hint_Check: TLabel
      Left = 8
      Top = 136
      Width = 109
      Height = 14
      AutoSize = False
      Caption = '0-'#26080' 1-'#22855' 2-'#20598'  '#26657#39564
      Color = clYellow
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      Visible = False
      WordWrap = True
    end
    object Label_Hint_Stop: TLabel
      Left = 8
      Top = 188
      Width = 109
      Height = 14
      AutoSize = False
      Caption = '0-1'#20301' 1-1.5'#20301'  2-2'#20301
      Color = clYellow
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      Visible = False
      WordWrap = True
    end
    object ComboBox_Comm_Port: TComboBox
      Left = 8
      Top = 36
      Width = 97
      Height = 22
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ItemHeight = 14
      TabOrder = 0
    end
    object ComboBox_Baudrate: TComboBox
      Left = 120
      Top = 36
      Width = 109
      Height = 22
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ItemHeight = 14
      ItemIndex = 1
      TabOrder = 1
      Text = '9600'
      Items.Strings = (
        '19200'
        '9600'
        '4800'
        '2400'
        '1200'
        '600'
        '300')
    end
    object ComboBox_Data_Bit: TComboBox
      Left = 120
      Top = 84
      Width = 109
      Height = 22
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ItemHeight = 14
      TabOrder = 2
      Items.Strings = (
        '7'
        '8')
    end
    object ComboBox_Check_Bit: TComboBox
      Left = 120
      Top = 128
      Width = 109
      Height = 22
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ItemHeight = 14
      ParentShowHint = False
      ShowHint = False
      TabOrder = 3
      OnEnter = ComboBox_Check_BitEnter
      OnExit = ComboBox_Check_BitExit
      Items.Strings = (
        '0'
        '1'
        '2')
    end
    object ComboBox_Stop_Bit: TComboBox
      Left = 120
      Top = 184
      Width = 109
      Height = 22
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ItemHeight = 14
      TabOrder = 4
      OnEnter = ComboBox_Stop_BitEnter
      OnExit = ComboBox_Stop_BitExit
      Items.Strings = (
        '0'
        '1'
        '2')
    end
  end
  object Button_OK: TButton
    Left = 264
    Top = 12
    Width = 75
    Height = 25
    Caption = #30830#23450' (&O)'
    TabOrder = 1
    OnClick = Button_OKClick
  end
  object Button_Cancel: TButton
    Left = 264
    Top = 52
    Width = 75
    Height = 25
    Cancel = True
    Caption = #21462#28040' (&C)'
    TabOrder = 2
    OnClick = Button_CancelClick
  end
  object Button_Default: TButton
    Left = 264
    Top = 100
    Width = 75
    Height = 25
    Caption = #32570#30465' (&D)'
    TabOrder = 3
    OnClick = Button_DefaultClick
  end
end