D7szChenfeng/纱线仓库/U_ShaOutList.dfm

object frmShaOutList: TfrmShaOutList
  Left = 261
  Top = 167
  Width = 1356
  Height = 667
  Caption = #32433#32447#20986#24211#21015#34920
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 1340
    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 = 0
    object TBRafresh: TToolButton
      Left = 0
      Top = 0
      AutoSize = True
      Caption = #21047#26032
      ImageIndex = 0
      OnClick = TBRafreshClick
    end
    object TBFind: TToolButton
      Left = 63
      Top = 0
      AutoSize = True
      Caption = #36807#28388
      ImageIndex = 20
      OnClick = TBFindClick
    end
    object TBAdd: TToolButton
      Left = 126
      Top = 0
      AutoSize = True
      Caption = #20986#24211
      ImageIndex = 1
      OnClick = TBAddClick
    end
    object TBEdit: TToolButton
      Left = 189
      Top = 0
      AutoSize = True
      Caption = #20462#25913
      ImageIndex = 11
      OnClick = TBEditClick
    end
    object TBDel: TToolButton
      Left = 252
      Top = 0
      AutoSize = True
      Caption = #21024#38500
      ImageIndex = 3
      OnClick = TBDelClick
    end
    object TBExport: TToolButton
      Left = 315
      Top = 0
      AutoSize = True
      Caption = #23548#20986
      ImageIndex = 68
      OnClick = TBExportClick
    end
    object ToolButton1: TToolButton
      Left = 378
      Top = 0
      AutoSize = True
      Caption = #25171#21360
      ImageIndex = 4
      OnClick = ToolButton1Click
    end
    object TBClose: TToolButton
      Left = 441
      Top = 0
      AutoSize = True
      Caption = #20851#38381
      ImageIndex = 12
      OnClick = TBCloseClick
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 33
    Width = 1340
    Height = 61
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Color = clSkyBlue
    TabOrder = 1
    object Label1: TLabel
      Left = 28
      Top = 12
      Width = 48
      Height = 12
      Caption = #26597#35810#26102#38388
    end
    object Label2: TLabel
      Left = 64
      Top = 39
      Width = 12
      Height = 12
      Caption = #33267
    end
    object Label3: TLabel
      Left = 321
      Top = 12
      Width = 24
      Height = 12
      Caption = #21697#21517
    end
    object Label4: TLabel
      Left = 443
      Top = 7
      Width = 42
      Height = 24
      Caption = #20379#24212#21830'/'#13#10#21152#24037#21378
    end
    object Label5: TLabel
      Left = 178
      Top = 12
      Width = 48
      Height = 12
      Caption = #20986#24211#21333#21495
    end
    object Label8: TLabel
      Left = 321
      Top = 39
      Width = 24
      Height = 12
      Caption = #35268#26684
    end
    object Label12: TLabel
      Left = 179
      Top = 39
      Width = 48
      Height = 12
      Caption = #20986#24211#31867#22411
    end
    object Label6: TLabel
      Left = 443
      Top = 39
      Width = 42
      Height = 12
      Caption = #25104'   '#20998
    end
    object Label11: TLabel
      Left = 583
      Top = 12
      Width = 60
      Height = 12
      Caption = #26469#33258#21152#24037#21378
    end
    object Label13: TLabel
      Left = 583
      Top = 39
      Width = 60
      Height = 12
      Caption = #20986#21040#21152#24037#21378
    end
    object Label14: TLabel
      Left = 743
      Top = 13
      Width = 48
      Height = 12
      Caption = #25209'    '#21495
    end
    object Label15: TLabel
      Left = 743
      Top = 37
      Width = 48
      Height = 12
      Caption = #25260'    '#22836
    end
    object BegDate: TDateTimePicker
      Left = 77
      Top = 9
      Width = 87
      Height = 20
      Date = 40768.458268587970000000
      Time = 40768.458268587970000000
      ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      TabOrder = 0
    end
    object EndDate: TDateTimePicker
      Left = 77
      Top = 36
      Width = 87
      Height = 20
      Date = 40768.458268587970000000
      Time = 40768.458268587970000000
      ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      TabOrder = 1
    end
    object Y_CodeName: TEdit
      Tag = 2
      Left = 348
      Top = 9
      Width = 80
      Height = 20
      TabOrder = 2
      OnChange = TBFindClick
    end
    object FactoryName: TEdit
      Tag = 2
      Left = 487
      Top = 9
      Width = 80
      Height = 20
      TabOrder = 3
      OnChange = Y_SpecChange
    end
    object Y_ID: TEdit
      Tag = 2
      Left = 228
      Top = 9
      Width = 80
      Height = 20
      TabOrder = 4
      OnChange = Y_IDChange
      OnKeyPress = Y_IDKeyPress
    end
    object Y_Spec: TEdit
      Tag = 2
      Left = 348
      Top = 35
      Width = 80
      Height = 20
      TabOrder = 5
      OnChange = Y_SpecChange
    end
    object CRType: TComboBox
      Tag = 2
      Left = 228
      Top = 35
      Width = 80
      Height = 20
      Style = csDropDownList
      DropDownCount = 20
      ItemHeight = 12
      TabOrder = 6
      OnChange = TBFindClick
      Items.Strings = (
        ''
        '')
    end
    object Y_CF: TEdit
      Tag = 2
      Left = 487
      Top = 35
      Width = 80
      Height = 20
      TabOrder = 7
      OnChange = Y_SpecChange
    end
    object FromFactoryName: TEdit
      Tag = 2
      Left = 643
      Top = 9
      Width = 80
      Height = 20
      TabOrder = 8
      OnChange = Y_SpecChange
    end
    object ToFactoryName: TEdit
      Tag = 2
      Left = 643
      Top = 36
      Width = 80
      Height = 20
      TabOrder = 9
      OnChange = Y_SpecChange
    end
    object BatchNo: TEdit
      Tag = 1
      Left = 794
      Top = 9
      Width = 92
      Height = 20
      TabOrder = 10
      OnChange = Y_SpecChange
      OnKeyPress = BatchNoKeyPress
    end
    object SyrName: TEdit
      Tag = 2
      Left = 794
      Top = 33
      Width = 92
      Height = 20
      TabOrder = 11
    end
  end
  object cxGrid2: TcxGrid
    Left = 0
    Top = 116
    Width = 1340
    Height = 512
    Align = alClient
    TabOrder = 2
    object Tv1: TcxGridDBTableView
      Navigator.Buttons.CustomButtons = <>
      DataController.DataSource = DataSource1
      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>
      DataController.Summary.SummaryGroups = <>
      OptionsCustomize.ColumnFiltering = False
      OptionsSelection.CellSelect = False
      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      Styles.Content = cxStyle1
      Styles.Header = cxStyle1
      object v1Column6: TcxGridDBColumn
        Caption = #20986#24211#21333#21495
        DataBinding.FieldName = 'Y_ID'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 83
      end
      object v1Column2: TcxGridDBColumn
        Tag = 2
        Caption = #20986#24211#26102#38388
        DataBinding.FieldName = 'CRTime'
        PropertiesClassName = 'TcxDateEditProperties'
        Properties.SaveTime = False
        Properties.ShowTime = False
        HeaderAlignmentHorz = taCenter
        Width = 100
      end
      object v1Column4: TcxGridDBColumn
        Tag = 2
        Caption = #20986#24211#31867#22411
        DataBinding.FieldName = 'CRType'
        PropertiesClassName = 'TcxComboBoxProperties'
        Properties.DropDownListStyle = lsFixedList
        Properties.Items.Strings = (
          #21152#24037#20986#24211
          #24179#31227#20986#24211
          #36864#36135)
        HeaderAlignmentHorz = taCenter
        Width = 81
      end
      object v1Column1: TcxGridDBColumn
        Caption = #37319#36141#21333#21495
        DataBinding.FieldName = 'ConNo'
        Visible = False
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        VisibleForCustomization = False
        Width = 85
      end
      object v1Column14: TcxGridDBColumn
        Tag = 2
        Caption = #20379#24212#21830'/'#21152#24037#21378
        DataBinding.FieldName = 'FactoryName'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Alignment.Horz = taLeftJustify
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 94
      end
      object v2Column1: TcxGridDBColumn
        Tag = 2
        Caption = #21697#21517
        DataBinding.FieldName = 'Y_CodeName'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 100
      end
      object v1Column20: TcxGridDBColumn
        Caption = #32534#21495
        DataBinding.FieldName = 'SPCode'
        Visible = False
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        VisibleForCustomization = False
        Width = 92
      end
      object v1Column8: TcxGridDBColumn
        Tag = 2
        Caption = #35268#26684
        DataBinding.FieldName = 'Y_Spec'
        HeaderAlignmentHorz = taCenter
        HeaderGlyphAlignmentHorz = taCenter
        Options.Editing = False
        Width = 67
      end
      object v1Column7: TcxGridDBColumn
        Tag = 2
        Caption = #25104#20998
        DataBinding.FieldName = 'Y_CF'
        HeaderAlignmentHorz = taCenter
        HeaderGlyphAlignmentHorz = taCenter
        Options.Editing = False
        Width = 73
      end
      object v1Column10: TcxGridDBColumn
        Caption = #25209#21495
        DataBinding.FieldName = 'BatchNo'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 74
      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
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 75
      end
      object v1ComTaiTou: TcxGridDBColumn
        Caption = #25260#22836
        DataBinding.FieldName = 'SyrName'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 70
      end
      object v1Column9: TcxGridDBColumn
        Tag = 2
        Caption = #31665'/'#20214#25968
        DataBinding.FieldName = 'PiQty'
        PropertiesClassName = 'TcxTextEditProperties'
        OnCustomDrawCell = v1Column9CustomDrawCell
        HeaderAlignmentHorz = taCenter
        Width = 67
      end
      object v2Column6: TcxGridDBColumn
        Tag = 2
        Caption = #25968#37327
        DataBinding.FieldName = 'Qty'
        PropertiesClassName = 'TcxTextEditProperties'
        OnCustomDrawCell = v2Column6CustomDrawCell
        HeaderAlignmentHorz = taCenter
        Width = 85
      end
      object v1Column3: TcxGridDBColumn
        Tag = 2
        Caption = #25968#37327#21333#20301
        DataBinding.FieldName = 'QtyUnit'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 66
      end
      object v1Column11: TcxGridDBColumn
        Tag = 2
        Caption = #20986#21040#21152#24037#21378
        DataBinding.FieldName = 'ToFactoryName'
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Default = True
            Kind = bkEllipsis
          end>
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 85
      end
      object v1filler: TcxGridDBColumn
        Caption = #25805#20316#20154
        DataBinding.FieldName = 'filler'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 70
      end
      object v1Column12: TcxGridDBColumn
        Tag = 2
        Caption = #22791#27880
        DataBinding.FieldName = 'Note'
        Width = 79
      end
      object v1BCSPName: TcxGridDBColumn
        Caption = #26412#21378#21697#21517
        DataBinding.FieldName = 'BCSPName'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 70
      end
      object Tv1Column1: TcxGridDBColumn
        Caption = #21333#21253
        DataBinding.FieldName = 'danbao'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 100
      end
    end
    object cxGrid2Level1: TcxGridLevel
      GridView = Tv1
    end
  end
  object cxTabControl1: TcxTabControl
    Left = 0
    Top = 94
    Width = 1340
    Height = 22
    Align = alTop
    TabOrder = 3
    Visible = False
    Properties.CustomButtons.Buttons = <>
    Properties.Style = 8
    Properties.TabIndex = 0
    Properties.Tabs.Strings = (
      #27491#24120#25968#25454
      #24050#20316#24223#25968#25454)
    OnChange = cxTabControl1Change
    ClientRectBottom = 23
    ClientRectRight = 1340
    ClientRectTop = 23
  end
  object ADOQueryCmd: TADOQuery
    Connection = DataLink_Yarn.ADOLink
    Parameters = <>
    Left = 984
    Top = 152
  end
  object ADOQueryMain: TADOQuery
    Connection = DataLink_Yarn.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 1048
    Top = 168
  end
  object ADOQueryTemp: TADOQuery
    Connection = DataLink_Yarn.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 1016
    Top = 160
  end
  object DataSource1: TDataSource
    DataSet = CDS_Main
    Left = 920
    Top = 152
  end
  object cxGridPopupMenu1: TcxGridPopupMenu
    Grid = cxGrid2
    PopupMenus = <>
    Left = 888
    Top = 152
  end
  object CDS_Main: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 952
    Top = 152
  end
  object RM1: TRMGridReport
    ThreadPrepareReport = True
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
    DefaultCollate = False
    SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
    PreviewOptions.RulerUnit = rmutScreenPixels
    PreviewOptions.RulerVisible = False
    PreviewOptions.DrawBorder = False
    PreviewOptions.BorderPen.Color = clGray
    PreviewOptions.BorderPen.Style = psDash
    Dataset = RMDBMain
    CompressLevel = rmzcFastest
    CompressThread = False
    LaterBuildEvents = True
    OnlyOwnerDataSet = False
    Left = 360
    Top = 232
    ReportData = {}
  end
  object RMDBMain: TRMDBDataSet
    Visible = True
    DataSet = CDS_Main
    Left = 424
    Top = 232
  end
  object RMXLSExport1: TRMXLSExport
    ShowAfterExport = True
    ExportPrecision = 1
    PagesOfSheet = 100
    ExportImages = True
    ExportFrames = True
    ExportImageFormat = ifBMP
    JPEGQuality = 0
    ScaleX = 1.000000000000000000
    ScaleY = 1.000000000000000000
    CompressFile = False
    Left = 392
    Top = 232
  end
  object RMDBHZ: TRMDBDataSet
    Visible = True
    DataSet = CDS_HZ
    Left = 296
    Top = 232
  end
  object CDS_HZ: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 488
    Top = 232
  end
  object CDS_PRT: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 456
    Top = 232
  end
  object PopupMenu1: TPopupMenu
    Left = 328
    Top = 232
    object N1: TMenuItem
      Caption = #20840#36873
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #20840#24323
      OnClick = N2Click
    end
  end
  object cxStyleRepository1: TcxStyleRepository
    PixelsPerInch = 96
    object cxStyle1: TcxStyle
      AssignedValues = [svFont]
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
    end
  end
end