object frmCPDBao: TfrmCPDBao Left = -28 Top = 41 Width = 1266 Height = 690 Caption = #25171#21253#31383#21475 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False WindowState = wsMaximized OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 120 TextHeight = 15 object Panel1: TPanel Left = 0 Top = 0 Width = 1248 Height = 54 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 0 object Label16: TLabel Left = 525 Top = 110 Width = 60 Height = 15 Caption = #36135#36816#31867#22411 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label15: TLabel Left = 50 Top = 105 Width = 60 Height = 15 Caption = #37197#36135#20154#21592 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label14: TLabel Left = 293 Top = 100 Width = 30 Height = 15 Caption = #21253#21495 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label1: TLabel Left = 40 Top = 13 Width = 124 Height = 30 Caption = #26465#30721#32534#21495 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 1460 Top = 106 Width = 62 Height = 30 Caption = #24211#20301 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label4: TLabel Left = 539 Top = 121 Width = 93 Height = 30 Caption = #21253#26465#30721 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label2: TLabel Left = 420 Top = 11 Width = 62 Height = 30 Caption = #20221#25968 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object PHYG: TBtnEditA Left = 115 Top = 105 Width = 125 Height = 23 ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 1 Visible = False end object defstr2: TComboBox Left = 590 Top = 105 Width = 126 Height = 23 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Pitch = fpFixed Font.Style = [] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ItemHeight = 15 ItemIndex = 0 ParentFont = False TabOrder = 2 Visible = False Items.Strings = ( '' #24555#20214 #24930#20214) end object SmNO: TEdit Left = 164 Top = 8 Width = 231 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnKeyPress = SmNOKeyPress end object kcKw: TBtnEditA Left = 1535 Top = 101 Width = 111 Height = 34 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ParentFont = False TabOrder = 3 Text = '//' Visible = False OnBtnClick = kcKwBtnClick end object BaoID: TEdit Left = 636 Top = 119 Width = 212 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ParentFont = False TabOrder = 4 Visible = False end object FileName: TcxButton Left = 730 Top = 8 Width = 96 Height = 40 Hint = 'Filesother' Caption = #25171#21360#21253#26631#31614 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 OnClick = FileNameClick LookAndFeel.Kind = lfOffice11 end object cxButton1: TcxButton Left = 976 Top = 8 Width = 97 Height = 40 Hint = 'Filesother' Caption = #20851#38381 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnClick = cxButton1Click LookAndFeel.Kind = lfOffice11 end object cxButton2: TcxButton Left = 880 Top = 100 Width = 96 Height = 41 Hint = 'Filesother' Caption = #20445#23384 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 7 LookAndFeel.Kind = lfOffice11 end object check_Fbz: TCheckBox Left = 1080 Top = 100 Width = 131 Height = 21 Caption = #21253#21103#26631#31614 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -25 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 8 end object Fbq: TBtnEditA Left = 1200 Top = 100 Width = 151 Height = 23 TabOrder = 9 end object ComboBox2: TComboBox Left = 1346 Top = 100 Width = 62 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ItemHeight = 15 ItemIndex = 0 ParentFont = False TabOrder = 10 Text = '1' Items.Strings = ( '1' '2' '3' '4') end object BaoBq: TBtnEditA Left = 1424 Top = 101 Width = 176 Height = 23 TabOrder = 11 Visible = False OnBtnClick = BaoBqBtnClick end object DBCS: TEdit Left = 959 Top = 101 Width = 212 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 12 Visible = False end object edtFenShu: TEdit Left = 484 Top = 5 Width = 47 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 13 Text = '1' end object cxButton3: TcxButton Left = 840 Top = 6 Width = 96 Height = 40 Hint = 'Filesother' Caption = #37325#25171#21253#26631#31614 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 14 OnClick = cxButton3Click LookAndFeel.Kind = lfOffice11 end end object Panel2: TPanel Left = 0 Top = 54 Width = 1248 Height = 589 Align = alClient Caption = 'Panel2' TabOrder = 1 object cxGrid2: TcxGrid Left = 733 Top = 1 Width = 514 Height = 587 Align = alClient Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object TV2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellDblClick = TV2CellDblClick DataController.DataSource = DSSEL DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = cxGridDBColumn5 end item Kind = skSum Column = cxGridDBJYLen end item Kind = skSum end item Kind = skSum Column = V2CJYKG end item Kind = skSum Column = V2ColJYJZ end item Kind = skSum end item Kind = skSum end item Kind = skCount end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Editing = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Header = DataLink_DyeingFinishingPlan.Default object cxGridDBMLCodeName: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'MLCodeName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 87 end object cxGridDBJYColor: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'JYColor' HeaderAlignmentHorz = taCenter Width = 79 end object VJYColHX: TcxGridDBColumn Caption = #33457#22411 DataBinding.FieldName = 'JYColHX' HeaderAlignmentHorz = taCenter Width = 60 end object V2SOMLColorNo: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'MLColorNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object V2CGangNo: TcxGridDBColumn Caption = #32568#21495 DataBinding.FieldName = 'GangNo' HeaderAlignmentHorz = taCenter Width = 46 end object V2BaoNo: TcxGridDBColumn Caption = #21253#21495 DataBinding.FieldName = 'BaoNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 46 end object cxGridDBColumn5: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'PS' HeaderAlignmentHorz = taCenter Width = 46 end object cxGridDBJYLen: TcxGridDBColumn Caption = #21367#38271#24230 DataBinding.FieldName = 'JYLen' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object V2CJYKG: TcxGridDBColumn Caption = #27611#37325 DataBinding.FieldName = 'JYKG' HeaderAlignmentHorz = taCenter Width = 46 end object V2ColJYJZ: TcxGridDBColumn Caption = #20928#37325 DataBinding.FieldName = 'JYJZ' HeaderAlignmentHorz = taCenter Width = 46 end end object cxGridLevel1: TcxGridLevel GridView = TV2 end end object cxGrid1: TcxGrid Left = 1 Top = 1 Width = 732 Height = 587 Align = alLeft Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellDblClick = TV1CellDblClick DataController.DataSource = DataSource2 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = 'C_Code' end item Kind = skCount Position = spFooter end item Kind = skCount end item Kind = skSum Position = spFooter Column = cxJYLen end item Kind = skSum Column = cxJYLen end item Kind = skSum Position = spFooter end item Kind = skSum end> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum Column = cxJYLen end item Kind = skSum end item Kind = skSum Column = cxJYKG end item Kind = skSum Column = cJYJZ end item Kind = skSum end item Kind = skSum end item Kind = skCount end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Editing = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Header = DataLink_DyeingFinishingPlan.Default object cxJYID: TcxGridDBColumn Caption = #21367#26465#30721 DataBinding.FieldName = 'JYID' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 88 end object cxJYNo: TcxGridDBColumn Caption = #21367#21495 DataBinding.FieldName = 'JYNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 46 end object cxMLCodeName: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'MLCodeName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 87 end object cJYColor: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'JYColor' HeaderAlignmentHorz = taCenter Width = 80 end object cxJYColHX: TcxGridDBColumn Caption = #33457#22411 DataBinding.FieldName = 'JYColHX' HeaderAlignmentHorz = taCenter Width = 60 end object cxGridDBMLColorNo: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'MLColorNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 46 end object cxGangNo: TcxGridDBColumn Caption = #32568#21495 DataBinding.FieldName = 'GangNo' HeaderAlignmentHorz = taCenter Width = 46 end object cxJYLen: TcxGridDBColumn Caption = #21367#38271#24230 DataBinding.FieldName = 'JYLen' HeaderAlignmentHorz = taCenter Width = 66 end object cxJYKG: TcxGridDBColumn Caption = #27611#37325 DataBinding.FieldName = 'JYKG' HeaderAlignmentHorz = taCenter Width = 46 end object cJYJZ: TcxGridDBColumn Caption = #20928#37325 DataBinding.FieldName = 'JYJZ' HeaderAlignmentHorz = taCenter Width = 46 end end object cxGridLevel2: TcxGridLevel GridView = TV1 end end end object ADOQueryMain: TADOQuery Connection = DataLink_DyeingFinishingPlan.ADOLink Parameters = <> Left = 618 Top = 230 end object ADOQueryCmd: TADOQuery Connection = DataLink_DyeingFinishingPlan.ADOLink Parameters = <> Left = 585 Top = 229 end object CDSMJID: TClientDataSet Aggregates = <> Params = <> Left = 687 Top = 232 end object DataSource2: TDataSource DataSet = CDSMJID Left = 671 Top = 262 end object ADOQueryTmp: TADOQuery Connection = DataLink_DyeingFinishingPlan.ADOLink Parameters = <> Left = 626 Top = 261 end object cxStyleRepository1: TcxStyleRepository Left = 297 Top = 326 PixelsPerInch = 120 object cxStyle1: TcxStyle AssignedValues = [svColor, svFont] Color = clInactiveCaption Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle2: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = 4707838 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clBtnText end object cxStyle_gridRow: TcxStyle AssignedValues = [svColor, svFont] Color = 16311512 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_gridFoot: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_gridHead: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_gridGroupBox: TcxStyle AssignedValues = [svColor, svFont] Color = clMoneyGreen Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_yellow: TcxStyle AssignedValues = [svColor, svFont] Color = 8454143 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_Red: TcxStyle AssignedValues = [svColor, svFont] Color = clRed Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_fontBlack: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_fontclFuchsia: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clFuchsia end object cxStyle_fontclPurple: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clPurple end object cxStyle_fontclGreen: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clGreen end object cxStyle_fontclBlue: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clBlue end object cxStyle_fontclTeal: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clTeal end object cxStyle_fontclOlive: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clOlive end end object ADOQuery1: TADOQuery Connection = DataLink_DyeingFinishingPlan.ADOLink Parameters = <> Left = 254 Top = 356 end object DataSource1: TDataSource DataSet = ADOQuery1 Left = 298 Top = 358 end object ADOQueryTm: TADOQuery Connection = DataLink_DyeingFinishingPlan.ADOLink Parameters = <> Left = 307 Top = 250 end object DSTm: TDataSource DataSet = CDSTM Left = 213 Top = 356 end object RMDB_Main: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 584 Top = 260 end object RM2: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator] 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 = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 304 Top = 285 ReportData = {} end object ADOQueryPrint: TADOQuery Connection = DataLink_DyeingFinishingPlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 652 Top = 232 end object CDSTM: TClientDataSet Aggregates = <> Params = <> Left = 252 Top = 316 end object CDSSEL: TClientDataSet Aggregates = <> Params = <> Left = 957 Top = 497 end object DSSEL: TDataSource DataSet = CDSSEL Left = 849 Top = 501 end end