dailyproductstatfrm.~dfm

相关的销售服务管理行业的一个软件

inherited DailyProductStatForm: TDailyProductStatForm
  Caption = 'DailyProductStatForm'
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel2: TPanel
    inherited Label2: TLabel
      Left = 35
      Top = 6
    end
    inherited Label3: TLabel
      Left = 149
      Top = 6
    end
    object Label1: TLabel [2]
      Left = 256
      Top = 18
      Width = 6
      Height = 12
    end
    object Label4: TLabel [3]
      Left = 271
      Top = 6
      Width = 60
      Height = 12
      Caption = '分销店名称'
    end
    inherited DTPBegin: TDateTimePicker
      Left = 35
      Top = 20
    end
    inherited DTPEnd: TDateTimePicker
      Left = 149
      Top = 20
    end
    inherited BitBtn4: TBitBtn
      TabOrder = 7
    end
    inherited rgStoreStype: TRadioGroup
      Left = 424
      Width = 153
      Visible = False
    end
    object cbStoreName: TComboBox
      Left = 271
      Top = 20
      Width = 145
      Height = 20
      ItemHeight = 12
      TabOrder = 6
      Text = 'cbStoreName'
      OnChange = cbStoreNameChange
    end
  end
  inherited Panel3: TPanel
    inherited DBGridEh1: TDBGridEh
      FooterColor = clInfoBk
      Columns = <
        item
          Alignment = taCenter
          FieldName = '产品编码'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.TitleButton = True
          Width = 151
          Footer.Font.Charset = GB2312_CHARSET
          Footer.Font.Color = clBlack
          Footer.Font.Height = -12
          Footer.Font.Name = '宋体'
          Footer.Font.Style = []
          Footer.ValueType = fvtStaticText
          Footer.Value = '合计：'
          KeyList.Strings = ()
          Footers = <>
        end
        item
          Alignment = taCenter
          FieldName = '颜色'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Width = 75
          Footer.Font.Charset = GB2312_CHARSET
          Footer.Font.Color = clBlack
          Footer.Font.Height = -12
          Footer.Font.Name = '宋体'
          Footer.Font.Style = []
          KeyList.Strings = ()
          Footers = <>
        end
        item
          Alignment = taCenter
          FieldName = '数量'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.TitleButton = True
          Width = 88
          Footer.Font.Charset = GB2312_CHARSET
          Footer.Font.Color = clBlack
          Footer.Font.Height = -12
          Footer.Font.Name = '宋体'
          Footer.Font.Style = []
          Footer.ValueType = fvtSum
          KeyList.Strings = ()
          Footers = <>
        end
        item
          Alignment = taCenter
          FieldName = '金额'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.TitleButton = True
          Width = 94
          Footer.Font.Charset = GB2312_CHARSET
          Footer.Font.Color = clBlack
          Footer.Font.Height = -12
          Footer.Font.Name = '宋体'
          Footer.Font.Style = []
          Footer.ValueType = fvtSum
          KeyList.Strings = ()
          Footers = <>
        end>
    end
  end
  inherited ActionList1: TActionList
    inherited APrint: TAction
      OnExecute = APrintExecute
    end
    inherited AReview: TAction
      OnExecute = AReviewExecute
    end
  end
  inherited ADOQuery1: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'SELECT dbo.xs_DailyDetail.ProductCode AS 产品编码, '
      '       dbo.Js_product1.Style_num AS 款式, '
      '       dbo.Js_product1.XuanZi_num AS 楦型, '
      '       dbo.Js_Color.Co_name AS 颜色, '
      '       SUM(dbo.xs_DailyDetail.Total) AS 数量, '
      '       SUM(dbo.xs_DailyDetail.Amount) AS 金额'
      'FROM dbo.xs_DailyDetail INNER JOIN'
      '      dbo.xs_DailyMaster ON '
      
        '      dbo.xs_DailyDetail.DailyCode = dbo.xs_DailyMaster.DailyCod' +
        'e INNER JOIN'
      '      dbo.xs_store ON '
      
        '      dbo.xs_DailyMaster.StoreCode = dbo.xs_store.StoreCode INNE' +
        'R JOIN'
      '      dbo.Js_product1 ON '
      
        '      dbo.xs_DailyDetail.ProductCode = dbo.Js_product1.shoes_num' +
        ' INNER JOIN'
      
        '      dbo.Js_Color ON dbo.Js_product1.color_num = dbo.Js_Color.C' +
        'o_short'
      
        'GROUP BY dbo.xs_DailyDetail.ProductCode, dbo.Js_product1.Style_n' +
        'um, '
      
        '      dbo.Js_product1.XuanZi_num, dbo.Js_Color.Co_name, dbo.Js_p' +
        'roduct1.Style_num')
    object ADOQuery1DSDesigner: TWideStringField
      FieldName = '产品编码'
      Size = 50
    end
    object ADOQuery1DSDesigner4: TWideStringField
      FieldName = '颜色'
      Size = 40
    end
    object ADOQuery1DSDesigner5: TFloatField
      FieldName = '数量'
      ReadOnly = True
      DisplayFormat = '#0 双'
    end
    object ADOQuery1DSDesigner6: TFloatField
      FieldName = '金额'
      ReadOnly = True
      DisplayFormat = '￥ #0.00'
    end
  end
  object ADOQuery2: TADOQuery
    Connection = DM.ADOConnection
    CursorType = ctStatic
    Parameters = <>
    Left = 408
    Top = 113
  end
end