uddcx.dfm

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

          Title.Alignment = taCenter
          Title.Caption = '颜色'
          Width = 53
          Visible = True
        end
        item
          Alignment = taCenter
          Color = clBtnHighlight
          Expanded = False
          FieldName = 'Total'
          Title.Alignment = taCenter
          Title.Caption = '总数量'
          Width = 44
          Visible = True
        end>
    end
    object DBGrid5: TDBGrid
      Left = 527
      Top = 10
      Width = 240
      Height = 125
      TabStop = False
      Color = clInfoBk
      DataSource = DataSource5
      FixedColor = clCaptionText
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      Columns = <
        item
          Alignment = taCenter
          Color = clBtnHighlight
          Expanded = False
          FieldName = 'ShoesNo'
          Title.Alignment = taCenter
          Title.Caption = '鞋子编码'
          Width = 75
          Visible = True
        end
        item
          Alignment = taCenter
          Color = clBtnHighlight
          Expanded = False
          FieldName = 'BaoZhuangFa'
          Title.Alignment = taCenter
          Title.Caption = '包装方法'
          Width = 50
          Visible = True
        end
        item
          Alignment = taCenter
          Color = clBtnHighlight
          Expanded = False
          FieldName = 'BeginXiangHao'
          Title.Alignment = taCenter
          Title.Caption = '箱号'
          Width = 47
          Visible = True
        end
        item
          Alignment = taCenter
          Color = clBtnHighlight
          Expanded = False
          FieldName = 'Amount'
          Title.Alignment = taCenter
          Title.Caption = '箱数'
          Width = 44
          Visible = True
        end>
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 181
    Width = 777
    Height = 142
    Align = alClient
    TabOrder = 3
    object DBGridEh2: TDBGridEh
      Left = 9
      Top = 10
      Width = 759
      Height = 121
      Color = clInfoBk
      DataSource = DataSource2
      FixedColor = clWhite
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      FrozenCols = 2
      FooterFont.Charset = ANSI_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = '宋体'
      FooterFont.Style = []
      FooterColor = clWhite
      OptionsEh = [dghFixed3D, dghFrozen3D, dghHighlightFocus, dghClearSelection]
      Columns = <
        item
          Color = clWhite
          FieldName = 'r_name'
          Title.Alignment = taCenter
          Title.Caption = '款式'
          Width = 63
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'amount'
          Title.Alignment = taCenter
          Title.Caption = '数量'
          Width = 50
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'face'
          Title.Alignment = taCenter
          Title.Caption = '面料'
          Width = 57
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'model'
          Title.Alignment = taCenter
          Title.Caption = '楦型'
          Width = 61
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'inperson'
          Title.Alignment = taCenter
          Title.Caption = '录入人'
          Width = 56
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'overdate'
          Title.Alignment = taCenter
          Title.Caption = '完成日期'
          Width = 128
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'zldate'
          Title.Alignment = taCenter
          Title.Caption = '下达指令表日期'
          Width = 119
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'scdate'
          Title.Alignment = taCenter
          Title.Caption = '生产日期'
          Width = 122
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'scoverdate'
          Title.Alignment = taCenter
          Title.Caption = '生产完成日期'
          Width = 118
          Footers = <>
        end
        item
          Color = clWhite
          FieldName = 'senddate'
          Title.Alignment = taCenter
          Title.Caption = '发货日期'
          Width = 106
          Footers = <>
        end>
    end
  end
  object ADOTkh: TADOTable
    Connection = DM.ADOConnection
    TableName = 's_Customer'
    Left = 272
    Top = 8
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    OnDataChange = DataSource1DataChange
    Left = 508
    Top = 88
  end
  object ADOQuery1: TADOQuery
    Connection = DM.ADOConnection
    Parameters = <>
    Left = 480
    Top = 87
  end
  object ADOQuery2: TADOQuery
    Connection = DM.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'pm1'
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end>
    SQL.Strings = (
      
        'select orderno,r_name,amount,face,model,inperson,overdate,zldate' +
        ',scdate,scoverdate,senddate'
      'from xs_order2 where orderno=:pm1'
      ' ')
    Left = 403
    Top = 222
    object ADOQuery2r_name: TWideStringField
      FieldName = 'r_name'
      Size = 10
    end
    object ADOQuery2amount: TIntegerField
      FieldName = 'amount'
    end
    object ADOQuery2face: TWideStringField
      FieldName = 'face'
    end
    object ADOQuery2model: TWideStringField
      FieldName = 'model'
    end
    object ADOQuery2inperson: TWideStringField
      FieldName = 'inperson'
      Size = 10
    end
    object ADOQuery2overdate: TDateTimeField
      FieldName = 'overdate'
    end
    object ADOQuery2zldate: TDateTimeField
      FieldName = 'zldate'
    end
    object ADOQuery2scdate: TDateTimeField
      FieldName = 'scdate'
    end
    object ADOQuery2scoverdate: TDateTimeField
      FieldName = 'scoverdate'
    end
    object ADOQuery2senddate: TDateTimeField
      FieldName = 'senddate'
    end
    object ADOQuery2orderno: TWideStringField
      FieldName = 'orderno'
      Size = 15
    end
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    OnDataChange = DataSource2DataChange
    Left = 432
    Top = 223
  end
  object ADOQuery3: TADOQuery
    Connection = DM.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'pm1'
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end
      item
        Name = 'pm2'
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 10
        Value = Null
      end>
    SQL.Strings = (
      'select * from xs_order3 where orderno=:pm1 and r_name=:pm2'
      ' ')
    Left = 147
    Top = 366
    object ADOQuery3OrderNo: TWideStringField
      FieldName = 'OrderNo'
      Size = 15
    end
    object ADOQuery3R_name: TWideStringField
      FieldName = 'R_name'
      Size = 10
    end
    object ADOQuery3ShoesNo: TWideStringField
      FieldName = 'ShoesNo'
      Size = 50
    end
    object ADOQuery3Color: TWideStringField
      FieldName = 'Color'
      Size = 40
    end
    object ADOQuery3Face: TWideStringField
      FieldName = 'Face'
      Size = 50
    end
    object ADOQuery3Size: TWideStringField
      FieldName = 'Size'
      Size = 10
    end
    object ADOQuery3Amount: TIntegerField
      FieldName = 'Amount'
    end
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 176
    Top = 367
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery4
    Left = 360
    Top = 367
  end
  object ADOQuery4: TADOQuery
    Connection = DM.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'pm1'
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end
      item
        Name = 'pm2'
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 10
        Value = Null
      end>
    SQL.Strings = (
      'select * from xs_order4 where orderno=:pm1 and r_name =:pm2'
      ' ')
    Left = 387
    Top = 366
    object ADOQuery4OrderNo: TWideStringField
      FieldName = 'OrderNo'
      Size = 15
    end
    object ADOQuery4R_name: TWideStringField
      FieldName = 'R_name'
      Size = 10
    end
    object ADOQuery4ShoesNo: TWideStringField
      FieldName = 'ShoesNo'
      Size = 50
    end
    object ADOQuery4Color: TWideStringField
      FieldName = 'Color'
      Size = 40
    end
    object ADOQuery4Total: TIntegerField
      FieldName = 'Total'
    end
  end
  object ADOQuery5: TADOQuery
    Connection = DM.ADOConnection
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'pm1'
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end>
    SQL.Strings = (
      'select * from xs_order5 where orderno=:pm1'
      ' ')
    Left = 555
    Top = 366
    object ADOQuery5Orderno: TWideStringField
      FieldName = 'Orderno'
      Size = 15
    end
    object ADOQuery5R_name: TWideStringField
      FieldName = 'R_name'
      Size = 10
    end
    object ADOQuery5ShoesNo: TWideStringField
      FieldName = 'ShoesNo'
      Size = 50
    end
    object ADOQuery5BaoZhuangFa: TWideStringField
      FieldName = 'BaoZhuangFa'
    end
    object ADOQuery5Amount: TIntegerField
      FieldName = 'Amount'
    end
    object ADOQuery5BeginXiangHao: TWideStringField
      FieldName = 'BeginXiangHao'
      Size = 100
    end
  end
  object DataSource5: TDataSource
    DataSet = ADOQuery5
    Left = 584
    Top = 367
  end
end