unit3.dfm

在Delphi 環境下編寫的串口調試程序 ,能與下位機(MSP430F147)實現串口485通訊.完成對下位機狀態的檢測.校準. 對於使用Delphi的串口編程有一定的作用.

object Form3: TForm3
  Left = 163
  Top = 177
  Width = 731
  Height = 481
  Caption = 'Form3'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 288
    Top = 8
    Width = 96
    Height = 13
    Caption = #30005#27744#29366#24577#26597#30475#30028#38754
  end
  object StringGrid1: TStringGrid
    Left = 32
    Top = 56
    Width = 529
    Height = 305
    ColCount = 8
    FixedCols = 0
    RowCount = 12
    FixedRows = 0
    TabOrder = 0
    RowHeights = (
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24)
  end
  object GroupBox1: TGroupBox
    Left = 24
    Top = 384
    Width = 233
    Height = 49
    Caption = #30005#21387#36873#25321
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object RadioButton8: TRadioButton
      Left = 16
      Top = 24
      Width = 57
      Height = 17
      Caption = '2V'
      Checked = True
      TabOrder = 0
      TabStop = True
    end
    object RadioButton9: TRadioButton
      Left = 88
      Top = 24
      Width = 57
      Height = 17
      Caption = '6V'
      TabOrder = 1
    end
    object RadioButton10: TRadioButton
      Left = 160
      Top = 24
      Width = 57
      Height = 17
      Caption = '12V'
      TabOrder = 2
    end
  end
  object BitBtn1: TBitBtn
    Left = 592
    Top = 376
    Width = 81
    Height = 41
    Caption = #25163#21160#21457#36865
    TabOrder = 2
    OnClick = BitBtn1Click
  end
  object CheckBox1: TCheckBox
    Left = 584
    Top = 40
    Width = 73
    Height = 33
    Caption = #33258#21160#21457#36865
    TabOrder = 3
    OnClick = CheckBox1Click
  end
  object GroupBox2: TGroupBox
    Left = 584
    Top = 72
    Width = 105
    Height = 281
    Caption = #21457#36865#38388#38548#26102#38388
    TabOrder = 4
    object RadioButton1: TRadioButton
      Left = 16
      Top = 32
      Width = 89
      Height = 17
      Caption = '0.5S'
      TabOrder = 0
      OnClick = RadioButton1Click
    end
    object RadioButton2: TRadioButton
      Left = 16
      Top = 56
      Width = 89
      Height = 17
      Caption = '1S'
      TabOrder = 1
      OnClick = RadioButton2Click
    end
    object RadioButton3: TRadioButton
      Left = 16
      Top = 80
      Width = 89
      Height = 17
      Caption = '2S'
      Checked = True
      TabOrder = 2
      TabStop = True
      OnClick = RadioButton3Click
    end
    object RadioButton4: TRadioButton
      Left = 16
      Top = 104
      Width = 89
      Height = 17
      Caption = '3S'
      TabOrder = 3
      OnClick = FormCreate
    end
    object RadioButton5: TRadioButton
      Left = 16
      Top = 128
      Width = 89
      Height = 17
      Caption = '4S'
      TabOrder = 4
      OnClick = RadioButton5Click
    end
    object RadioButton6: TRadioButton
      Left = 16
      Top = 152
      Width = 89
      Height = 17
      Caption = '5S'
      TabOrder = 5
      OnClick = RadioButton6Click
    end
    object RadioButton7: TRadioButton
      Left = 16
      Top = 176
      Width = 89
      Height = 17
      Caption = '6S'
      TabOrder = 6
      OnClick = RadioButton7Click
    end
    object RadioButton11: TRadioButton
      Left = 16
      Top = 200
      Width = 57
      Height = 17
      Caption = '8S'
      TabOrder = 7
      OnClick = RadioButton11Click
    end
    object RadioButton12: TRadioButton
      Left = 16
      Top = 224
      Width = 57
      Height = 25
      Caption = '12S'
      TabOrder = 8
      OnClick = RadioButton12Click
    end
    object RadioButton13: TRadioButton
      Left = 16
      Top = 256
      Width = 57
      Height = 17
      Caption = '16S'
      TabOrder = 9
      OnClick = RadioButton13Click
    end
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 48
    Top = 16
  end
  object Timer2: TTimer
    Interval = 500
    OnTimer = Timer2Timer
    Left = 112
    Top = 16
  end
end