doorperiods.dfm

一个Delphi写的跟考勤机门禁机收款机的接品软件源码

object dlgDoorPeriods: TdlgDoorPeriods
  Left = 215
  Top = 172
  ActiveControl = edBegin
  BorderStyle = bsDialog
  Caption = #26102#27573#32534#36753
  ClientHeight = 264
  ClientWidth = 400
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object gbPeriods: TGroupBox
    Left = 8
    Top = 8
    Width = 385
    Height = 65
    Caption = #29366#24577#26102#38388
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 29
      Width = 48
      Height = 12
      Caption = #24320#22987#26102#38388
    end
    object lbEnd: TLabel
      Left = 128
      Top = 29
      Width = 48
      Height = 12
      Caption = #32467#26463#26102#38388
    end
    object Label3: TLabel
      Left = 275
      Top = 29
      Width = 24
      Height = 12
      Caption = #31561#32423
    end
    object lbState: TLabel
      Left = 136
      Top = 29
      Width = 24
      Height = 12
      Caption = #29366#24577
    end
    object edBegin: TMaskEdit
      Left = 64
      Top = 24
      Width = 57
      Height = 24
      EditMask = '00:00;1;_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      MaxLength = 5
      ParentFont = False
      TabOrder = 0
      Text = '00:00'
      OnExit = edBeginExit
    end
    object edEnd: TMaskEdit
      Left = 200
      Top = 24
      Width = 57
      Height = 24
      EditMask = '00:00;1;_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      MaxLength = 5
      ParentFont = False
      TabOrder = 1
      Text = '24:00'
      OnExit = edBeginExit
    end
    object cbLevel: TComboBox
      Left = 312
      Top = 25
      Width = 57
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 2
      Items.Strings = (
        '0'
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10'
        '11'
        '12'
        '13'
        '14'
        '15')
    end
    object cbState: TComboBox
      Left = 184
      Top = 26
      Width = 185
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 3
    end
  end
  object gbWeeks: TGroupBox
    Left = 8
    Top = 152
    Width = 385
    Height = 65
    Caption = #26377#25928#26085#26399
    TabOrder = 2
    object cbWeek1: TCheckBox
      Left = 16
      Top = 26
      Width = 50
      Height = 17
      Caption = #21608#26085
      Checked = True
      State = cbChecked
      TabOrder = 0
    end
    object cbWeek2: TCheckBox
      Left = 68
      Top = 26
      Width = 50
      Height = 17
      Caption = #21608#19968
      Checked = True
      State = cbChecked
      TabOrder = 1
    end
    object cbWeek3: TCheckBox
      Left = 120
      Top = 26
      Width = 50
      Height = 17
      Caption = #21608#20108
      Checked = True
      State = cbChecked
      TabOrder = 2
    end
    object cbWeek4: TCheckBox
      Left = 172
      Top = 26
      Width = 50
      Height = 17
      Caption = #21608#19977
      Checked = True
      State = cbChecked
      TabOrder = 3
    end
    object cbWeek5: TCheckBox
      Left = 224
      Top = 26
      Width = 50
      Height = 17
      Caption = #21608#22235
      Checked = True
      State = cbChecked
      TabOrder = 4
    end
    object cbWeek6: TCheckBox
      Left = 276
      Top = 26
      Width = 50
      Height = 17
      Caption = #21608#20116
      Checked = True
      State = cbChecked
      TabOrder = 5
    end
    object cbWeek7: TCheckBox
      Left = 328
      Top = 26
      Width = 50
      Height = 17
      Caption = #21608#20845
      Checked = True
      State = cbChecked
      TabOrder = 6
    end
  end
  object gbDoors: TGroupBox
    Left = 8
    Top = 80
    Width = 385
    Height = 65
    Caption = #26377#25928#38376
    TabOrder = 1
    object cbDoor1: TCheckBox
      Left = 16
      Top = 26
      Width = 90
      Height = 17
      Caption = #19968#21495#38376
      Checked = True
      State = cbChecked
      TabOrder = 0
    end
    object cbDoor2: TCheckBox
      Left = 107
      Top = 26
      Width = 90
      Height = 17
      Caption = #20108#21495#38376
      Checked = True
      State = cbChecked
      TabOrder = 1
    end
    object cbDoor3: TCheckBox
      Left = 197
      Top = 26
      Width = 90
      Height = 17
      Caption = #19977#21495#38376
      Checked = True
      State = cbChecked
      TabOrder = 2
    end
    object cbDoor4: TCheckBox
      Left = 288
      Top = 26
      Width = 90
      Height = 17
      Caption = #22235#21495#38376
      Checked = True
      State = cbChecked
      TabOrder = 3
    end
  end
  object plBottom: TPanel
    Left = 0
    Top = 223
    Width = 400
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 3
    object btnOk: TButton
      Left = 225
      Top = 6
      Width = 75
      Height = 25
      Caption = #30830#23450'(&O)'
      Default = True
      ModalResult = 1
      TabOrder = 0
    end
    object btnCancel: TButton
      Left = 313
      Top = 6
      Width = 75
      Height = 25
      Cancel = True
      Caption = #21462#28040'(&C)'
      ModalResult = 2
      TabOrder = 1
    end
  end
end