main.dfm

串口监控程序,可与UPS进行通信,适合初学者使用

          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label12: TLabel
          Left = 34
          Top = 153
          Width = 45
          Height = 13
          Caption = #26368' '#23567' '#20540':'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clActiveCaption
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label13: TLabel
          Left = 35
          Top = 174
          Width = 45
          Height = 13
          Caption = #26368' '#22823' '#20540':'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clActiveCaption
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object RzEdit5: TRzEdit
          Left = 93
          Top = 35
          Width = 123
          Height = 21
          Color = clMoneyGreen
          ReadOnly = True
          TabOrder = 0
          OnChange = RzEdit5Change
        end
        object RzEdit6: TRzEdit
          Left = 93
          Top = 56
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 1
        end
        object RzEdit7: TRzEdit
          Left = 93
          Top = 77
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 2
        end
        object RzEdit1: TRzEdit
          Left = 93
          Top = 7
          Width = 121
          Height = 24
          Text = '         '#36755'  '#20837'  '#30005'  '#21387
          Color = clInactiveBorder
          Ctl3D = True
          DisabledColor = clBackground
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          FocusColor = clInactiveCaptionText
          FrameHotTrack = True
          FrameStyle = fsNone
          FrameVisible = True
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 3
        end
        object RzEdit4: TRzEdit
          Left = 94
          Top = 104
          Width = 121
          Height = 24
          Text = '     '#30005'  '#27744'  '#20805'  '#30005'  '#29575
          Color = clInactiveBorder
          Ctl3D = True
          DisabledColor = clBackground
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          FocusColor = clInactiveCaptionText
          FrameHotTrack = True
          FrameStyle = fsNone
          FrameVisible = True
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 4
        end
        object RzEdit14: TRzEdit
          Left = 93
          Top = 174
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 5
        end
        object RzEdit15: TRzEdit
          Left = 93
          Top = 153
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 6
        end
        object RzEdit16: TRzEdit
          Left = 93
          Top = 132
          Width = 123
          Height = 21
          Color = clMoneyGreen
          ReadOnly = True
          TabOrder = 7
          OnChange = RzEdit16Change
        end
        object RzEdit2: TRzEdit
          Left = 269
          Top = 8
          Width = 121
          Height = 24
          Text = '         '#36755'  '#20986'  '#30005'  '#21387
          Color = clInactiveBorder
          Ctl3D = True
          DisabledColor = clBackground
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          FocusColor = clInactiveCaptionText
          FrameHotTrack = True
          FrameStyle = fsNone
          FrameVisible = True
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 8
        end
        object RzEdit3: TRzEdit
          Left = 439
          Top = 8
          Width = 121
          Height = 24
          Text = '         '#36755'  '#20837'  '#39057'  '#29575
          Color = clInactiveBorder
          Ctl3D = True
          DisabledColor = clBackground
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          FocusColor = clInactiveCaptionText
          FrameHotTrack = True
          FrameStyle = fsNone
          FrameVisible = True
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 9
        end
        object RzEdit20: TRzEdit
          Left = 269
          Top = 104
          Width = 122
          Height = 24
          Text = '     UPS '#36127'  '#36733'  '#29575
          Color = clInactiveBorder
          Ctl3D = True
          DisabledColor = clBackground
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          FocusColor = clInactiveCaptionText
          FrameHotTrack = True
          FrameStyle = fsNone
          FrameVisible = True
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 10
        end
        object RzEdit24: TRzEdit
          Left = 439
          Top = 104
          Width = 122
          Height = 24
          Text = '         '#26426'  '#20869'  '#28201'  '#24230
          Color = clInactiveBorder
          Ctl3D = True
          DisabledColor = clBackground
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          FocusColor = clInactiveCaptionText
          FrameHotTrack = True
          FrameStyle = fsNone
          FrameVisible = True
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 11
        end
        object RzEdit8: TRzEdit
          Left = 269
          Top = 36
          Width = 123
          Height = 21
          Color = clMoneyGreen
          ReadOnly = True
          TabOrder = 12
          OnChange = RzEdit8Change
        end
        object RzEdit9: TRzEdit
          Left = 269
          Top = 57
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 13
        end
        object RzEdit10: TRzEdit
          Left = 269
          Top = 78
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 14
        end
        object RzEdit13: TRzEdit
          Left = 439
          Top = 36
          Width = 124
          Height = 21
          Color = clMoneyGreen
          ReadOnly = True
          TabOrder = 15
          OnChange = RzEdit13Change
        end
        object RzEdit12: TRzEdit
          Left = 439
          Top = 57
          Width = 124
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 16
        end
        object RzEdit11: TRzEdit
          Left = 439
          Top = 79
          Width = 124
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 17
        end
        object RzEdit17: TRzEdit
          Left = 269
          Top = 132
          Width = 123
          Height = 21
          Color = clMoneyGreen
          ReadOnly = True
          TabOrder = 18
          OnChange = RzEdit17Change
        end
        object RzEdit18: TRzEdit
          Left = 269
          Top = 152
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 19
        end
        object RzEdit19: TRzEdit
          Left = 269
          Top = 174
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 20
        end
        object RzEdit21: TRzEdit
          Left = 439
          Top = 133
          Width = 123
          Height = 21
          Color = clMoneyGreen
          ReadOnly = True
          TabOrder = 21
          OnChange = RzEdit21Change
        end
        object RzEdit22: TRzEdit
          Left = 439
          Top = 154
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 22
        end
        object RzEdit23: TRzEdit
          Left = 439
          Top = 175
          Width = 123
          Height = 21
          Color = clMenuBar
          ReadOnly = True
          TabOrder = 23
        end
        object Button1: TButton
          Left = 584
          Top = 4
          Width = 41
          Height = 25
          Caption = #26242#20572
          TabOrder = 24
          Visible = False
          OnClick = Button1Click
        end
        object Memo2: TMemo
          Left = 565
          Top = 32