clsss_pas.dfm

delphi6.0电子寻更源程序,用来计算保安有无查抄

        object BitBtn9: TBitBtn
          Left = 339
          Top = 6
          Width = 84
          Height = 26
          Cursor = crHandPoint
          Caption = '修改(&U)'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnClick = BitBtn9Click
          Glyph.Data = {
            42020000424D4202000000000000420000002800000010000000100000000100
            1000030000000002000000000000000000000000000000000000007C0000E003
            00001F0000001F7C0000000000000000000000000000000000001F7C1F7C1F7C
            1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F00001F7C1F7C
            1F7C1F7C1F7C0000FF7FFF03FF03FF03FF03FF03FF0300000000000000000000
            1F7C000000000000FF7FFF7FFF7FFF7FFF7FFF7F0000E07FFF7FE07FFF7FE07F
            00000000FF030000FF7F0000FF03FF03FF03FF03000000000000FF7FE07FFF7F
            E07F0000FF030000FF7FFF7F00000000FF7F0000FF7FE07FFF7FE07FFF7FE07F
            FF7F0000FF030000FF7FFF030000E07F00000000000000000000FF7FE07FFF7F
            E07F0000FF030000FF7FFF7FFF7F0000FF7FE07FFF7FE07FFF7FE07FFF7FE07F
            FF7F0000FF030000FF7FFF03FF03FF030000000000000000000000000000FF7F
            E07F0000FF030000FF7FFF7FFF7FFF7FFF7F0000E07F00000000E07FFF7FE07F
            0000000000000000FF7FFF03FF03FF03FF03FF030000E07F0000000000000000
            1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7F0000E07F00001F7C1F7C
            1F7C1F7C1F7C00000000FF7F0000FF7F0000FF7F0000FF7F0000E07F00001F7C
            1F7C1F7C1F7C1F7C0000EF3D0000EF3D0000EF3D0000EF3D00000000E07F0000
            1F7C1F7C1F7C1F7C0000EF3D0000EF3D0000EF3D0000EF3D00001F7C0000007C
            00001F7C1F7C00001F7C00001F7C00001F7C00001F7C00001F7C1F7C1F7C0000
            1F7C1F7C1F7C}
          Spacing = 0
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = '查詢'
      ImageIndex = 1
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 691
        Height = 40
        Align = alTop
        BevelOuter = bvNone
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object Label2: TLabel
          Left = 19
          Top = 14
          Width = 26
          Height = 13
          Caption = '線路'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label1: TLabel
          Left = 220
          Top = 14
          Width = 26
          Height = 13
          Caption = '班次'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object DBLookupComboBox2: TDBLookupComboBox
          Left = 58
          Top = 6
          Width = 116
          Height = 21
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ImeName = '中文 (简体) - 智能 ABC'
          KeyField = 'linename'
          ListField = 'linename'
          ListSource = dm_class_form.ds_line
          ParentFont = False
          TabOrder = 0
        end
        object edit3: TDBLookupComboBox
          Left = 256
          Top = 6
          Width = 116
          Height = 21
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ImeName = '中文 (简体) - 智能 ABC'
          KeyField = 'Shifts'
          ListField = 'Shifts'
          ListSource = dm_class_form.ds_class
          ParentFont = False
          TabOrder = 1
        end
        object BitBtn7: TBitBtn
          Left = 533
          Top = 5
          Width = 84
          Height = 26
          Cursor = crHandPoint
          BiDiMode = bdLeftToRight
          Caption = '重置(&R)'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentBiDiMode = False
          ParentFont = False
          TabOrder = 3
          OnClick = BitBtn7Click
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
            33333333333F8888883F33330000324334222222443333388F3833333388F333
            000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
            F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
            223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
            3338888300003AAAAAAA33333333333888888833333333330000333333333333
            333333333333333333FFFFFF000033333333333344444433FFFF333333888888
            00003A444333333A22222438888F333338F3333800003A2243333333A2222438
            F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
            22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
            33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
            3333333333338888883333330000333333333333333333333333333333333333
            0000}
          NumGlyphs = 2
          Spacing = 0
        end
        object BitBtn4: TBitBtn
          Left = 437
          Top = 5
          Width = 84
          Height = 26
          Cursor = crHandPoint
          BiDiMode = bdLeftToRight
          Caption = '查詢(S)'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentBiDiMode = False
          ParentFont = False
          TabOrder = 2
          OnClick = BitBtn4Click
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000
            0000333377777777777733330FFFFFFFFFF033337F3FFF3F3FF733330F000F0F
            00F033337F777373773733330FFFFFFFFFF033337F3FF3FF3FF733330F00F00F
            00F033337F773773773733330FFFFFFFFFF033337FF3333FF3F7333300FFFF00
            F0F03333773FF377F7373330FB00F0F0FFF0333733773737F3F7330FB0BF0FB0
            F0F0337337337337373730FBFBF0FB0FFFF037F333373373333730BFBF0FB0FF
            FFF037F3337337333FF700FBFBFB0FFF000077F333337FF37777E0BFBFB000FF
            0FF077FF3337773F7F37EE0BFB0BFB0F0F03777FF3733F737F73EEE0BFBF00FF
            00337777FFFF77FF7733EEEE0000000003337777777777777333}
          NumGlyphs = 2
          Spacing = 0
        end
      end
      object DBGrid2: TDBGrid
        Left = 0
        Top = 40
        Width = 691
        Height = 298
        Align = alClient
        DataSource = dm_class_form.ds_view
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 1
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clBlack
        TitleFont.Height = -16
        TitleFont.Name = '宋体'
        TitleFont.Style = []
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Linename'
            Title.Alignment = taCenter
            Title.Caption = '線路'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clBlack
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 100
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Shifts'
            Title.Alignment = taCenter
            Title.Caption = '班次'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clBlack
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 100
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Firstp'
            Title.Alignment = taCenter
            Title.Caption = '上班時間'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clBlack
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 77
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Lastp'
            Title.Alignment = taCenter
            Title.Caption = '下班時間'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clBlack
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 77
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Chkcycl'
            Title.Alignment = taCenter
            Title.Caption = '巡更周期'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clBlack
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 60
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Dgpcsx'
            Title.Alignment = taCenter
            Title.Caption = '到崗偏差上限'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clBlack
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 88
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Dgpcxx'
            Title.Alignment = taCenter
            Title.Caption = '到崗偏差下限'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clBlack
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 88
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Times'
            Title.Alignment = taCenter
            Title.Caption = '巡更次數'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clBlack
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 60
            Visible = True
          end>
      end
      object Panel5: TPanel
        Left = 0
        Top = 338
        Width = 691
        Height = 41
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 2
        object BitBtn10: TBitBtn
          Left = 365
          Top = 9
          Width = 84
          Height = 26
          Cursor = crHandPoint
          Cancel = True
          Caption = '關閉(&C)'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnClick = BitBtn10Click
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
            F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
            000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
            338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
            45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
            3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
            F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
            000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
            338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
            4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
            8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
            333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
            0000}
          NumGlyphs = 2
          Spacing = 0
        end
        object BitBtn8: TBitBtn
          Left = 170
          Top = 9
          Width = 84
          Height = 26
          Cursor = crHandPoint
          BiDiMode = bdLeftToRight
          Cancel = True
          Caption = '報表(&P)'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentBiDiMode = False
          ParentFont = False
          TabOrder = 0
          OnClick = BitBtn8Click
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
            00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
            8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
            8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
            8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
            03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
            03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
            33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
            33333337FFFF7733333333300000033333333337777773333333}
          NumGlyphs = 2
          Spacing = 0
        end
      end
    end
  end
end