object frmShaRKInPut: TfrmShaRKInPut
  Left = 407
  Top = 186
  Width = 1288
  Height = 635
  Align = alClient
  Caption = #32433#32447#20837#24211
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object cxGrid2: TcxGrid
    Left = 0
    Top = 85
    Width = 1272
    Height = 511
    Align = alClient
    TabOrder = 0
    object Tv1: TcxGridDBTableView
      OnMouseDown = Tv1MouseDown
      Navigator.Buttons.CustomButtons = <>
      DataController.DataSource = DataSource3
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Kind = skCount
        end
        item
          Kind = skSum
        end
        item
          Kind = skSum
          Column = v2Column6
        end
        item
          Kind = skSum
        end
        item
          Kind = skSum
          Column = v1Column9
        end
        item
          Kind = skSum
          Column = Tv1Column2
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.GoToNextCellOnEnter = True
      OptionsCustomize.ColumnFiltering = False
      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      Styles.Content = cxStyle1
      Styles.Inactive = DataLink_Yarn.SHuangSe
      Styles.IncSearch = DataLink_Yarn.SHuangSe
      Styles.Selection = DataLink_Yarn.SHuangSe
      Styles.Header = DataLink_Yarn.Default
      object v1Column6: TcxGridDBColumn
        Caption = #20837#24211#21333#21495
        DataBinding.FieldName = 'Y_ID'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 83
      end
      object v1Column2: TcxGridDBColumn
        Tag = 2
        Caption = #20837#24211#26102#38388
        DataBinding.FieldName = 'CRTime'
        PropertiesClassName = 'TcxDateEditProperties'
        Properties.SaveTime = False
        Properties.ShowTime = False
        HeaderAlignmentHorz = taCenter
        Width = 100
      end
      object FactoryName: TcxGridDBColumn
        Tag = 2
        Caption = #32433#32447#20379#24212#21830#65288#20135#22320#65289
        DataBinding.FieldName = 'FactoryName'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.OnButtonClick = FactoryNameLPropertiesButtonClick
        HeaderAlignmentHorz = taCenter
        Width = 170
      end
      object v1Column5: TcxGridDBColumn
        Tag = 2
        Caption = #20379#24212#21830#31867#22411
        DataBinding.FieldName = 'FactType'
        HeaderAlignmentHorz = taCenter
        Width = 88
      end
      object v1Column4: TcxGridDBColumn
        Tag = 2
        Caption = #20837#24211#31867#22411
        DataBinding.FieldName = 'CRType'
        PropertiesClassName = 'TcxComboBoxProperties'
        Properties.DropDownListStyle = lsFixedList
        Properties.DropDownRows = 20
        Properties.Items.Strings = (
          #26399#21021#20837#24211
          #37319#36141#20837#24211
          #21152#24037#23436#25104
          #21152#24037#26410#20570#22238#20179
          #32455#36896#26410#20570#22238#20179
          #36864#22238)
        HeaderAlignmentHorz = taCenter
        Width = 88
      end
      object v1ComTaiTou: TcxGridDBColumn
        Tag = 2
        Caption = #25260#22836
        DataBinding.FieldName = 'Syrname'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.OnButtonClick = v1ComTaiTouPropertiesButtonClick
        HeaderAlignmentHorz = taCenter
        Width = 86
      end
      object v2Column1: TcxGridDBColumn
        Tag = 2
        Caption = #21697#21517
        DataBinding.FieldName = 'Y_CodeName'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.OnButtonClick = v2Column1PropertiesButtonClick
        HeaderAlignmentHorz = taCenter
        Width = 100
      end
      object v1Column8: TcxGridDBColumn
        Tag = 2
        Caption = #21407#26009#35268#26684
        DataBinding.FieldName = 'Y_Spec'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.OnButtonClick = v1Column8PropertiesButtonClick
        HeaderAlignmentHorz = taCenter
        HeaderGlyphAlignmentHorz = taCenter
        Width = 65
      end
      object v1Column7: TcxGridDBColumn
        Tag = 2
        Caption = #25104#20998
        DataBinding.FieldName = 'Y_CF'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.OnButtonClick = v1Column7PropertiesButtonClick
        HeaderAlignmentHorz = taCenter
        HeaderGlyphAlignmentHorz = taCenter
        Width = 73
      end
      object v1Column1: TcxGridDBColumn
        Tag = 2
        Caption = #25209#21495
        DataBinding.FieldName = 'BatchNo'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.OnButtonClick = v1Column1PropertiesButtonClick
        HeaderAlignmentHorz = taCenter
      end
      object v1Column11: TcxGridDBColumn
        Tag = 2
        Caption = #23384#25918#24037#21378
        DataBinding.FieldName = 'ToFactoryName'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.ReadOnly = True
        Properties.OnButtonClick = v1Column11PropertiesButtonClick
        HeaderAlignmentHorz = taCenter
        Width = 90
      end
      object v1Column9: TcxGridDBColumn
        Tag = 2
        Caption = #31665'/'#20214#25968
        DataBinding.FieldName = 'PiQty'
        PropertiesClassName = 'TcxTextEditProperties'
        HeaderAlignmentHorz = taCenter
        Width = 64
      end
      object v2Column6: TcxGridDBColumn
        Tag = 2
        Caption = #25968#37327
        DataBinding.FieldName = 'Qty'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.OnEditValueChanged = v2Column6PropertiesEditValueChanged
        HeaderAlignmentHorz = taCenter
        Width = 81
      end
      object v1Column3: TcxGridDBColumn
        Tag = 2
        Caption = #21333#20301
        DataBinding.FieldName = 'QtyUnit'
        PropertiesClassName = 'TcxComboBoxProperties'
        Properties.DropDownListStyle = lsFixedList
        Properties.Items.Strings = (
          'Kg'
          'M'
          #25903)
        HeaderAlignmentHorz = taCenter
        Width = 64
      end
      object v1Price: TcxGridDBColumn
        Tag = 2
        Caption = #21333#20215
        DataBinding.FieldName = 'Price'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.OnEditValueChanged = v2Column6PropertiesEditValueChanged
        HeaderAlignmentHorz = taCenter
        Width = 70
      end
      object Tv1Column2: TcxGridDBColumn
        Tag = 2
        Caption = #37329#39069
        DataBinding.FieldName = 'MONEY'
        HeaderAlignmentHorz = taCenter
        Width = 68
      end
      object v1Column16: TcxGridDBColumn
        Tag = 2
        Caption = #26469#33258#24037#21378
        DataBinding.FieldName = 'FromFactoryName'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.ReadOnly = True
        Properties.OnButtonClick = v1Column16PropertiesButtonClick
        HeaderAlignmentHorz = taCenter
        Width = 78
      end
      object v1Note: TcxGridDBColumn
        Tag = 2
        Caption = #22791#27880
        DataBinding.FieldName = 'Note'
        HeaderAlignmentHorz = taCenter
        Width = 79
      end
      object v1Column10: TcxGridDBColumn
        Tag = 2
        Caption = #20379#24212#21830#65288#32534#21495#65289
        DataBinding.FieldName = 'FactoryNo'
        Options.Editing = False
        Width = 95
      end
      object Tv1Column1: TcxGridDBColumn
        Tag = 2
        Caption = #21333#21253
        DataBinding.FieldName = 'danbao'
        HeaderAlignmentHorz = taCenter
        Width = 100
      end
    end
    object cxGrid2Level1: TcxGridLevel
      GridView = Tv1
    end
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 1272
    Height = 33
    ButtonHeight = 30
    ButtonWidth = 59
    Caption = 'ToolBar1'
    Color = clSkyBlue
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Images = DataLink_Yarn.ThreeImgList
    List = True
    ParentColor = False
    ParentFont = False
    ShowCaptions = True
    TabOrder = 1
    object TBSave: TToolButton
      Left = 0
      Top = 0
      AutoSize = True
      Caption = #20445#23384
      ImageIndex = 5
      OnClick = TBSaveClick
    end
    object ToolButton1: TToolButton
      Left = 63
      Top = 0
      AutoSize = True
      Caption = #26032#22686
      ImageIndex = 57
      OnClick = ToolButton1Click
    end
    object TBDel: TToolButton
      Left = 126
      Top = 0
      AutoSize = True
      Caption = #21024#38500
      ImageIndex = 3
      OnClick = TBDelClick
    end
    object TBClose: TToolButton
      Left = 189
      Top = 0
      AutoSize = True
      Caption = #20851#38381
      ImageIndex = 21
      OnClick = TBCloseClick
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 33
    Width = 1272
    Height = 52
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Color = clSkyBlue
    TabOrder = 2
    object Label2: TLabel
      Left = 52
      Top = 16
      Width = 60
      Height = 12
      Caption = #37319#36141#21512#21516#21495
    end
    object Label4: TLabel
      Left = 420
      Top = 16
      Width = 6
      Height = 12
    end
    object Label1: TLabel
      Left = 675
      Top = 16
      Width = 6
      Height = 12
    end
    object ConNo: TBtnEditC
      Left = 116
      Top = 12
      Width = 121
      Height = 20
      TabOrder = 0
      OnBtnUpClick = ConNoBtnUpClick
      OnBtnDnClick = ConNoBtnDnClick
    end
  end
  object DataSource3: TDataSource
    DataSet = CDS_Sub
    Left = 792
    Top = 424
  end
  object CDS_Sub: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 760
    Top = 424
  end
  object ADOQueryCmd: TADOQuery
    Connection = DataLink_Yarn.ADOLink
    Parameters = <>
    Left = 616
    Top = 424
  end
  object ADOQueryMain: TADOQuery
    Connection = DataLink_Yarn.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 640
    Top = 424
  end
  object ADOQueryTemp: TADOQuery
    Connection = DataLink_Yarn.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 680
    Top = 424
  end
  object cxGridPopupMenu2: TcxGridPopupMenu
    Grid = cxGrid2
    PopupMenus = <>
    Left = 712
    Top = 424
  end
  object RM1: TRMGridReport
    ThreadPrepareReport = True
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
    ShowProgress = False
    DefaultCollate = False
    ShowPrintDialog = False
    SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
    PreviewOptions.RulerUnit = rmutScreenPixels
    PreviewOptions.RulerVisible = False
    PreviewOptions.DrawBorder = False
    PreviewOptions.BorderPen.Color = clGray
    PreviewOptions.BorderPen.Style = psDash
    Dataset = RMDBHZ
    CompressLevel = rmzcFastest
    CompressThread = False
    LaterBuildEvents = True
    OnlyOwnerDataSet = False
    Left = 664
    Top = 262
    ReportData = {}
  end
  object RMDBHZ: TRMDBDataSet
    Visible = True
    DataSet = CDS_HZ
    Left = 631
    Top = 260
  end
  object CDS_HZ: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 599
    Top = 260
  end
  object cxStyleRepository1: TcxStyleRepository
    PixelsPerInch = 96
    object cxStyle1: TcxStyle
      AssignedValues = [svFont]
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
    end
  end
end
