material_ck.dfm

服装厂管理系统源程序压缩包, 请耐心阅读提供的文件包含的内容

            Style = csDropDownList
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -15
            Font.Name = #23435#20307
            Font.Style = []
            ItemHeight = 0
            ParentFont = False
            TabOrder = 13
          end
        end
      end
      object Panel3: TPanel
        Left = 0
        Top = 450
        Width = 771
        Height = 39
        Align = alBottom
        BevelOuter = bvNone
        ParentColor = True
        TabOrder = 1
        object Panel2: TPanel
          Left = 72
          Top = 0
          Width = 699
          Height = 39
          Hint = #35831#20808#25353#65339#26597#35810#65341#25353#32445#12289#36755#20837#26597#35810#26465#20214#21518#20877#25353#65339#26816#32034#65341#25353#32445#65292#20174#32780#23548#20837#29289#26009#20986#24211#20449#24687
          Align = alRight
          BevelOuter = bvNone
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          object BitBtn1: TBitBtn
            Left = 243
            Top = 7
            Width = 100
            Height = 28
            Caption = #21047#26032'&Q'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -15
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 0
            OnClick = BitBtn1Click
            Glyph.Data = {
              36040000424D3604000000000000360000002800000010000000100000000100
              2000000000000004000000000000000000000000000000000000FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF000000000080000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF008000000080000000800000008000000080000000FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF008000000000000000FF00FF00FF00FF00FF00FF00FF00
              FF0080000000800000008000000080000000FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF0080000000FF00FF00FF00FF00FF00FF00FF00
              FF00800000008000000080000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF0080000000FF00FF00FF00FF00FF00FF00FF00
              FF008000000080000000FF00FF0080000000FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF0080000000FF00FF00FF00FF00FF00FF00FF00
              FF0080000000FF00FF00FF00FF00FF00FF008000000080000000FF00FF00FF00
              FF00FF00FF00FF00FF008000000000000000FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00800000008000
              0000800000008000000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
          end
          object LocateBtn: TBitBtn
            Left = 383
            Top = 7
            Width = 100
            Height = 28
            Caption = #26597#35810'&Q'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -15
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 1
            OnClick = LocateBtnClick
            Glyph.Data = {
              36040000424D3604000000000000360000002800000010000000100000000100
              2000000000000004000000000000000000000000000000000000FF00FF00FF00
              FF00000000160000005705050599080808C2000000BF000000BB0000009D0000
              00690000002700000003FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
              000D5C3E3E9F544646E968676FFF8D6F70FF916B6BFF8D6565F3593B3BDD0E09
              09B4000000800000001F00000001FF00FF00FF00FF00FF00FF00FF00FF009263
              639AC1ABABFF77838AFF4886D1FF8B7FA3FF9B7A7BFFAC9B9BFFB78D8DFF895E
              5EF30E0909AE000000400000001200000006FF00FF00FF00FF00FF00FF00B999
              99FFEAEAEAFFAAAAAAFF4A8AB3FF4C85D1FF8F81A2FF9A7A7BFFA38585FFBE8E
              8EFF312121C80000007D0000005D0000003C00000015FF00FF00FF00FF00B38B
              8BEFEFEFEFFFEFE1E1FFA9A9A9FF4B89B1FF4981D1FF8F81A2FF7C6568FF9879
              79FF493737E7342D2DDB101010C6000000A40000006B0000001BFF00FF009966
              6630BE9797F1D5A298FFDFBABAFF926E6EFF4786B1FF5D8DCCFF958483FFC6A4
              8DFFE8D6AFFFF1E5C4FFC7B1A0FF3D3232E7000000AA00000067FF00FF00FF00
              FF00AD7D7DD5F0A444FFFEB139FFF4C58AFFA2877FFF716C70FFEFC7A1FFFFF6
              C5FFFFFED5FFFFFFE6FFFFFFFCFFD1BEB4FF252121DD0000009DFF00FF000000
              0006BD9393FFF6AC3BFFFFB73BFFFFB940FFFFB940FF9F8679FFFFF0C1FFFFED
              BAFFFFFFDBFFFFFFF1FFFFFFF9FFFFFFDDFF685750F3000000B8FF00FF00865A
              5A49CEAAA3FFFFBE4BFFFFC152FFFFC456FFFFC558FFBFA78DFFFFEEBBFFFFEE
              BBFFFFFFD3FFFFFFE3FFFFFFE3FFFFFFD7FF807164FF000000A4FF00FF009269
              6989DFBEA2FFFFC960FFFFCF6DFFFFD373FFFFD373FF9F887BFFFFFBD9FFFFE9
              C4FFFFF5C3FFFFF8C7FFFFFAC9FFFFF3C5FF6B5750F400000069FF00FF00AC8C
              8CC6EECD9AFFFFD476FFFFDB83FFFFDF8BFFFFDF8BFFA38A6AFFF3E6D5FFFFFF
              FEFFFFF2C7FFFFE3B0FFFFF1C1FFD1AC90FF362D2DB50000001B00000004BEA4
              A4FFF2D08FFFFFDB85FFFFE699FFFFECA6FFFFECA6FFF2DC94FF8F7968FFD7C2
              ADFFE8D3AFFFF1DAB4FFCBA68CFF4D4040B600000015FF00FF0093626232D9CF
              CFFFC1AF8DFFDBC592FFEEDCA6FFFFF6BBFFFFF7BCFFFFEFADFFFFE494FF8968
              5CFF423232D05F4E4E922D2D2D4900000006FF00FF00FF00FF0099666620B499
              99EFCCBFBFFFCCC2C2FFCDBFBFFFC2AEABFFC7B1A4FFD6BC9CFFE6C792FFA772
              72FF0000007A00000012FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00996666209463634296696983A78181B3B99999D2BF9C9CFFC39E9EFF996A
              6ACC0000002400000003FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00996666408558
              582500000003FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
          end
          object ExtBtn: TBitBtn
            Left = 575
            Top = 7
            Width = 100
            Height = 28
            Cancel = True
            Caption = #36864#20986'&X'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -15
            Font.Name = #23435#20307
            Font.Style = []
            ModalResult = 2
            ParentFont = False
            TabOrder = 2
            Glyph.Data = {
              EE000000424DEE000000000000007600000028000000100000000F0000000100
              0400000000007800000000000000000000001000000000000000000000000000
              8000008000000080800080000000800080008080000080808000C0C0C0000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
              888888880888888888888880080088888888880E088808888888000E00000000
              888880EE07770888888880EE07770888888880EE07770888088880EE07770880
              088880EE07770800000880EE07770880088880EE077708880888800077770888
              888880077777088888888000000008888888}
          end
          object BtnExport: TBitBtn
            Left = 103
            Top = 7
            Width = 100
            Height = 28
            Cursor = crHandPoint
            Caption = #23548#20837'Excel'
            Enabled = False
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -15
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 3
            OnClick = BtnExportClick
            Glyph.Data = {
              DE010000424DDE01000000000000760000002800000024000000120000000100
              0400000000006801000000000000000000001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00344446333334
              44433333FFFF333333FFFF33000033AAA43333332A4333338833F33333883F33
              00003332A46333332A4333333383F33333383F3300003332A2433336A6633333
              33833F333383F33300003333AA463362A433333333383F333833F33300003333
              6AA4462A46333333333833FF833F33330000333332AA22246333333333338333
              33F3333300003333336AAA22646333333333383333F8FF33000033444466AA43
              6A43333338FFF8833F383F330000336AA246A2436A43333338833F833F383F33
              000033336A24AA442A433333333833F33FF83F330000333333A2AA2AA4333333
              333383333333F3330000333333322AAA4333333333333833333F333300003333
              333322A4333333333333338333F333330000333333344A433333333333333338
              3F333333000033333336A24333333333333333833F333333000033333336AA43
              33333333333333833F3333330000333333336663333333333333333888333333
              0000}
            NumGlyphs = 2
          end
        end
      end
    end
  end
  object DS_material: TDataSource
    DataSet = ADOQ_material
    Left = 80
    Top = 352
  end
  object ADOQ_CK_mate: TADOQuery
    Connection = DataMod.ADOCon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select a.*,b.unit,b.mat_name, e.matype_name, c.empname,d.opernam' +
        'e from ck_material a, material b, employee c, operator d,materia' +
        'l_type e '
      
        'where c.empid=a.empid and (b.mat_id=a.mat_id) and(a.tmp_id=d.tmp' +
        '_id) and(e.matype_id=b.matype_id )'
      ''
      'order by e.matype_name,a.mat_id,a.ckdate,a.num desc')
    Left = 670
    Top = 112
    object ADOQ_CK_mateckid: TAutoIncField
      DisplayLabel = #20986#24211'ID'#21495
      FieldName = 'ckid'
      ReadOnly = True
    end
    object ADOQ_CK_mateempid: TIntegerField
      DisplayLabel = #21592#24037#32534#21495
      FieldName = 'empid'
    end
    object ADOQ_CK_mateempname: TStringField
      DisplayLabel = #21592#24037#22995#21517
      FieldName = 'empname'
      Size = 10
    end
    object ADOQ_CK_matemat_id: TStringField
      DisplayLabel = #29289#26009#32534#21495
      FieldName = 'mat_id'
      Size = 10
    end
    object ADOQ_CK_matemat_name: TStringField
      DisplayLabel = #29289#26009#21517#31216
      FieldName = 'mat_name'
    end
    object ADOQ_CK_matenum: TFloatField
      DisplayLabel = #20986#24211#25968#37327
      FieldName = 'num'
    end
    object ADOQ_CK_mateunit: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'unit'
      Size = 4
    end
    object ADOQ_CK_mateckdate: TDateTimeField
      DisplayLabel = #20986#24211#26085#26399
      FieldName = 'ckdate'
    end
    object ADOQ_CK_matetmp_id: TIntegerField
      FieldName = 'tmp_id'
    end
    object ADOQ_CK_mateopername: TStringField
      DisplayLabel = #32463#25163#20154
      FieldName = 'opername'
      Size = 10
    end
  end
  object DS_CK_mate_Q: TDataSource
    DataSet = ADOQ_CK_mate
    Left = 704
    Top = 112
  end
  object ADOQemp: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    SQL.Strings = (
      
        'select employee.*,duty.dutyname,department.depname from employee' +
        ',duty,department'
      
        'where duty.dutyid=employee.dutyid and employee.depid=department.' +
        'depid and state=1')
    Left = 52
    Top = 113
  end
  object DS_emp_Q: TDataSource
    DataSet = ADOQemp
    Left = 92
    Top = 113
  end
  object ADOQ_tmp: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    Left = 312
    Top = 160
  end
  object ADOQ_material: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    SQL.Strings = (
      
        'select a.mat_id,a.mat_name,a.flag,a.price,a.color,a.unit,b.matyp' +
        'e_name'
      'from material a, material_type b where a.matype_id=b.matype_id'
      ''
      'order by b.matype_name,a.flag')
    Left = 36
    Top = 352
    object ADOQ_materialmat_id: TStringField
      FieldName = 'mat_id'
      Size = 10
    end
    object ADOQ_materialmat_name: TStringField
      FieldName = 'mat_name'
    end
    object ADOQ_materialflag: TBooleanField
      FieldName = 'flag'
      DisplayValues = #8730
    end
    object ADOQ_materialprice: TBCDField
      FieldName = 'price'
      DisplayFormat = #65509',0.00'
      EditFormat = '0.00'
      Precision = 18
      Size = 2
    end
    object ADOQ_materialcolor: TStringField
      FieldName = 'color'
      Size = 10
    end
    object ADOQ_materialunit: TStringField
      FieldName = 'unit'
      Size = 4
    end
    object ADOQ_materialmatype_name: TStringField
      FieldName = 'matype_name'
    end
  end
end