object frmYarnDRtInPut: TfrmYarnDRtInPut Left = 302 Top = 139 Caption = #21457#36135#30003#35831#24405#20837 ClientHeight = 644 ClientWidth = 1252 Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Tag = 1 Left = 0 Top = 0 Width = 1252 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 91 Caption = 'ToolBar1' Color = clWhite DisabledImages = DataLink_YarnStk.ImageList_new32 EdgeInner = esNone EdgeOuter = esNone Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_YarnStk.ImageList_new32 List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 16 OnClick = TBSaveClick end object ToolButton4: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton4Click end object TBClose: TToolButton Left = 166 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object ScrollBox1: TScrollBox Left = 0 Top = 38 Width = 1252 Height = 132 Align = alTop BevelInner = bvNone BevelOuter = bvNone Color = clWhite Ctl3D = False ParentColor = False ParentCtl3D = False TabOrder = 1 object Label1: TLabel Left = 38 Top = 57 Width = 60 Height = 12 Caption = #20986#24211#31867#22411#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label12: TLabel Left = 36 Top = 93 Width = 60 Height = 12 Caption = #22791' '#27880#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label11: TLabel Left = 272 Top = 57 Width = 60 Height = 12 Caption = #25910#36135#21333#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label2: TLabel Left = 273 Top = 22 Width = 60 Height = 12 Caption = #30003#35831#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label27: TLabel Left = 974 Top = 21 Width = 52 Height = 15 Caption = #25968#37327#21333#20301 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False Visible = False end object Label3: TLabel Left = 36 Top = 22 Width = 60 Height = 12 Caption = #30003#35831#21333#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label4: TLabel Left = 475 Top = 22 Width = 48 Height = 12 Caption = #30003#35831#20154#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label5: TLabel Left = 708 Top = 56 Width = 60 Height = 12 Caption = #32455#36896#21333#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object OutType: TComboBox Tag = 1 Left = 100 Top = 53 Width = 136 Height = 20 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 OnChange = OutTypeChange Items.Strings = ( #25972#32463#20986#24211 #32455#36896#20986#24211 #22806#21457#20986#24211 #36864#36135#20986#24211) end object Note: TEdit Tag = 1 Left = 100 Top = 90 Width = 801 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 2 end object ToCoName: TBtnEditC Tag = 1 Left = 335 Top = 53 Width = 333 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 OnBtnUpClick = ToCoNameBtnUpClick OnBtnDnClick = ToCoNameBtnDnClick end object DlyDate: TDateTimePicker Tag = 1 Left = 335 Top = 18 Width = 107 Height = 20 Date = 40675.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.464761099538009100 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 3 end object QtyUnit: TComboBox Tag = 2 Left = 1029 Top = 18 Width = 96 Height = 20 Style = csDropDownList TabOrder = 4 Visible = False Items.Strings = ( 'M' 'Y' 'Kg') end object DRMID: TEdit Tag = 1 Left = 100 Top = 19 Width = 135 Height = 18 Enabled = False Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 5 end object Filler: TEdit Tag = 1 Left = 533 Top = 19 Width = 135 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 6 end object OrderNo: TEdit Tag = 1 Left = 766 Top = 53 Width = 135 Height = 18 Enabled = False Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 7 end end object ToolBar2: TToolBar Tag = 1 Left = 0 Top = 170 Width = 1252 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 127 Caption = 'ToolBar1' Color = clBtnFace DisabledImages = DataLink_YarnStk.ImageList_new32 EdgeInner = esNone EdgeOuter = esNone Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_YarnStk.ImageList_new32 List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton5: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892'('#32455#36896#21333')' ImageIndex = 2 OnClick = ToolButton5Click end object ToolButton6: TToolButton Left = 119 Top = 0 AutoSize = True Caption = #22686#34892'('#24211#23384')' ImageIndex = 2 OnClick = ToolButton6Click end object ToolButton7: TToolButton Left = 226 Top = 0 AutoSize = True Caption = #22686#34892'('#25972#32463#35745#21010')' ImageIndex = 3 OnClick = ToolButton7Click end object ToolButton2: TToolButton Left = 357 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 6 OnClick = ToolButton2Click end object ToolButton3: TToolButton Left = 428 Top = 0 AutoSize = True Caption = #36873#21333 ImageIndex = 12 Visible = False OnClick = ToolButton3Click end object ToolButton1: TToolButton Left = 499 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 2 Visible = False OnClick = ToolButton1Click end end object cxGrid1: TcxGrid Left = 0 Top = 208 Width = 1252 Height = 436 Align = alClient TabOrder = 3 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False object Tv1Column1: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'Y_Code' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tv1Column2: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'Yarn_Name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tv1Column3: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'Y_Name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tv1Column4: TcxGridDBColumn Caption = #32463#32433'/'#32428#32433 DataBinding.FieldName = 'Y_Spec' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tv1Column5: TcxGridDBColumn Caption = 'D'#25968 DataBinding.FieldName = 'Denier' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tv1Column6: TcxGridDBColumn Caption = #25903#25968 DataBinding.FieldName = 'Z_Number' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tv1Column7: TcxGridDBColumn Caption = 'F'#25968 DataBinding.FieldName = 'F_Number' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tv1Column8: TcxGridDBColumn Caption = #25209#21495 DataBinding.FieldName = 'PH' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 100 end object Tv1Column9: TcxGridDBColumn Caption = #30003#35831#25968#37327 DataBinding.FieldName = 'Qty' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 100 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_YarnStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 256 Top = 281 end object ADOCmd: TADOQuery Connection = DataLink_YarnStk.ADOLink Parameters = <> Left = 328 Top = 281 end object DataSource1: TDataSource DataSet = Order_Sub Left = 684 Top = 276 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 596 Top = 284 end object ADOQuery1: TADOQuery Connection = DataLink_YarnStk.ADOLink Parameters = <> Left = 188 Top = 281 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 421 Top = 283 end object cxStyleRepository1: TcxStyleRepository Left = 200 Top = 432 PixelsPerInch = 96 object dazi1: TcxStyle AssignedValues = [svColor] Color = clRed end end end