sch_rbform.~dfm

一个下设单位的局部网络终端数据录入软件。

object SCH_RB: TSCH_RB
  Left = 171
  Top = 207
  Width = 647
  Height = 338
  Caption = #29983#20135#26085#25253#34920
  Color = clMoneyGreen
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object Shape1: TShape
    Left = 4
    Top = 93
    Width = 627
    Height = 2
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape2: TShape
    Left = 3
    Top = 146
    Width = 628
    Height = 2
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape3: TShape
    Left = 4
    Top = 176
    Width = 629
    Height = 2
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape4: TShape
    Left = 4
    Top = 205
    Width = 629
    Height = 2
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape5: TShape
    Left = 3
    Top = 263
    Width = 629
    Height = 2
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape7: TShape
    Left = 2
    Top = 234
    Width = 629
    Height = 2
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape19: TShape
    Left = 2
    Top = 92
    Width = 2
    Height = 174
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape11: TShape
    Left = 119
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape12: TShape
    Left = 180
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape13: TShape
    Left = 241
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape14: TShape
    Left = 306
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape15: TShape
    Left = 371
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape16: TShape
    Left = 433
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape25: TShape
    Left = 569
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape26: TShape
    Left = 500
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape27: TShape
    Left = 630
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Shape8: TShape
    Left = 58
    Top = 92
    Width = 2
    Height = 173
    Brush.Style = bsClear
    Pen.Color = clGreen
    Pen.Width = 2
  end
  object Label7: TLabel
    Left = 68
    Top = 103
    Width = 41
    Height = 15
    Caption = #19996' '#32447
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label1: TLabel
    Left = 65
    Top = 125
    Width = 50
    Height = 17
    Caption = '( M )'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -17
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 95
    Top = 122
    Width = 8
    Height = 13
    Caption = '3'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label3: TLabel
    Left = 129
    Top = 103
    Width = 41
    Height = 15
    Caption = #35199' '#32447
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label4: TLabel
    Left = 185
    Top = 103
    Width = 48
    Height = 15
    Caption = #24635#27700#37327
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label5: TLabel
    Left = 319
    Top = 103
    Width = 32
    Height = 15
    Caption = #32791#33647
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel
    Left = 383
    Top = 103
    Width = 32
    Height = 15
    Caption = #32791#27695
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label8: TLabel
    Left = 255
    Top = 103
    Width = 32
    Height = 15
    Caption = #32791#30005
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label9: TLabel
    Left = 504
    Top = 103
    Width = 64
    Height = 15
    Caption = #21544#27700#25104#26412
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label10: TLabel
    Left = 580
    Top = 103
    Width = 32
    Height = 15
    Caption = #22791#27880
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label11: TLabel
    Left = 435
    Top = 103
    Width = 64
    Height = 15
    Caption = #21544#27700#32791#30005
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label12: TLabel
    Left = 126
    Top = 125
    Width = 50
    Height = 17
    Caption = '( M )'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -17
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label13: TLabel
    Left = 156
    Top = 122
    Width = 8
    Height = 13
    Caption = '3'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label14: TLabel
    Left = 185
    Top = 125
    Width = 50
    Height = 17
    Caption = '( M )'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -17
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label15: TLabel
    Left = 215
    Top = 122
    Width = 8
    Height = 13
    Caption = '3'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label16: TLabel
    Left = 249
    Top = 125
    Width = 40
    Height = 17
    Caption = 'KW:h'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -17
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label17: TLabel
    Left = 333
    Top = 125
    Width = 20
    Height = 17
    Caption = 'kg'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -17
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label18: TLabel
    Left = 387
    Top = 125
    Width = 20
    Height = 17
    Caption = 'kg'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -17
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label19: TLabel
    Left = 440
    Top = 127
    Width = 40
    Height = 17
    Caption = 'KW:h'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -17
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label20: TLabel
    Left = 521
    Top = 127
    Width = 38
    Height = 17
    Caption = '('#20803')'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -17
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label21: TLabel
    Left = 12
    Top = 159
    Width = 41
    Height = 15
    Caption = #26089' '#29677
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label22: TLabel
    Left = 12
    Top = 186
    Width = 41
    Height = 15
    Caption = #20013' '#29677
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label23: TLabel
    Left = 12
    Top = 215
    Width = 41
    Height = 15
    Caption = #26202' '#29677
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label24: TLabel
    Left = 14
    Top = 241
    Width = 32
    Height = 15
    Caption = #21512#35745
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label26: TLabel
    Left = 292
    Top = 73
    Width = 40
    Height = 15
    Caption = #27668#20505':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label27: TLabel
    Left = 2
    Top = 74
    Width = 41
    Height = 15
    Caption = #26085#26399':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label28: TLabel
    Left = 477
    Top = 73
    Width = 54
    Height = 15
    Caption = #21046#34920#20154':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object StaticText1: TStaticText
    Left = 133
    Top = 10
    Width = 354
    Height = 28
    Caption = #9733#9733#20379#27700#20928#21270#21378#29983#20135#26085#25253#34920#9733#9733
    Color = clTeal
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clYellow
    Font.Height = -24
    Font.Name = #40657#20307
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    TabOrder = 0
  end
  object A1: TEdit
    Left = 61
    Top = 151
    Width = 58
    Height = 25
    Cursor = crHandPoint
    AutoSize = False
    Ctl3D = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 1
    OnKeyPress = A1KeyPress
  end
  object A3: TEdit
    Left = 182
    Top = 151
    Width = 58
    Height = 25
    Cursor = crHandPoint
    AutoSize = False
    Ctl3D = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 2
  end
  object A4: TEdit
    Left = 245
    Top = 151
    Width = 58
    Height = 25
    Cursor = crHandPoint
    AutoSize = False
    Ctl3D = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 3
  end
  object A5: TEdit
    Left = 311
    Top = 151
    Width = 58
    Height = 25
    Cursor = crHandPoint
    AutoSize = False
    Ctl3D = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentCtl3D = False