untwldwstaff.dfm

适合行业为眼镜业

inherited fmWldwStaff: TfmWldwStaff
  Left = 40
  Top = 40
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = #24448#26469#21333#20301#19994#21153#20998#26512
  ClientHeight = 446
  ClientWidth = 737
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object PageC1: TPageControl
    Left = 0
    Top = 0
    Width = 737
    Height = 446
    ActivePage = TabGoods
    Align = alClient
    Images = ImageList1
    TabIndex = 0
    TabOrder = 0
    OnChange = PageC1Change
    object TabGoods: TTabSheet
      Caption = #36827#36135#21830#21697#20998#24067
      object Panel3: TPanel
        Left = 0
        Top = 380
        Width = 729
        Height = 37
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          729
          37)
        object BitBtn1: TBitBtn
          Left = 319
          Top = 8
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = #26597#23547
          TabOrder = 0
          OnClick = BitBtn1Click
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            04000000000080000000120B0000120B00001000000010000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
            DADAADADADADAD00ADAD000000000910000A0FFFF0FF9F10FF0D0FF00009F10F
            FF0A0F0787701088FF0D0078E7F70FFFFF0A008E878F08888F0D00EFE7E80FFF
            FF0A007FF78708888F0D0F07E770FFFFFF0A0F8000088888FF0D0FFFF0FFFFFF
            FF0A444444444444444D444444444444444A444444444444444D}
        end
        object BitBtn2: TBitBtn
          Left = 393
          Top = 8
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = #26639#30446#24067#23616
          TabOrder = 1
          OnClick = BitBtn2Click
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            04000000000080000000120B0000120B00001000000010000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
            DADAADADADADADADADADDADADAD000000000ADADADA0FFFFFFF0DADA0000F00F
            00F0ADAD0FF0FFFFFFF0D0000F00F00F00F0A0FF0FF0FFFFFFF0D0F00F00F00F
            00F0A0FF0FF0FFFFFFF0D0F00F0000000000A0FF0FFFFFFF0DADD0F000000000
            0ADAA0FFFFFFF0ADADADD000000000DADADAADADADADADADADAD}
        end
        object BitBtn3: TBitBtn
          Left = 468
          Top = 8
          Width = 97
          Height = 25
          Anchors = [akTop, akRight]
          Caption = #21830#21697#20998#24067'(F1)'
          TabOrder = 2
          OnClick = BitBtn3Click
          OnMouseDown = BitBtn3MouseDown
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            04000000000080000000120B0000120B00001000000010000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00000000000000
            00DA07FFFFFFFFFFFF0D08000F0007000070070CC00BB0099100070CC40BB309
            910A070CC40BB309910D070CC40BB309910A070CC40BB309910D080CC40BB309
            910A0780000BB309910D0870DA0BB309910A0780AD0BB300910D0F70DA0BB30A
            000AA0F0AD0BB80DADADDA00DAD0000ADADAADA0ADADADADADAD}
        end
        object btnpagedown: TBitBtn
          Left = 566
          Top = 8
          Width = 89
          Height = 25
          Anchors = [akTop, akRight]
          Caption = #19979#19968#31508#25968#25454
          TabOrder = 3
          OnClick = btnpagedownClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            33333FF3333333333333447333333333333377FFF33333333333744473333333
            333337773FF3333333333444447333333333373F773FF3333333334444447333
            33333373F3773FF3333333744444447333333337F333773FF333333444444444
            733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
            999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
            33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
            333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
            33333777333333333333CC333333333333337733333333333333}
          NumGlyphs = 2
        end
        object BitBtn7: TBitBtn
          Left = 654
          Top = 8
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = #36864#20986
          TabOrder = 4
          OnClick = BitBtn7Click
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333333333333FFFFF333333000033333388888833333333333F888888FFF333
            000033338811111188333333338833FFF388FF33000033381119999111833333
            38F338888F338FF30000339119933331111833338F388333383338F300003391
            13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
            33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
            33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
            000039183811193333918338F8F833F83333838F000039118111933339118338
            F3833F83333833830000339111193333391833338F33F8333FF838F300003391
            11833338111833338F338FFFF883F83300003339111888811183333338FF3888
            83FF83330000333399111111993333333388FFFFFF8833330000333333999999
            3333333333338888883333330000333333333333333333333333333333333333
            0000}
          NumGlyphs = 2
        end
        object BitBtn18: TBitBtn
          Left = 243
          Top = 8
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = #25171#21360
          TabOrder = 5
          OnClick = btnprintClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
            0003377777777777777308888888888888807F33333333333337088888888888
            88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
            8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
            8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
            03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
            03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
            33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
            33333337FFFF7733333333300000033333333337777773333333}
          NumGlyphs = 2
        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 121
        Width = 729
        Height = 259
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 1
        object Gridbase: TStringGrid
          Left = 0
          Top = 0
          Width = 729
          Height = 259
          Align = alClient
          RowCount = 2
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goColMoving]
          TabOrder = 0
          Visible = False
          OnDrawCell = GridbaseDrawCell
        end
        object DBGrid1: TDBGrid
          Left = 0
          Top = 0
          Width = 729
          Height = 259
          Align = alClient
          DataSource = dsview
          TabOrder = 1
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          OnDrawDataCell = DBGrid1DrawDataCell
          OnDrawColumnCell = DBGrid1DrawColumnCell
          OnTitleClick = DBGrid1TitleClick
          Columns = <
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'Storage_NO'
              Title.Alignment = taCenter
              Title.Caption = #20179#24211#32534#21495
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'wldw'
              Title.Alignment = taCenter
              Title.Caption = #24448#26469#21333#20301
              Width = 150
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'type'
              Title.Alignment = taCenter
              Title.Caption = #21830#21697#31867#21035
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Goods_NO'
              Title.Alignment = taCenter
              Title.Caption = #21830#21697#32534#30721
              Width = 161
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Goods_Name'
              Title.Alignment = taCenter
              Title.Caption = #21830#21697#21517#31216
              Width = 162
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'countamount'
              Title.Alignment = taCenter
              Title.Caption = #21830#21697#25968#37327
              Width = 74
              Visible = True
            end>
        end
      end
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 729
        Height = 121
        Align = alTop
        BevelInner = bvLowered
        BevelOuter = bvSpace
        TabOrder = 2
        object Label1: TLabel
          Left = 259
          Top = 10
          Width = 184
          Height = 21
          Caption = #24448#26469#21333#20301#36827#36135#20998#26512
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -21
          Font.Name = #38582#20070
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label2: TLabel
          Left = 205
          Top = 12
          Width = 11
          Height = 19
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -19
          Font.Name = #38582#20070
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label3: TLabel
          Left = 576
          Top = 18
          Width = 65
          Height = 13
          Caption = #19979#36733#26465#25968#65306
        end
        object cmbtop: TComboBox
          Left = 640
          Top = 15
          Width = 73
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 0
          Items.Strings = (
            '100'
            '200'
            '500'
            '1000'
            '1500'
            '2000'
            '2500'
            '3000'
            '3500'
            '4000'
            '4500'
            '5000')
        end
        object Panel4: TPanel
          Left = 2
          Top = 35
          Width = 725
          Height = 84
          Align = alBottom
          BevelInner = bvLowered
          BevelOuter = bvSpace
          TabOrder = 1
          object Label11: TLabel
            Left = 229
            Top = 64
            Width = 13
            Height = 13
            Caption = #36215
          end
          object Label12: TLabel
            Left = 392
            Top = 65
            Width = 13
            Height = 13
            Caption = #27490
          end
          object CBType: TComboBox
            Left = 69
            Top = 5
            Width = 112
            Height = 21
            Style = csDropDownList
            Color = cl3DLight
            ItemHeight = 13
            TabOrder = 0
            OnChange = CBTypeChange
          end
          object cbBrand: TComboBox
            Left = 319
            Top = 5
            Width = 113
            Height = 21