qc_qry_qcreport1.dfm

一个MRPII系统源代码版本

inherited Frm_Qc_Qry_QcReport1: TFrm_Qc_Qry_QcReport1
  Left = 178
  Top = 121
  Caption = #36136#37327#20998#26512#25253#34920
  ClientHeight = 437
  ClientWidth = 748
  Icon.Data = {
    0000010001002020100001000400E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000077
    7777000000000000000000000000777777777777777700000000000000000000
    00000077777777700000000000000000DDDDD00000077777700000000000DDDD
    DDDDDDDDDD0000777770000000000000000007DDDDDDD0000777700000000000
    0000000007DDDDDDD0077700000000000000000000007DCCCDD0777000000000
    000000000000000CCCC407770000007770000000000000000CCCC47770000711
    1700000000000000000CCC477700099917000000000000000000CCC477700099
    917000000000000000000CCC477000009970000000000000000007CCC4777000
    0977000000000000000002CCC47717000001700000000000000072ACCC479170
    7079177000000000000072AAAC470097171991177700000000072AAAAC470009
    99919991111777777772AAAAAAC700011999999999911111332AAAAAAAC00001
    999999999999999BBBAAAAAAAAC0771999999999999999BBBBBBBAAAAC009999
    9999999999999999BBBBBBBAAC000099999999999999999BBBBBBBBBA0000000
    99999999999999BBBBBBBBBA00000000009999999999999BBBBBBAA000000000
    0000999999999999BB990000000000000000000999999999990000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFC0FFFFFF0000FFFFFFC01FFFF07E07FF0003
    C1FFFF80787FFFF8063FFFFF011FFFFFE08FC7FFF80783FFFE0383FFFF01C1FF
    FF81F1FFFF8078FFFF803E7FFF00141FFF00C003FE00E0000000E0000001E000
    00010000000300000003C0000007F000000FFC00001FFF0000FFFFE003FF}
  PixelsPerInch = 96
  TextHeight = 12
  inherited ControlBar: TControlBar
    Width = 748
  end
  inherited Pnl_Title: TPanel
    Width = 748
    Caption = #22806#36141#22806#21327#20214#36136#37327#20998#26512#26376#25253#34920
    inherited Image2: TImage
      Width = 748
    end
  end
  inherited Pnl_Head: TPanel
    Width = 748
    inherited Image1: TImage
      Width = 748
    end
  end
  inherited Pnl_Hint: TPanel
    Top = 396
    Width = 748
    Height = 41
    inherited Image4: TImage
      Width = 748
      Height = 41
    end
    object Label1: TLabel
      Left = 23
      Top = 8
      Width = 684
      Height = 12
      Caption = #35745#31639#35828#26126#65306#20379#26041#36865#36135#25968#37327#26159#26681#25454#32463#36807#36136#26816#21028#23450#30340#24453#26816#20837#24211#25968#37327#35745#31639#30340#65292#19981#21512#26684#25968#37327#26159#26681#25454#36136#26816#21028#23450#38750#27491#24120#29366#24577#30340#24453#26816#25968#37327#35745#31639#30340#12290
    end
    object Label2: TLabel
      Left = 83
      Top = 24
      Width = 168
      Height = 12
      Caption = #21512#26684#29575#26159#25351#26816#39564#25209#27425#30340#21512#26684#29575#12290
    end
  end
  inherited Pnl_Body: TPanel
    Width = 748
    Height = 305
    inherited Image3: TImage
      Width = 748
      Height = 305
    end
    inherited DBGridEh: TDBGridEh
      Width = 748
      Height = 305
      Columns = <
        item
          EditButtons = <>
          FieldName = 'QcClass'
          Footers = <>
          Title.Caption = #36136#26816#29289#26009#20998#31867
          Width = 96
        end
        item
          EditButtons = <>
          FieldName = 'ItemCode'
          Footers = <>
          Title.Caption = #29289#26009#20195#30721
          Width = 125
        end
        item
          EditButtons = <>
          FieldName = 'ItemName'
          Footers = <>
          Title.Caption = #29289#26009#25551#36848
          Width = 250
        end
        item
          EditButtons = <>
          FieldName = 'VendorName'
          Footers = <>
          Title.Caption = #20379#24212#21830#25551#36848
          Width = 200
        end
        item
          EditButtons = <>
          FieldName = 'allqty'
          Footers = <>
          Title.Caption = #20379#26041#36865#36135#25968#37327
          Width = 81
        end
        item
          EditButtons = <>
          FieldName = 'illqty'
          Footers = <>
          Title.Caption = #19981#21512#26684#25968#37327
        end
        item
          EditButtons = <>
          FieldName = 'allQc'
          Footers = <>
          Title.Caption = #26816#39564#25209#27425
          Width = 56
        end
        item
          EditButtons = <>
          FieldName = 'illQc'
          Footers = <>
          Title.Caption = #19981#21512#26684#25209#27425
        end
        item
          EditButtons = <>
          FieldName = 'okrate'
          Footers = <>
          Title.Caption = #21512#26684#29575'%'
          Width = 51
        end
        item
          EditButtons = <>
          FieldName = 'czff'
          Footers = <>
          Title.Caption = #22788#32622#26041#27861
          Width = 170
        end
        item
          EditButtons = <>
          FieldName = 'illdate'
          Footers = <>
          Title.Caption = #19981#21512#26684#26085#26399
          Width = 143
        end>
    end
  end
  inherited ActionList: TActionList
    Left = 208
    Top = 176
  end
  inherited AdoQry_Main: TAdoQuery
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=mdrcmrm;Persist Security Info=True;' +
      'User ID=mdrcmrm;Initial Catalog=mdrcmrm;Data Source=192.168.0.15' +
      '1;Use procedure for Prepare=1;Auto Translate=True;Packet Size=40' +
      '96;Workstation ID=XYB'
    SQL.Strings = (
      ' select Item.QcClass,QcReport.ItemCode,Item.ItemName,'
      
        '                QcReport.VendorCode,Vendor.VendorName,QcReport.a' +
        'llqty,illqty,QcReport.allQc,'
      '                QcReport.illQc,QcReport.okrate,QcReport.czff,'
      '                QcReport.illdate '
      '                from QcReport'
      
        '                left join Item on Item.ItemCode=QcReport.Itemcod' +
        'e'
      
        '                left join Vendor on Vendor.VendorCode=QcReport.v' +
        'endorCode'
      '                Order by QcReport.ItemCode,QcReport.VendorCode'
      '')
    Left = 296
    Top = 273
  end
  object AdoQry_tmp2: TAdoQuery
    Parameters = <>
    Left = 424
    Top = 169
  end
end