dfm_saledetail.dfm

仓库管理系统 仓库管理系统

object dfmsaledetail: Tdfmsaledetail
  Left = 24
  Top = 104
  Width = 662
  Height = 463
  Caption = #38144#21806#26126#32454#30721#26597#35810
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poOwnerFormCenter
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object StatusBar1: TStatusBar
    Left = 0
    Top = 417
    Width = 654
    Height = 19
    Panels = <>
    SimplePanel = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 356
    Width = 654
    Height = 61
    Align = alBottom
    TabOrder = 1
    object Label1: TLabel
      Left = 10
      Top = 10
      Width = 36
      Height = 12
      Caption = #26085#26399#65306
    end
    object Label2: TLabel
      Left = 190
      Top = 10
      Width = 12
      Height = 12
      Caption = #33267
    end
    object Label3: TLabel
      Left = 203
      Top = 38
      Width = 36
      Height = 12
      Caption = #27454#24335#30721
    end
    object Label4: TLabel
      Left = 360
      Top = 10
      Width = 24
      Height = 12
      Caption = #37096#38376
    end
    object Label5: TLabel
      Left = 11
      Top = 38
      Width = 24
      Height = 12
      Caption = #21697#29260
    end
    object Label6: TLabel
      Left = 378
      Top = 36
      Width = 36
      Height = 12
      Caption = #32534#30721#20301
    end
    object quitbtn: TBitBtn
      Left = 523
      Top = 6
      Width = 75
      Height = 25
      Caption = #26597#35810
      TabOrder = 0
      OnClick = quitbtnClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
        F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
        000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
        338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
        45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
        3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
        F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
        000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
        338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
        4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
        8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
        333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
        0000}
      NumGlyphs = 2
    end
    object DateTimePicker1: TDateTimePicker
      Left = 60
      Top = 5
      Width = 121
      Height = 20
      CalAlignment = dtaLeft
      Date = 37323.7144625579
      Time = 37323.7144625579
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 1
    end
    object DateTimePicker2: TDateTimePicker
      Left = 213
      Top = 5
      Width = 121
      Height = 20
      CalAlignment = dtaLeft
      Date = 37323.7144625579
      Time = 37323.7144625579
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 2
    end
    object Edit1: TEdit
      Left = 255
      Top = 33
      Width = 101
      Height = 20
      TabOrder = 3
    end
    object ComboBox1: TComboBox
      Left = 399
      Top = 5
      Width = 101
      Height = 20
      ItemHeight = 12
      TabOrder = 4
    end
    object ComboBox2: TComboBox
      Left = 60
      Top = 33
      Width = 123
      Height = 20
      ItemHeight = 12
      TabOrder = 5
    end
    object MaskEdit1: TMaskEdit
      Left = 425
      Top = 31
      Width = 34
      Height = 20
      TabOrder = 6
      Text = '10'
    end
    object UpDown1: TUpDown
      Left = 459
      Top = 31
      Width = 15
      Height = 20
      Associate = MaskEdit1
      Min = 6
      Max = 10
      Position = 10
      TabOrder = 7
      Wrap = False
    end
    object BitBtn1: TBitBtn
      Left = 523
      Top = 31
      Width = 75
      Height = 25
      Caption = #25171#21360
      TabOrder = 8
      OnClick = BitBtn1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
        8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
        8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
        8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
    end
  end
  object DBGridEh1: TDBGridEh
    Left = 0
    Top = 0
    Width = 654
    Height = 356
    Align = alClient
    DataSource = DataSource1
    FooterColor = clYellow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    FooterRowCount = 1
    SumList.Active = True
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnTitleClick = DBGridEh1TitleClick
    CurrencyStyle.CurrencyFont.Charset = DEFAULT_CHARSET
    CurrencyStyle.CurrencyFont.Color = clWindowText
    CurrencyStyle.CurrencyFont.Height = -11
    CurrencyStyle.CurrencyFont.Name = 'MS Sans Serif'
    CurrencyStyle.CurrencyFont.Style = []
    CurrencyStyle.CurrencySymbol = #65509
    CurrencyStyle.CompartColor = clSilver
    CurrencyStyle.KilobitColor = clGreen
    CurrencyStyle.RadixColor = clRed
    CurrencyStyle.ShowMinus = True
    CurrencyStyle.ShowZero = False
    CurrencyStyle.MinusColor = clRed
    CurrencyStyle.Layout = tlCenter
    CurrencyStyle.HeadFont.Charset = DEFAULT_CHARSET
    CurrencyStyle.HeadFont.Color = clWindowText
    CurrencyStyle.HeadFont.Height = -11
    CurrencyStyle.HeadFont.Name = #26999#20307'_GB2312'
    CurrencyStyle.HeadFont.Style = []
    Columns = <
      item
        EditButtons = <>
        FieldName = 'clabel'
        Footer.Value = #21512#35745#65306
        Footer.ValueType = fvtStaticText
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21697#29260
        Width = 85
      end
      item
        EditButtons = <>
        FieldName = 'spbh'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21830#21697#32534#30721
        Width = 104
      end
      item
        EditButtons = <>
        FieldName = 'esl'
        Footer.ValueType = fvtSum
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25968#37327
        Width = 68
      end
      item
        EditButtons = <>
        FieldName = 'esjje'
        Footer.ValueType = fvtSum
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #37329#39069
        Width = 80
      end
      item
        EditButtons = <>
        FieldName = 'ezke'
        Footer.ValueType = fvtSum
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25240#25187#39069
      end
      item
        EditButtons = <>
        FieldName = 'cname'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21830#21697#21517#31216
        Width = 318
      end>
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = dmRainbowMIS.adopos
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'SELECT t_saledet.clabel, t_saledet.spbh,sum(t_saledet.sl) as esl' +
        ', sum(t_saledet.sjje) as esjje,  sum(t_saledet.zke) as ezke,t_sp' +
        'ec.cname FROM t_saledet,t_ware,t_spec'
      
        '        WHERE t_saledet.clabel=t_ware.clabel and t_saledet.spbh=' +
        't_ware.spbh and t_saledet.bmh like '#39's'#39' AND (t_saledet.clabel) li' +
        'ke '#39's'#39
      '        group by t_spec.cname,t_saledet.spbh, t_saledet.clabel')
    Left = 536
    Top = 112
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 504
    Top = 112
  end
  object ADOTable1: TADOTable
    Connection = dmRainbowMIS.adopos
    TableName = 't_branch'
    Left = 512
    Top = 168
  end
  object ADOTable2: TADOTable
    Connection = dmRainbowMIS.adopos
    TableName = 't_label'
    Left = 544
    Top = 168
  end
  object ppReport1: TppReport
    AutoStop = False
    DataPipeline = ppDBPipeline1
    PrinterSetup.BinName = 'Default'
    PrinterSetup.DocumentName = 'Report'
    PrinterSetup.PaperName = 'Letter Transverse'
    PrinterSetup.PrinterName = 'Default'
    PrinterSetup.mmMarginBottom = 6350
    PrinterSetup.mmMarginLeft = 6350
    PrinterSetup.mmMarginRight = 6350
    PrinterSetup.mmMarginTop = 6350
    PrinterSetup.mmPaperHeight = 279401
    PrinterSetup.mmPaperWidth = 215900
    PrinterSetup.PaperSize = 54
    DeviceType = 'Screen'
    Left = 528
    Top = 224
    Version = '6.02'
    mmColumnWidth = 0
    DataPipelineName = 'ppDBPipeline1'
    object ppHeaderBand1: TppHeaderBand
      mmBottomOffset = 0
      mmHeight = 25929
      mmPrintPosition = 0
      object ppLabel1: TppLabel
        UserName = 'Label1'
        Caption = #38144#21806#25253#34920
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = #23435#20307
        Font.Size = 16
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 6615
        mmLeft = 83873
        mmTop = 2117
        mmWidth = 23019
        BandType = 0
      end
      object ppLabel2: TppLabel
        UserName = 'Label2'
        Caption = #37096#38376#21495#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = #23435#20307
        Font.Size = 10
        Font.Style = []
        Transparent = True
        mmHeight = 3969
        mmLeft = 14023
        mmTop = 10583
        mmWidth = 14023
        BandType = 0
      end
      object ppVariable1: TppVariable
        UserName = 'Variable1'
        CalcOrder = 0
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = #23435#20307
        Font.Size = 10
        Font.Style = []
        OnCalc = ppVariable1Calc
        Transparent = True
        mmHeight = 3969
        mmLeft = 31221
        mmTop = 10583
        mmWidth = 16404
        BandType = 0
      end
      object ppLabel3: TppLabel
        UserName = 'Label3'
        Caption = #26085#26399#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = #23435#20307
        Font.Size = 10
        Font.Style = []
        Transparent = True
        mmHeight = 3969