dfm_ssaleno.dfm

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

object dfmssaleno: Tdfmssaleno
  Left = 66
  Top = 127
  Width = 627
  Height = 401
  Caption = #38144#21806#21333#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 = poDesktopCenter
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object StatusBar1: TStatusBar
    Left = 0
    Top = 355
    Width = 619
    Height = 19
    Panels = <>
    SimplePanel = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 306
    Width = 619
    Height = 49
    Align = alBottom
    TabOrder = 1
    object Label1: TLabel
      Left = 176
      Top = 31
      Width = 36
      Height = 12
      Caption = #21333#25454#21495
    end
    object Label2: TLabel
      Left = 8
      Top = 9
      Width = 36
      Height = 12
      Caption = #26085#26399#65306
    end
    object Label3: TLabel
      Left = 176
      Top = 9
      Width = 12
      Height = 12
      Caption = #33267
    end
    object Label4: TLabel
      Left = 8
      Top = 31
      Width = 36
      Height = 12
      Caption = #37096#38376#21495
    end
    object Edit1: TEdit
      Left = 214
      Top = 27
      Width = 103
      Height = 20
      TabOrder = 0
    end
    object BitBtn1: TBitBtn
      Left = 360
      Top = 11
      Width = 78
      Height = 25
      Caption = #26597#35810
      TabOrder = 1
      OnClick = BitBtn1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
        300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
        330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
        333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
        339977FF777777773377000BFB03333333337773FF733333333F333000333333
        3300333777333333337733333333333333003333333333333377333333333333
        333333333333333333FF33333333333330003333333333333777333333333333
        3000333333333333377733333333333333333333333333333333}
      NumGlyphs = 2
    end
    object DateTimePicker1: TDateTimePicker
      Left = 48
      Top = 5
      Width = 105
      Height = 20
      CalAlignment = dtaLeft
      Date = 37387.9842813657
      Time = 37387.9842813657
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 2
    end
    object DateTimePicker2: TDateTimePicker
      Left = 214
      Top = 5
      Width = 105
      Height = 20
      CalAlignment = dtaLeft
      Date = 37387.9842813657
      Time = 37387.9842813657
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 3
    end
    object ComboBox1: TComboBox
      Left = 48
      Top = 27
      Width = 105
      Height = 20
      ItemHeight = 12
      TabOrder = 4
    end
    object BitBtn2: TBitBtn
      Left = 438
      Top = 11
      Width = 75
      Height = 25
      Caption = #21333#21495#27719#24635#34920
      TabOrder = 5
      OnClick = BitBtn2Click
    end
  end
  object DBGridEh1: TDBGridEh
    Left = 0
    Top = 0
    Width = 619
    Height = 306
    Align = alClient
    DataSource = DataSource2
    FooterColor = clYellow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    FooterRowCount = 1
    FrozenCols = 1
    ReadOnly = True
    SumList.Active = True
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    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 = 'jyh'
        Footer.Value = #21512#35745#65306
        Footer.ValueType = fvtStaticText
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21333#25454#21495
        Width = 93
      end
      item
        EditButtons = <>
        FieldName = 'spbh'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21830#21697#32534#30721
        Width = 73
      end
      item
        EditButtons = <>
        FieldName = 'cname'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21830#21697#21517#31216
        Width = 151
      end
      item
        EditButtons = <>
        FieldName = 'sl'
        Footer.ValueType = fvtSum
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25968#37327
        Width = 55
      end
      item
        EditButtons = <>
        FieldName = 'lsj'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #38646#21806#20215
        Width = 58
      end
      item
        EditButtons = <>
        FieldName = 'zke'
        Footer.ValueType = fvtSum
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25240#25187#39069
        Width = 63
      end
      item
        EditButtons = <>
        FieldName = 'sjje'
        Footer.ValueType = fvtSum
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #37329#39069
        Width = 72
      end
      item
        EditButtons = <>
        FieldName = 'skyh'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25910#27454#21592
      end
      item
        EditButtons = <>
        FieldName = 'yyyh'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #23548#36141#21592#21495
      end
      item
        EditButtons = <>
        FieldName = 'rq'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #26085#26399
        Width = 86
      end
      item
        EditButtons = <>
        FieldName = 'sj'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #26102#38388
        Width = 67
      end>
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 160
    Top = 56
  end
  object ADOQuery2: TADOQuery
    Connection = dmRainbowMIS.adopos
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'vjyh'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    SQL.Strings = (
      
        'SELECT t_saledet.bmh, t_saledet.rq, t_saledet.sj, t_saledet.jyh,' +
        ' t_saledet.yyyh, t_saledet.skyh, t_saledet.spbh, t_saledet.sl, t' +
        '_saledet.lsj, t_saledet.sjje, t_saledet.zke, t_saledet.clabel, t' +
        '_ware.flh, t_spec.cname'
      
        'FROM t_saledet INNER JOIN (t_spec INNER JOIN t_ware ON (t_spec.c' +
        'style = t_ware.flh) AND (t_spec.clabel = t_ware.clabel)) ON (t_s' +
        'aledet.clabel = t_ware.clabel) AND (t_saledet.spbh = t_ware.spbh' +
        ')'
      
        'GROUP BY t_saledet.bmh, t_saledet.rq, t_saledet.sj, t_saledet.jy' +
        'h, t_saledet.yyyh, t_saledet.skyh, t_saledet.spbh, t_saledet.sl,' +
        ' t_saledet.lsj, t_saledet.sjje, t_saledet.zke, t_saledet.clabel,' +
        ' t_ware.flh, t_spec.cname'
      'HAVING t_saledet.jyh=:vjyh'
      '')
    Left = 192
    Top = 56
    object ADOQuery2bmh: TWideStringField
      FieldName = 'bmh'
      Size = 6
    end
    object ADOQuery2rq: TDateTimeField
      FieldName = 'rq'
    end
    object ADOQuery2sj: TDateTimeField
      FieldName = 'sj'
      DisplayFormat = 'hh:nn:ss'
    end
    object ADOQuery2jyh: TWideStringField
      FieldName = 'jyh'
      Size = 15
    end
    object ADOQuery2yyyh: TWideStringField
      FieldName = 'yyyh'
      Size = 8
    end
    object ADOQuery2skyh: TWideStringField
      FieldName = 'skyh'
      Size = 8
    end
    object ADOQuery2spbh: TWideStringField
      FieldName = 'spbh'
      Size = 23
    end
    object ADOQuery2sl: TIntegerField
      FieldName = 'sl'
    end
    object ADOQuery2lsj: TBCDField
      FieldName = 'lsj'
      currency = True
      Precision = 19
    end
    object ADOQuery2sjje: TBCDField
      FieldName = 'sjje'
      currency = True
      Precision = 19
    end
    object ADOQuery2zke: TBCDField
      FieldName = 'zke'
      currency = True
      Precision = 19
    end
    object ADOQuery2clabel: TWideStringField
      FieldName = 'clabel'
      Size = 16
    end
    object ADOQuery2flh: TWideStringField
      FieldName = 'flh'
      Size = 8
    end
    object ADOQuery2cname: TWideStringField
      FieldName = 'cname'
    end
  end
  object ADOTable1: TADOTable
    Connection = dmRainbowMIS.adopos
    TableName = 't_branch'
    Left = 456
    Top = 56
  end
  object ADOTable2: TADOTable
    Connection = dmRainbowMIS.adopos
    TableName = 't_salepara'
    Left = 456
    Top = 112
  end
end