clockoptions.dfm

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

      object gbRingTimes: TGroupBox
        Left = 264
        Top = 114
        Width = 241
        Height = 207
        Caption = #25171#38083#26102#38388
        TabOrder = 3
        object sbAddRingTime: TButton
          Left = 16
          Top = 176
          Width = 50
          Height = 22
          Caption = #28155#21152
          TabOrder = 1
          OnClick = sbAddRingTimeClick
        end
        object sbDelRingTime: TButton
          Left = 72
          Top = 176
          Width = 50
          Height = 22
          Caption = #21024#38500
          TabOrder = 2
          OnClick = sbDelRingTimeClick
        end
        object sbReWriteRingTime: TButton
          Left = 128
          Top = 176
          Width = 57
          Height = 22
          Caption = #37325#26032#20889#20837
          TabOrder = 3
          OnClick = sbReWriteRingTimeClick
        end
        object lvRingTime: TListView
          Left = 16
          Top = 24
          Width = 209
          Height = 145
          Columns = <
            item
              Caption = #26102
              Width = 44
            end
            item
              Caption = #20998
              Width = 44
            end
            item
              Caption = #31186
              Width = 44
            end
            item
              Caption = #25345#32493
              Width = 60
            end>
          HideSelection = False
          MultiSelect = True
          ReadOnly = True
          RowSelect = True
          TabOrder = 0
          ViewStyle = vsReport
        end
      end
      object cbUseClockTime: TCheckBox
        Left = 32
        Top = 112
        Width = 121
        Height = 17
        Caption = #20351#29992#21047#21345#26102#27573
        Checked = True
        State = cbChecked
        TabOrder = 4
        OnClick = cbA0Click
      end
    end
    object tsICCard: TTabSheet
      Caption = 'IC'#21345
      ImageIndex = 2
      object gbGroupCheck: TGroupBox
        Left = 16
        Top = 16
        Width = 489
        Height = 137
        TabOrder = 1
        object Label25: TLabel
          Left = 24
          Top = 32
          Width = 48
          Height = 12
          Caption = #20998#32452#21442#25968
        end
        object Label40: TLabel
          Left = 24
          Top = 91
          Width = 96
          Height = 12
          Caption = #20998#32452#35782#21035#23383#33410#20301#32622
        end
        object edGroup: TEdit
          Left = 24
          Top = 48
          Width = 265
          Height = 20
          TabOrder = 0
          OnChange = meLockTimeChange
        end
        object cbGroupStation: TComboBox
          Left = 144
          Top = 88
          Width = 145
          Height = 20
          Style = csDropDownList
          ItemHeight = 12
          TabOrder = 1
          OnChange = cbGroupStationChange
          Items.Strings = (
            #31532' 0 '#23383#33410
            #31532' 1 '#23383#33410
            #31532' 2 '#23383#33410
            #31532' 3 '#23383#33410
            #31532' 4 '#23383#33410
            #31532' 5 '#23383#33410
            #31532' 6 '#23383#33410
            #31532' 7 '#23383#33410
            #31532' 8 '#23383#33410
            #31532' 9 '#23383#33410
            #31532' 10 '#23383#33410
            #31532' 11 '#23383#33410
            #31532' 12 '#23383#33410
            #31532' 13 '#23383#33410
            #31532' 14 '#23383#33410
            #31532' 15 '#23383#33410
            #19987#29992#30340#20998#32452#21345#23384#20648#21306)
        end
        object rbOneMany: TRadioButton
          Left = 312
          Top = 48
          Width = 160
          Height = 17
          Caption = #19968#23545#22810#30340#25171#21345#20998#32452#21151#33021
          Checked = True
          TabOrder = 2
          TabStop = True
          OnClick = rbOneManyClick
        end
        object rbManyMany: TRadioButton
          Left = 312
          Top = 80
          Width = 160
          Height = 17
          Caption = #22810#23545#22810#30340#25171#21345#20998#32452#21151#33021
          TabOrder = 3
          OnClick = rbManyManyClick
        end
      end
      object gbSaveBlock: TGroupBox
        Left = 16
        Top = 173
        Width = 489
        Height = 145
        Caption = 'IC'#21345#23384#20648#21306#22495
        TabOrder = 2
        object Label36: TLabel
          Left = 24
          Top = 16
          Width = 54
          Height = 12
          Caption = 'IC'#21345#31867#22411':'
        end
        object Label37: TLabel
          Left = 24
          Top = 56
          Width = 102
          Height = 12
          Caption = #20351#29992#25159#21306#21450#22359#32534#21495':'
        end
        object Label38: TLabel
          Left = 24
          Top = 96
          Width = 78
          Height = 12
          Caption = #20351#29992#23494#30721#36873#25321':'
        end
        object cbCardType: TComboBox
          Left = 24
          Top = 32
          Width = 180
          Height = 20
          Style = csDropDownList
          ItemHeight = 12
          TabOrder = 0
          OnChange = cbA0Click
          Items.Strings = (
            'Mifare 1 S50'#21345
            'Mifare Line'#21345)
        end
        object cbSector: TComboBox
          Left = 24
          Top = 72
          Width = 180
          Height = 20
          Style = csDropDownList
          ItemHeight = 0
          TabOrder = 1
          OnChange = cbA0Click
        end
        object cbPassword: TComboBox
          Left = 24
          Top = 112
          Width = 180
          Height = 20
          Style = csDropDownList
          ItemHeight = 12
          TabOrder = 2
          OnChange = cbA0Click
          Items.Strings = (
            #23494#30721' A'
            #23494#30721' B')
        end
      end
      object cbB3: TCheckBox
        Left = 36
        Top = 15
        Width = 125
        Height = 17
        Caption = #20351#29992#25171#21345#20998#32452#21151#33021
        TabOrder = 0
        OnClick = cbA0Click
      end
    end
    object tsDisplay: TTabSheet
      Caption = #26174#31034#25511#21046
      ImageIndex = 3
      object GroupBox1: TGroupBox
        Left = 16
        Top = 16
        Width = 489
        Height = 137
        Caption = #23631#24149#20449#24687
        TabOrder = 0
        object Label1: TLabel
          Left = 16
          Top = 67
          Width = 114
          Height = 12
          Caption = #24120#24577#26174#31034'(16'#20010#23383#31526'):'
        end
        object Label2: TLabel
          Left = 16
          Top = 99
          Width = 114
          Height = 12
          Caption = #21047#21345#26174#31034'(16'#20010#23383#31526'):'
        end
        object Label3: TLabel
          Left = 16
          Top = 35
          Width = 114
          Height = 12
          Caption = #24320#26426#26174#31034'(16'#20010#23383#31526'):'
        end
        object edNormalMsg: TEdit
          Left = 192
          Top = 64
          Width = 121
          Height = 20
          MaxLength = 16
          TabOrder = 1
          Text = #35831#21047#21345
          OnKeyPress = edNormalMsgKeyPress
        end
        object edBrushMsg: TEdit
          Left = 192
          Top = 96
          Width = 121
          Height = 20
          MaxLength = 16
          TabOrder = 2
          Text = #21047#21345#25104#21151
          OnKeyPress = edBrushMsgKeyPress
        end
        object edFirstWinMsg: TEdit
          Left = 192
          Top = 32
          Width = 121
          Height = 20
          MaxLength = 16
          TabOrder = 0
          Text = #20381#26102#21033
          OnKeyPress = edFirstWinMsgKeyPress
        end
      end
      object GroupBox2: TGroupBox
        Left = 16
        Top = 160
        Width = 489
        Height = 161
        Caption = #36890#30693#20449#24687
        TabOrder = 1
        object Label9: TLabel
          Left = 161
          Top = 96
          Width = 24
          Height = 12
          Caption = #20445#30041
        end
        object lbMsgUnit: TLabel
          Left = 236
          Top = 96
          Width = 12
          Height = 12
          Caption = #22825
        end
        object edNotification: TMemo
          Left = 16
          Top = 24
          Width = 124
          Height = 129
          Lines.Strings = (
            #36890#30693#20449#24687)
          ScrollBars = ssVertical
          TabOrder = 0
        end
        object cbWordWrap: TCheckBox
          Left = 160
          Top = 56
          Width = 120
          Height = 17
          Caption = #33258#21160#25442#34892
          Checked = True
          State = cbChecked
          TabOrder = 2
        end
        object chbCLS: TCheckBox
          Left = 160
          Top = 32
          Width = 120
          Height = 17
          Caption = #28165#23631
          Checked = True
          State = cbChecked
          TabOrder = 1
          OnClick = chbCLSClick
        end
        object edShowTime: TEdit
          Left = 197
          Top = 93
          Width = 32
          Height = 20
          TabOrder = 3
          Text = '1'
        end
        object btnSendMsg: TButton
          Left = 384
          Top = 120
          Width = 75
          Height = 25
          Caption = #21457#36865
          TabOrder = 4
          OnClick = btnSendMsgClick
        end
      end
    end
    object tsFonts: TTabSheet
      Caption = #23383#24211#31649#29702
      ImageIndex = 4
      object GroupBox15: TGroupBox
        Left = 16
        Top = 16
        Width = 489
        Height = 305
        Caption = #23383#24211#31649#29702
        TabOrder = 0
        object Label11: TLabel
          Left = 264
          Top = 24
          Width = 72
          Height = 12
          Caption = #36873#25321#23383#24211#25991#20214
        end
        object Label13: TLabel
          Left = 264
          Top = 72
          Width = 36
          Height = 12
          Caption = #24320#22987#39029
        end
        object Label14: TLabel
          Left = 352
          Top = 72
          Width = 78
          Height = 12
          Caption = #39029#25968'(16'#23383'/'#39029')'
        end
        object Label39: TLabel
          Left = 24
          Top = 136
          Width = 433
          Height = 105
          AutoSize = False
          Caption = #35828#26126':'#13#10'    '#23436#25972#19979#36733#25972#20010#23383#24211#35831#20174' 0 '#39029#24320#22987#19979#36733', '#24635#39029#25968#20026' 1039 '#39029#13#10'    '#36153#26102#22823#27010'30'#20998#38047#24038#21491
          WordWrap = True
        end
        object btnTransFont: TButton
          Left = 134
          Top = 80
          Width = 107
          Height = 25
          Caption = #19979#36733#23383#24211#21040#26426#22120
          TabOrder = 3
          OnClick = btnTransFontClick
        end
        object cbFontLib: TComboBox
          Left = 264
          Top = 40
          Width = 185
          Height = 20
          Style = csDropDownList
          ItemHeight = 12
          TabOrder = 4
          OnChange = cbFontLibChange
          Items.Strings = (
            #31616#20307#23383#24211
            #32321#20307#23383#24211)
        end
        object edBeginPage: TEdit
          Left = 264
          Top = 88
          Width = 73
          Height = 20
          Color = clBtnFace
          TabOrder = 5
          Text = '0'
        end
        object edPageCount: TEdit
          Left = 352
          Top = 88
          Width = 89
          Height = 20
          Color = clBtnFace
          TabOrder = 6
          Text = '1039'
        end
        object edFindChar: TEdit
          Left = 136
          Top = 32
          Width = 33
          Height = 20
          MaxLength = 2
          TabOrder = 1
          Text = #27721
        end
        object dgFontDots1: TDrawGrid
          Left = 8
          Top = 22
          Width = 99
          Height = 99
          TabStop = False
          ColCount = 16
          DefaultColWidth = 5
          DefaultRowHeight = 5
          DefaultDrawing = False
          FixedCols = 0
          RowCount = 16
          FixedRows = 0
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
          ScrollBars = ssNone
          TabOrder = 0
          OnDrawCell = dgFontDots1DrawCell
        end
        object btnQueryFont: TButton
          Left = 184
          Top = 32
          Width = 57
          Height = 25
          Caption = #26597#35810
          TabOrder = 2
          OnClick = btnQueryFontClick
        end
      end
    end
  end
  object btnOk: TButton
    Left = 365
    Top = 378
    Width = 75
    Height = 25
    Caption = #30830#23450'(&O)'
    Default = True
    ModalResult = 1
    TabOrder = 1
    OnClick = btnOkClick
  end
  object btnCancel: TButton
    Left = 453
    Top = 378
    Width = 75
    Height = 25
    Cancel = True
    Caption = #21462#28040'(&C)'
    ModalResult = 2
    TabOrder = 2
  end
end