qzhjunit1.dfm

实现了断路器群控系统

object qianzhiji: Tqianzhiji
  Left = 186
  Top = 143
  Width = 845
  Height = 649
  Caption = #21069#32622#26426#23454#20363
  Color = clSkyBlue
  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 GroupBox1: TGroupBox
    Left = 24
    Top = 8
    Width = 793
    Height = 161
    Caption = #26029#36335#22120'1'#65306
    Color = clSkyBlue
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -24
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 40
      Top = 48
      Width = 72
      Height = 25
      Caption = #30005#27969#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 40
      Top = 104
      Width = 72
      Height = 25
      Caption = #30005#21387#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 296
      Top = 48
      Width = 72
      Height = 25
      Caption = #28201#24230#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 256
      Top = 104
      Width = 104
      Height = 25
      Caption = #24320#20851#29366#24577':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label13: TLabel
      Left = 520
      Top = 48
      Width = 168
      Height = 25
      Caption = #26368#22823#36127#36733#30005#27969#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 112
      Top = 45
      Width = 113
      Height = 29
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 112
      Top = 104
      Width = 113
      Height = 29
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object Edit3: TEdit
      Left = 400
      Top = 48
      Width = 113
      Height = 32
      TabOrder = 2
    end
    object Edit4: TEdit
      Left = 400
      Top = 104
      Width = 113
      Height = 32
      ReadOnly = True
      TabOrder = 3
    end
    object Edit13: TEdit
      Left = 688
      Top = 48
      Width = 57
      Height = 32
      TabOrder = 4
    end
  end
  object GroupBox2: TGroupBox
    Left = 24
    Top = 176
    Width = 777
    Height = 169
    Caption = #26029#36335#22120'2'#65306
    Color = clSkyBlue
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -24
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 1
    object Label5: TLabel
      Left = 40
      Top = 48
      Width = 72
      Height = 25
      Caption = #30005#27969#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 40
      Top = 104
      Width = 72
      Height = 25
      Caption = #30005#21387#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 296
      Top = 48
      Width = 72
      Height = 25
      Caption = #28201#24230#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 256
      Top = 112
      Width = 80
      Height = 25
      Caption = #24320#20851#29366':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label14: TLabel
      Left = 528
      Top = 48
      Width = 168
      Height = 25
      Caption = #26368#22823#36127#36733#30005#27969#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Edit5: TEdit
      Left = 120
      Top = 48
      Width = 113
      Height = 32
      TabOrder = 0
    end
    object Edit6: TEdit
      Left = 120
      Top = 104
      Width = 113
      Height = 32
      TabOrder = 1
    end
    object Edit7: TEdit
      Left = 408
      Top = 48
      Width = 113
      Height = 32
      TabOrder = 2
    end
    object Edit8: TEdit
      Left = 408
      Top = 104
      Width = 113
      Height = 32
      ReadOnly = True
      TabOrder = 3
    end
    object Button4: TButton
      Left = 576
      Top = 104
      Width = 89
      Height = 41
      Caption = 'open'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = Button4Click
    end
    object Button5: TButton
      Left = 680
      Top = 104
      Width = 89
      Height = 41
      Caption = 'close'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = Button5Click
    end
    object Edit14: TEdit
      Left = 696
      Top = 48
      Width = 57
      Height = 32
      TabOrder = 6
      Text = ' '
    end
  end
  object GroupBox3: TGroupBox
    Left = 24
    Top = 352
    Width = 777
    Height = 169
    Caption = #26029#36335#22120'3'#65306
    Color = clSkyBlue
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -24
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 2
    object Label9: TLabel
      Left = 40
      Top = 48
      Width = 72
      Height = 25
      Caption = #30005#27969#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 40
      Top = 112
      Width = 72
      Height = 25
      Caption = #30005#21387#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 288
      Top = 40
      Width = 72
      Height = 25
      Caption = #28201#24230#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 248
      Top = 104
      Width = 80
      Height = 25
      Caption = #24320#20851#29366':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label15: TLabel
      Left = 536
      Top = 56
      Width = 168
      Height = 25
      Caption = #26368#22823#36127#36733#30005#27969#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Edit9: TEdit
      Left = 120
      Top = 48
      Width = 113
      Height = 32
      TabOrder = 0
    end
    object Edit10: TEdit
      Left = 120
      Top = 112
      Width = 113
      Height = 32
      TabOrder = 1
    end
    object Edit11: TEdit
      Left = 416
      Top = 48
      Width = 113
      Height = 32
      TabOrder = 2
    end
    object Edit12: TEdit
      Left = 416
      Top = 104
      Width = 113
      Height = 32
      ReadOnly = True
      TabOrder = 3
    end
    object Button6: TButton
      Left = 576
      Top = 104
      Width = 89
      Height = 41
      Caption = 'open'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = Button6Click
    end
    object Button7: TButton
      Left = 680
      Top = 104
      Width = 89
      Height = 41
      Caption = 'close'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = Button7Click
    end
    object Edit15: TEdit
      Left = 696
      Top = 48
      Width = 57
      Height = 32
      TabOrder = 6
      Text = ' '
    end
  end
  object Button1: TButton
    Left = 480
    Top = 544
    Width = 89
    Height = 41
    Caption = 'exit'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -24
    Font.Name = #21326#25991#34892#26999
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = Button1Click
  end
  object MSComm1: TMSComm
    Left = 24
    Top = 560
    Width = 32
    Height = 32
    OnComm = MSComm1Comm
    ControlData = {
      2143341208000000ED030000ED03000001568A64000006000000010000040000
      00020000802500000000080000000000000000003F0000000A000000}
  end
  object Button2: TButton
    Left = 600
    Top = 112
    Width = 89
    Height = 41
    Caption = 'open'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -24
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 5
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 704
    Top = 112
    Width = 89
    Height = 41
    Caption = 'close'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -24
    Font.Name = #21326#25991#34892#26999
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = Button3Click
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 32
    Top = 40
  end
  object Timer2: TTimer
    OnTimer = Timer2Timer
    Left = 32
    Top = 224
  end
  object Timer3: TTimer
    OnTimer = Timer3Timer
    Left = 32
    Top = 384
  end
end