material_kc.dfm

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

        Height = 23
        DataField = 'matype_name'
        DataSource = DS_KC_Mate_Q
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = True
        ParentFont = False
        TabOrder = 7
      end
      object Panel3: TPanel
        Left = 369
        Top = 38
        Width = 17
        Height = 62
        AutoSize = True
        BevelOuter = bvNone
        ParentColor = True
        TabOrder = 8
        object Label21: TLabel
          Left = 0
          Top = 0
          Width = 17
          Height = 15
          Align = alTop
          Caption = #22791
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label29: TLabel
          Left = 0
          Top = 47
          Width = 17
          Height = 15
          Align = alBottom
          Alignment = taCenter
          Caption = ':'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label30: TLabel
          Left = 0
          Top = 15
          Width = 17
          Height = 10
          Align = alTop
          AutoSize = False
        end
        object Label31: TLabel
          Left = 0
          Top = 25
          Width = 17
          Height = 15
          Align = alTop
          Caption = #27880
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label32: TLabel
          Left = 0
          Top = 40
          Width = 17
          Height = 4
          Align = alTop
          AutoSize = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 421
    Width = 687
    Height = 39
    Align = alBottom
    BevelOuter = bvNone
    ParentColor = True
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object ExtBtn: TBitBtn
      Left = 557
      Top = 6
      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 = 0
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        888888880888888888888880080088888888880E088808888888000E00000000
        888880EE07770888888880EE07770888888880EE07770888088880EE07770880
        088880EE07770800000880EE07770880088880EE077708880888800077770888
        888880077777088888888000000008888888}
    end
    object DetailBtn: TBitBtn
      Left = 307
      Top = 6
      Width = 100
      Height = 28
      Hint = #20462#25913'|'#20462#25913
      Caption = #35814#32454#20449#24687'&A'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = DetailBtnClick
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000008000
        0000008000008080000000008000800080000080800080808000C0C0C000FF00
        000000FF0000FFFF00000000FF00FF00FF0000FFFF00FFFFFF00DD0000000000
        000DDD0FFFFEFEFEF80DDD0FF88888886F0DDD0F777776767E0DDD0FFFFFFFFF
        FF0DDD0FF88888868E0DDD0F777777777F0DDD0FFFFFFFFFFE0DDD0FF8888888
        8F0DDD0F777777777F0DDD0FFFFFFFFF880DDD0FFF8888F8000DDD0FF77777F0
        F80DDD0FFFFFFFF080DDDD0FFFFFFFF00DDDDD0000000000DDDD}
    end
    object RefreshBtn: TBitBtn
      Left = 188
      Top = 6
      Width = 100
      Height = 28
      Caption = #21047#26032'&R'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = RefreshBtnClick
      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 = 426
      Top = 6
      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 = 3
      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 BtnExport: TBitBtn
      Left = 55
      Top = 6
      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 = 4
      OnClick = BtnExportClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00344446333334
        44433333FFFF333333FFFF33000033AAA43333332A4333338833F33333883F33
        00003332A46333332A4333333383F33333383F3300003332A2433336A6633333
        33833F333383F33300003333AA463362A433333333383F333833F33300003333
        6AA4462A46333333333833FF833F33330000333332AA22246333333333338333
        33F3333300003333336AAA22646333333333383333F8FF33000033444466AA43
        6A43333338FFF8833F383F330000336AA246A2436A43333338833F833F383F33
        000033336A24AA442A433333333833F33FF83F330000333333A2AA2AA4333333
        333383333333F3330000333333322AAA4333333333333833333F333300003333
        333322A4333333333333338333F333330000333333344A433333333333333338
        3F333333000033333336A24333333333333333833F333333000033333336AA43
        33333333333333833F3333330000333333336663333333333333333888333333
        0000}
      NumGlyphs = 2
    end
  end
  object ADOQ_KC_Mate: TADOQuery
    Connection = DataMod.ADOCon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select a.*,b.unit,b.color,b.mat_name,b.flag,b.price,b.memo,c.mat' +
        'ype_name from KC_Material a, material b, material_type c'
      'where (b.mat_id=a.mat_id) and (c.matype_id=b.matype_id )'
      ''
      'order by c.matype_name,a.mat_id,a.num desc')
    Left = 96
    Top = 256
    object ADOQ_KC_Matemat_id: TStringField
      DisplayLabel = #29289#26009#32534#21495
      FieldName = 'mat_id'
      Size = 10
    end
    object ADOQ_KC_Matemat_name: TStringField
      DisplayLabel = #29289#26009#21517#31216
      FieldName = 'mat_name'
    end
    object ADOQ_KC_Matenum: TFloatField
      DisplayLabel = #24211#23384#25968#37327
      FieldName = 'num'
    end
    object ADOQ_KC_Matematype_name: TStringField
      DisplayLabel = #29289#26009#31867#21035
      FieldName = 'matype_name'
    end
    object ADOQ_KC_Mateprice: TFloatField
      DisplayLabel = #21333#20215
      FieldName = 'price'
      DisplayFormat = #65509',0.00'
      EditFormat = '0.00'
    end
    object ADOQ_KC_Matecolor: TStringField
      DisplayLabel = #29289#26009#39068#33394
      FieldName = 'color'
    end
    object ADOQ_KC_Mateunit: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'unit'
    end
    object ADOQ_KC_Matememo: TStringField
      FieldName = 'memo'
    end
    object ADOQ_KC_Mateflag: TBooleanField
      FieldName = 'flag'
    end
  end
  object DS_KC_Mate_Q: TDataSource
    DataSet = ADOQ_KC_Mate
    Left = 136
    Top = 256
  end
  object ADOQ_tmp: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    Left = 208
    Top = 256
  end
end