unitproductout.dfm

仓储系统

      ButtonBevel.Width = 1
      FlashOptions = [foGlyph, foText, foTextCol, foBtnCol]
      CheckedOptions = [coGlyph, coText, coTextCol, coBtnCol, coBevel]
      ColorOff = clBtnFace
      ColorDisabled = 10526880
      ColorOn = clBtnFace
      OffsetX = 0
      OffsetY = 0
      OffsetDown = 1
      NumGlyph = 1
      Beveled = True
      Transparent = False
      Flat = True
      Spacing = 4
      TextOn = #26126#32454#36164#26009
      TextColOn = clRed
      TextColOff = clBlack
      TextColDisabled = clBtnShadow
      Text3D = True
      Frequency = ff1Hz
      Flashing = False
      GroupIndex = 0
      StatusBit = 0
      StatusInt = 0
      Checked = False
      Mode = mButton
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object btnGz: TAbColBitBtn
      Left = 483
      Top = 4
      Width = 80
      Height = 26
      PosHorizontal = phCenter
      PosVertical = pvCenter
      PosGlyph = pLeft
      GradBtnFace.ColorFrom = 15790320
      GradBtnFace.ColorTo = clSilver
      GradBtnFace.Visible = True
      GradBtnFace.Style = gsHorizontal2
      ButtonBevel.ShadowColFrom = clWhite
      ButtonBevel.ShadowColTo = clSilver
      ButtonBevel.HighlightColFrom = clSilver
      ButtonBevel.HighlightColTo = clWhite
      ButtonBevel.Width = 1
      FlashOptions = [foGlyph, foText, foTextCol, foBtnCol]
      CheckedOptions = [coGlyph, coText, coTextCol, coBtnCol, coBevel]
      ColorOff = clBtnFace
      ColorDisabled = 10526880
      ColorOn = clBtnFace
      OffsetX = 0
      OffsetY = 0
      OffsetDown = 1
      NumGlyph = 1
      Beveled = True
      Transparent = False
      Flat = True
      Spacing = 4
      TextOn = #36807#24080
      TextColOn = clRed
      TextColOff = clBlack
      TextColDisabled = clBtnShadow
      Text3D = True
      Frequency = ff1Hz
      Flashing = False
      GroupIndex = 0
      StatusBit = 0
      StatusInt = 0
      Checked = False
      Mode = mButton
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      OnClick = btnGzClick
    end
    object edtStockNum: TRxCalcEdit
      Left = 99
      Top = 7
      Width = 107
      Height = 21
      AutoSize = False
      DecimalPlaces = 4
      DisplayFormat = ',0.####'
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      NumGlyphs = 2
      ParentFont = False
      TabOrder = 0
      ZeroEmpty = False
    end
    object edtStockZJ: TCurrencyEdit
      Left = 275
      Top = 7
      Width = 107
      Height = 21
      AutoSize = False
      DecimalPlaces = 4
      DisplayFormat = #65509',0.0000;-'#65509',0.0000'
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 259
    Width = 747
    Height = 160
    Align = alClient
    Color = 15263976
    DataSource = dsCk
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
    ParentFont = False
    TabOrder = 3
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clBlack
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = [fsBold]
    OnDrawColumnCell = DBGrid1DrawColumnCell
    Columns = <
      item
        Expanded = False
        FieldName = 'Xh'
        Title.Alignment = taCenter
        Title.Caption = #24207#21495
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Out_Bill'
        Title.Alignment = taCenter
        Title.Caption = #20986#24211#21333#21495
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Plan_id'
        Title.Alignment = taCenter
        Title.Caption = #35745#21010#32534#21495
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Mate_Code'
        Title.Alignment = taCenter
        Title.Caption = #29289#26009#32534#30721
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Mate_Name'
        Title.Alignment = taCenter
        Title.Caption = #29289#26009#21517#31216
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Mate_Type'
        Title.Alignment = taCenter
        Title.Caption = #35268#26684#22411#21495
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'KfNo'
        Title.Alignment = taCenter
        Title.Caption = #25152#22312#24211#25151
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'KwNo'
        Title.Alignment = taCenter
        Title.Caption = #25152#22312#24211#20301
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Cust_id'
        Title.Alignment = taCenter
        Title.Caption = #23458#25143#20195#30721
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'Out_Date'
        Title.Alignment = taCenter
        Title.Caption = #20986#24211#26085#26399
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Out_Amount'
        Title.Alignment = taCenter
        Title.Caption = #20986#24211#25968#37327
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Out_Price'
        Title.Alignment = taCenter
        Title.Caption = #20986#24211#21333#20215
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Out_Zj'
        Title.Alignment = taCenter
        Title.Caption = #24635#20215
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Out_Post'
        Title.Alignment = taCenter
        Title.Caption = #36807#24080#26631#24535
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Out_man'
        Title.Alignment = taCenter
        Title.Caption = #32463#25163#20154
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Exam_man'
        Title.Alignment = taCenter
        Title.Caption = #26816#39564#20154
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Oper_id'
        Title.Alignment = taCenter
        Title.Caption = #21046#21333#20154
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Ck_memo'
        Title.Alignment = taCenter
        Title.Caption = #25688#35201
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 150
        Visible = True
      end>
  end
  object ADOQuery_sql: TADOQuery
    Connection = DM.ADO_C
    Parameters = <>
    SQL.Strings = (
      
        'select a.Xh,a.Out_Bill,a.Plan_id,                               ' +
        '   '
      
        '                a.Mate_Code,b.Mate_Name,b.Mate_Type,            ' +
        '   '
      
        '                a.Cust_id,a.Out_Date,                           ' +
        '   '
      
        '                a.KfNo,a.KwNo,a.Out_Type,                       ' +
        '   '
      
        '                c.PlanNum,c.Out_Sum,c.In_Sum,                   ' +
        '            '
      
        '                b.Stoc_Amount,b.Mate_TotalPrice,                ' +
        '   '
      
        '                a.Out_Amount,a.Out_Price,a.Out_Zj,a.Out_Post,   ' +
        '   '
      
        '                a.Out_man,a.Exam_man,a.Oper_id,a.Ck_memo        ' +
        '   '
      
        '            from Mate_Ck a                                      ' +
        '   '
      
        '            left outer join Mate_Basic b on a.Mate_Code=b.Mate_C' +
        'ode '
      '            left outer join PlanNum c on a.Plan_id=c.PlanNo')
    Left = 88
    Top = 296
  end
  object dsCk: TDataSource
    DataSet = DM.qry_ProductOut
    OnDataChange = dsCkDataChange
    Left = 32
    Top = 296
  end
  object qry_Jhbh: TADOQuery
    Connection = DM.ADO_C
    Parameters = <>
    Left = 160
    Top = 296
  end
end