object frmShaKCList: TfrmShaKCList Left = 190 Top = 136 Width = 1382 Height = 611 Caption = #32433#32447#24211#23384#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 OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1366 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 ToolButton1: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #30830#23450 ImageIndex = 10 Visible = False OnClick = ToolButton1Click end object ToolButton2: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 68 OnClick = ToolButton2Click end object ToolButton3: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 14 OnClick = ToolButton3Click end object TBClose: TToolButton Left = 315 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 33 Width = 1366 Height = 60 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label3: TLabel Left = 33 Top = 8 Width = 24 Height = 12 Caption = #21697#21517 end object Label4: TLabel Left = 174 Top = 2 Width = 42 Height = 24 Caption = #20379#24212#21830'/'#13#10#21152#24037#21378 end object Label8: TLabel Left = 33 Top = 32 Width = 24 Height = 12 Caption = #35268#26684 end object Label1: TLabel Left = 321 Top = 8 Width = 48 Height = 12 Caption = #23384#25918#24037#21378 end object Label2: TLabel Left = 192 Top = 32 Width = 24 Height = 12 Caption = #25209#21495 end object Label10: TLabel Left = 342 Top = 32 Width = 24 Height = 12 Caption = #22791#27880 end object Y_CodeName: TEdit Tag = 2 Left = 60 Top = 4 Width = 100 Height = 20 TabOrder = 0 OnChange = TBFindClick end object FactoryName: TEdit Tag = 2 Left = 220 Top = 4 Width = 90 Height = 20 TabOrder = 1 OnChange = FactoryNameChange end object Y_Spec: TEdit Tag = 2 Left = 60 Top = 28 Width = 100 Height = 20 TabOrder = 2 OnChange = TBFindClick end object ToFactoryName: TEdit Tag = 2 Left = 370 Top = 4 Width = 108 Height = 20 TabOrder = 3 OnChange = FactoryNameChange end object BatchNo: TEdit Tag = 2 Left = 220 Top = 28 Width = 90 Height = 20 TabOrder = 4 OnChange = FactoryNameChange end object Note: TEdit Tag = 2 Left = 371 Top = 28 Width = 108 Height = 20 TabOrder = 5 OnChange = FactoryNameChange end end object cxGrid2: TcxGrid Left = 0 Top = 93 Width = 1366 Height = 479 Align = alClient TabOrder = 2 object Tv1: TcxGridDBTableView PopupMenu = PopupMenu1 Navigator.Buttons.CustomButtons = <> OnCellDblClick = Tv1CellDblClick DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] 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 end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Inactive = DataLink_Yarn.SHuangSe Styles.IncSearch = DataLink_Yarn.SHuangSe Styles.Selection = DataLink_Yarn.SHuangSe Styles.Header = DataLink_Yarn.Default object v1Column2: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 42 end object v1Column1: TcxGridDBColumn Caption = #37319#36141#21333#21495 DataBinding.FieldName = 'ConNo' HeaderAlignmentHorz = taCenter Options.Editing = False VisibleForCustomization = False Width = 110 end object v1Column14: TcxGridDBColumn Tag = 2 Caption = #20379#24212#21830'/'#21152#24037#21378 DataBinding.FieldName = 'FactoryName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tv1Column2: TcxGridDBColumn Caption = #23384#25918#24037#21378 DataBinding.FieldName = 'ToFactoryName' HeaderAlignmentHorz = taCenter Width = 70 end object v2Column1: TcxGridDBColumn Tag = 2 Caption = #21697#21517 DataBinding.FieldName = 'Y_CodeName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 97 end object v1Column8: TcxGridDBColumn Tag = 2 Caption = #35268#26684 DataBinding.FieldName = 'Y_Spec' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Options.Editing = False Width = 65 end object v1Column10: TcxGridDBColumn Caption = #25209#21495 DataBinding.FieldName = 'BatchNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object v1Column9: TcxGridDBColumn Tag = 2 Caption = #24211#23384#31665'/'#20214#25968 DataBinding.FieldName = 'MXKCPiQty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_Yarn.FonePurple Styles.Footer = DataLink_Yarn.FonePurple Styles.Header = DataLink_Yarn.FonePurple Width = 87 end object v2Column6: TcxGridDBColumn Tag = 2 Caption = #24211#23384#25968#37327 DataBinding.FieldName = 'MXKCQty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_Yarn.FonePurple Styles.Footer = DataLink_Yarn.FonePurple Styles.Header = DataLink_Yarn.FonePurple Width = 73 end object v1Column3: TcxGridDBColumn Tag = 2 Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'Kg' 'M' 'Y') HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object v1Column12: TcxGridDBColumn Tag = 2 Caption = #22791#27880 DataBinding.FieldName = 'Note' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 79 end object v1Column4: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 113 end object Tv1Column1: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'money' HeaderAlignmentHorz = taCenter Width = 100 end object Tv1Column3: TcxGridDBColumn Caption = #24211#20301 DataBinding.FieldName = 'kuwei' HeaderAlignmentHorz = taCenter Width = 66 end end object cxGrid2Level1: TcxGridLevel GridView = Tv1 end end object MovePanel2: TMovePanel Left = 520 Top = 360 Width = 289 Height = 49 BevelInner = bvLowered Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 Visible = False end object ADOQueryCmd: TADOQuery Connection = DataLink_Yarn.ADOLink Parameters = <> Left = 792 end object ADOQueryMain: TADOQuery Connection = DataLink_Yarn.ADOLink LockType = ltReadOnly Parameters = <> Left = 824 end object ADOQueryTemp: TADOQuery Connection = DataLink_Yarn.ADOLink LockType = ltReadOnly Parameters = <> Left = 760 end object DataSource1: TDataSource DataSet = CDS_Main Left = 992 Top = 176 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 968 Top = 176 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 596 Top = 208 end object cxStyleRepository1: TcxStyleRepository PixelsPerInch = 96 object cxStyle1: TcxStyle AssignedValues = [svColor, svFont] Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] end object cxStyle3: TcxStyle AssignedValues = [svFont] Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] end object cxStyle4: TcxStyle AssignedValues = [svFont] Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] end end object cxStyleRepository2: TcxStyleRepository PixelsPerInch = 96 object cxStyle2: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = '@'#40657#20307 Font.Style = [fsBold] end 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 = RMDBPrint CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 676 Top = 292 ReportData = {} end object CDS_Print: TClientDataSet Aggregates = <> Params = <> Left = 348 Top = 332 end object RMDBPrint: TRMDBDataSet Visible = True DataSet = CDS_Print Left = 392 Top = 332 end object PopupMenu1: TPopupMenu Left = 256 Top = 176 object CheckBox1: TMenuItem Caption = #20840#36873 OnClick = CheckBox1Click end object CheckBox2: TMenuItem Caption = #20840#24323 OnClick = CheckBox2Click end object OldBuy: TMenuItem Caption = #26597#30475#36141#20837#21382#21490 OnClick = OldBuyClick end end end