plccomm.~dfm

这是一个间歇的小唾弃,希望大家希望,以后大家多学习,多多交流共同进步

object Form1: TForm1
  Left = 264
  Top = 130
  Width = 462
  Height = 349
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label6: TLabel
    Left = 124
    Top = 13
    Width = 176
    Height = 21
    Caption = 'PLC  TEST SYSTEM'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object GroupBox1: TGroupBox
    Left = 19
    Top = 51
    Width = 409
    Height = 175
    Caption = #36890#35759#21442#25968
    TabOrder = 0
    object Bevel1: TBevel
      Left = 7
      Top = 15
      Width = 397
      Height = 154
    end
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 70
      Height = 14
      Caption = #27874' '#29305' '#29575#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 16
      Top = 63
      Width = 70
      Height = 14
      Caption = #22855#20598#26657#39564#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object TLabel
      Left = 176
      Top = 24
      Width = 3
      Height = 13
    end
    object Label3: TLabel
      Left = 176
      Top = 26
      Width = 70
      Height = 14
      Caption = #25968' '#25454' '#20301#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 176
      Top = 63
      Width = 70
      Height = 14
      Caption = #20572' '#27490' '#20301#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 16
      Top = 98
      Width = 63
      Height = 14
      Caption = #36873#25321#20018#21475':'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 176
      Top = 98
      Width = 70
      Height = 14
      Caption = #36890#35759#36229#26102#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 360
      Top = 94
      Width = 16
      Height = 16
      Caption = 'ms'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object cmbBaudRate: TComboBox
      Left = 87
      Top = 21
      Width = 66
      Height = 21
      ImeName = #26497#21697#20116#31508#36755#20837#27861
      ItemHeight = 13
      TabOrder = 0
      Text = '9600'
      Items.Strings = (
        '2400'
        '9600'
        '19200')
    end
    object cmbCheckout: TComboBox
      Left = 85
      Top = 60
      Width = 68
      Height = 21
      ImeName = #26497#21697#20116#31508#36755#20837#27861
      ItemHeight = 13
      TabOrder = 1
      Text = #26080#26657#39564
      Items.Strings = (
        #22855#20348#39564
        #20598#26657#39564
        #26080#26657#39564)
    end
    object RadioGroup1: TRadioGroup
      Left = 240
      Top = 16
      Width = 145
      Height = 29
      TabOrder = 2
    end
    object RB7: TRadioButton
      Left = 261
      Top = 24
      Width = 33
      Height = 17
      Caption = '7'
      TabOrder = 3
    end
    object RB8: TRadioButton
      Left = 321
      Top = 25
      Width = 41
      Height = 17
      Caption = '8'
      TabOrder = 4
    end
    object GroupBox2: TGroupBox
      Left = 240
      Top = 51
      Width = 145
      Height = 30
      TabOrder = 5
      object RB1: TRadioButton
        Left = 23
        Top = 9
        Width = 36
        Height = 17
        Caption = '1'
        TabOrder = 0
      end
      object RB2: TRadioButton
        Left = 83
        Top = 9
        Width = 36
        Height = 17
        Caption = '2'
        TabOrder = 1
      end
    end
    object btCancel: TButton
      Left = 227
      Top = 133
      Width = 91
      Height = 24
      Caption = #21462'    '#28040
      TabOrder = 6
    end
    object btOK: TButton
      Left = 72
      Top = 134
      Width = 97
      Height = 23
      Caption = #30830'    '#23450
      TabOrder = 7
      OnClick = btOKClick
    end
    object cmbCom: TComboBox
      Left = 88
      Top = 96
      Width = 65
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      TabOrder = 8
      Text = 'Com1'
      Items.Strings = (
        'com1'
        'com2'
        'com3'
        'com4')
    end
    object Edit1: TEdit
      Left = 240
      Top = 95
      Width = 112
      Height = 21
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 9
    end
  end
  object GroupBox3: TGroupBox
    Left = 20
    Top = 240
    Width = 410
    Height = 74
    Caption = #29366#24577#26174#31034
    TabOrder = 1
    object ShapeLight: TShape
      Left = 316
      Top = 19
      Width = 33
      Height = 41
      Brush.Color = clRed
      Shape = stCircle
    end
    object Label5: TLabel
      Left = 225
      Top = 34
      Width = 70
      Height = 14
      Caption = #25351' '#31034' '#28783#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object btStart: TButton
      Left = 68
      Top = 29
      Width = 92
      Height = 27
      Caption = #21551'     '#21160
      TabOrder = 0
    end
  end
  object MSComm1: TMSComm
    Left = 392
    Top = 16
    Width = 32
    Height = 32
    ControlData = {
      2143341208000000ED030000ED03000001568A64000006000000010000040000
      00020000802500000000080000000000000000003F00000001000000}
  end
end