object frmYSCRPB: TfrmYSCRPB Left = 191 Top = 127 Width = 1411 Height = 659 Caption = #22383#24067#24212#25910#27454#31649#29702 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1395 Height = 31 ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_YSYF1.ThreeImgList Flat = True Images = DataLink_YSYF1.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 0 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 9 OnClick = TBRafreshClick end object ToolButton2: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 59 OnClick = ToolButton2Click end object TZDSC: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #33258#21160#29983#25104 ImageIndex = 54 OnClick = TZDSCClick end object ToolButton3: TToolButton Left = 213 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = ToolButton3Click end object TBDel: TToolButton Left = 276 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 17 OnClick = TBDelClick end object Tchk: TToolButton Left = 339 Top = 0 AutoSize = True Caption = #25552#20132 ImageIndex = 41 OnClick = TchkClick end object Tnochk: TToolButton Left = 402 Top = 0 AutoSize = True Caption = #25764#38144#25552#20132 Enabled = False ImageIndex = 56 OnClick = TnochkClick end object TKP: TToolButton Left = 489 Top = 0 AutoSize = True Caption = #24320#31080#23436#25104 ImageIndex = 41 OnClick = TKPClick end object TCXKP: TToolButton Left = 576 Top = 0 AutoSize = True Caption = #25764#38144#24320#31080 ImageIndex = 54 OnClick = TCXKPClick end object ToolButton1: TToolButton Left = 663 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 53 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 726 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 31 Width = 1395 Height = 77 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 216 Top = 37 Width = 60 Height = 12 Caption = #39033#30446#21450#25688#35201 end object Label3: TLabel Left = 228 Top = 13 Width = 48 Height = 12 Caption = #23545#26041#21333#20301 end object Label2: TLabel Left = 35 Top = 13 Width = 48 Height = 12 Caption = #26597#35810#26085#26399 end object Label6: TLabel Left = 69 Top = 37 Width = 12 Height = 12 Caption = #33267 end object Label4: TLabel Left = 380 Top = 13 Width = 24 Height = 12 Caption = #21697#21517 end object Label5: TLabel Left = 380 Top = 37 Width = 24 Height = 12 Caption = #35268#26684 end object Label7: TLabel Left = 779 Top = 77 Width = 24 Height = 12 Caption = #21333#20215 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label8: TLabel Left = 508 Top = 13 Width = 48 Height = 12 Caption = #25351#31034#21333#21495 end object Label9: TLabel Left = 508 Top = 37 Width = 48 Height = 12 Caption = #39068' '#33394 end object Label10: TLabel Left = 216 Top = 59 Width = 98 Height = 13 Caption = #23454#38469#32467#31639#24635#25968#37327 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 404 Top = 59 Width = 28 Height = 13 Caption = #37329#39069 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 316 Top = 59 Width = 8 Height = 13 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 434 Top = 59 Width = 8 Height = 13 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 664 Top = 37 Width = 48 Height = 12 Caption = #21512' '#21516' '#21495 end object Label15: TLabel Left = 664 Top = 13 Width = 48 Height = 12 Caption = #23457#26680#29366#24577 end object Label16: TLabel Left = 821 Top = 37 Width = 48 Height = 12 Caption = #24320#31080#29366#24577 end object Label17: TLabel Left = 821 Top = 13 Width = 48 Height = 12 Caption = #24320#31080#31867#22411 end object Label18: TLabel Left = 508 Top = 59 Width = 28 Height = 13 Caption = #21305#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label19: TLabel Left = 538 Top = 59 Width = 8 Height = 13 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label23: TLabel Left = 981 Top = 13 Width = 24 Height = 12 Caption = #22791#27880 end object YFName: TEdit Tag = 2 Left = 276 Top = 33 Width = 89 Height = 21 TabOrder = 0 OnChange = FactoryNameChange end object FactoryName: TEdit Tag = 2 Left = 276 Top = 9 Width = 89 Height = 21 TabOrder = 1 OnChange = FactoryNameChange end object begdate: TDateTimePicker Left = 85 Top = 9 Width = 97 Height = 20 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 2 end object Enddate: TDateTimePicker Left = 85 Top = 33 Width = 97 Height = 20 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 3 end object P_CodeName: TEdit Tag = 2 Left = 406 Top = 9 Width = 89 Height = 21 TabOrder = 4 OnChange = FactoryNameChange end object P_Spec: TEdit Tag = 2 Left = 406 Top = 33 Width = 89 Height = 21 TabOrder = 5 OnChange = FactoryNameChange end object Edit1: TEdit Left = 807 Top = 73 Width = 65 Height = 21 TabOrder = 6 Visible = False end object Button1: TButton Left = 875 Top = 73 Width = 44 Height = 21 Caption = #30830#23450 TabOrder = 7 Visible = False OnClick = Button1Click end object CheckBox1: TCheckBox Left = 37 Top = 56 Width = 97 Height = 17 Caption = #20840#36873 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 8 OnClick = CheckBox1Click end object OrderNo: TEdit Tag = 2 Left = 558 Top = 9 Width = 89 Height = 21 TabOrder = 9 OnChange = FactoryNameChange end object PRTColor: TEdit Tag = 2 Left = 558 Top = 33 Width = 89 Height = 21 TabOrder = 10 OnChange = FactoryNameChange end object ConNo: TEdit Tag = 2 Left = 714 Top = 33 Width = 89 Height = 21 TabOrder = 11 OnChange = FactoryNameChange end object chkstatus: TEdit Tag = 2 Left = 714 Top = 9 Width = 89 Height = 21 TabOrder = 12 OnChange = FactoryNameChange end object KPType: TComboBox Tag = 2 Left = 873 Top = 9 Width = 94 Height = 20 Style = csDropDownList ItemHeight = 12 TabOrder = 13 OnChange = FactoryNameChange Items.Strings = ( #19981#24320 #38656#24320 '') end object KPStatusH: TComboBox Tag = 2 Left = 873 Top = 33 Width = 94 Height = 20 Style = csDropDownList ItemHeight = 12 TabOrder = 14 OnChange = FactoryNameChange Items.Strings = ( #26410#24320#31080 #24320#31080#23436#25104 '') end object Note: TEdit Tag = 2 Left = 1005 Top = 9 Width = 89 Height = 21 TabOrder = 15 OnChange = FactoryNameChange end end object cxGrid2: TcxGrid Left = 0 Top = 130 Width = 1395 Height = 491 Align = alClient TabOrder = 2 object Tv2: TcxGridDBTableView PopupMenu = PopupMenu1 NavigatorButtons.ConfirmDelete = False NavigatorButtons.Delete.Enabled = False NavigatorButtons.Delete.Visible = False DataController.DataSource = DS_HZ DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter Column = v2MaoQty end item Kind = skSum Position = spFooter Column = v2JZQty end item Kind = skSum Position = spFooter Column = v2MQty end item Kind = skSum Column = v2MaoQty end item Kind = skSum Column = v2JZQty end item Kind = skSum Column = v2MQty end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = cxGridDBColumn5 end item Kind = skSum end item Kind = skSum Column = VYB end item Kind = skSum Column = v2KP end item Kind = skSum Column = v2PS end item Kind = skSum Column = v2MaoQty end item Kind = skSum Column = v2JZQty end item Kind = skSum Column = v2MQty end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.OnGetContentStyle = Tv2StylesGetContentStyle Styles.Header = DataLink_YSYF1.FonePurple object v2Column5: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'ssel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Properties.OnChange = v2Column5PropertiesChange HeaderAlignmentHorz = taCenter Width = 50 end object v2YFTypeID: TcxGridDBColumn Caption = #20986#24211#21333#21495 DataBinding.FieldName = 'YFTypeID' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Width = 70 end object cxGridDBColumn1: TcxGridDBColumn Caption = #26085#26399 DataBinding.FieldName = 'CRTime' PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False Properties.OnEditValueChanged = cxGridDBColumn1PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Header = DataLink_YSYF1.Default Width = 70 end object v2Column6: TcxGridDBColumn Caption = #23545#26041#21333#20301 DataBinding.FieldName = 'FactoryName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v2Column6PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Width = 70 end object cxGridDBColumn3: TcxGridDBColumn Caption = #39033#30446#21450#25688#35201 DataBinding.FieldName = 'YFName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = cxGridDBColumn3PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_YSYF1.Default Width = 71 end object v2PS: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'PS' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2PSPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 70 end object v2MaoQty: TcxGridDBColumn Caption = #27611#37325 DataBinding.FieldName = 'MaoQty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2PSPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 70 end object v2JZQty: TcxGridDBColumn Caption = #20928#37325 DataBinding.FieldName = 'JZQty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2PSPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 70 end object v2MQty: TcxGridDBColumn Caption = #31859#25968 DataBinding.FieldName = 'MQty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2PSPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 70 end object cxGridDBColumn5: TcxGridDBColumn Caption = #23454#38469#32467#31639#25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Header = DataLink_YSYF1.Default Width = 84 end object cxGridDBColumn6: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = cxGridDBColumn6PropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Header = DataLink_YSYF1.Default Width = 70 end object v2Column1: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 70 end object VYB: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'Money' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v2KP: TcxGridDBColumn Caption = #24320#31080#37329#39069 DataBinding.FieldName = 'KPMoney' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2KPMoneyPropertiesEditValueChanged Visible = False HeaderAlignmentHorz = taCenter Width = 70 end object v2SCOrderNO: TcxGridDBColumn Caption = #22383#24067#21333#21495 DataBinding.FieldName = 'SCOrderNO' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v2ConNo: TcxGridDBColumn Caption = #21512#21516#21495 DataBinding.FieldName = 'ConNo' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2ConNoPropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object VOrderNo: TcxGridDBColumn Caption = #25351#31034#21333#21495 DataBinding.FieldName = 'OrderNo' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v2Column7PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object v2P_CodeName: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'P_CodeName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column3PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object v2Column4: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'P_Spec' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column4PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object v2ComTaitou: TcxGridDBColumn Caption = #20844#21496#25260#22836 DataBinding.FieldName = 'ComTaitou' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2ComTaitouPropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object v2PBNote: TcxGridDBColumn Caption = #22383#24067#20986#24211#22791#27880 DataBinding.FieldName = 'PBNote' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Width = 84 end object v2chkstatus: TcxGridDBColumn Caption = #29366#24577 DataBinding.FieldName = 'chkstatus' Visible = False HeaderAlignmentHorz = taCenter Options.Focusing = False Width = 70 end object v2KPType: TcxGridDBColumn Caption = #24320#31080#31867#22411 DataBinding.FieldName = 'KPType' PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( #19981#24320 #38656#24320) Properties.OnEditValueChanged = v2KPTypePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v2KPStatusH: TcxGridDBColumn Caption = #24320#31080#29366#24577 DataBinding.FieldName = 'KPStatusH' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = cxStyle1 Width = 70 end object v2Column2: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 70 end object v2chknote: TcxGridDBColumn Caption = #23457#26680#22791#27880 DataBinding.FieldName = 'chknote' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Width = 70 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object cxTabControl1: TcxTabControl Left = 0 Top = 108 Width = 1395 Height = 22 Align = alTop Style = 9 TabIndex = 0 TabOrder = 3 Tabs.Strings = ( #26410#25552#20132 #24050#25552#20132 #24050#23457#26680 #20840#37096) OnChange = cxTabControl1Change ClientRectBottom = 22 ClientRectRight = 1395 ClientRectTop = 19 end object ADOQueryTemp: TADOQuery Connection = DataLink_YSYF1.ADOLink LockType = ltReadOnly Parameters = <> Left = 789 Top = 9 end object ADOQueryCmd: TADOQuery Connection = DataLink_YSYF1.ADOLink Parameters = <> Left = 829 Top = 1 end object ADOQueryMain: TADOQuery Connection = DataLink_YSYF1.ADOLink LockType = ltReadOnly Parameters = <> Left = 309 Top = 193 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 = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 448 Top = 208 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True Left = 376 Top = 208 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 412 Top = 216 end object DS_HZ: TDataSource DataSet = CDS_HZ Left = 443 Top = 243 end object CDS_HZ: TClientDataSet Aggregates = <> Params = <> Left = 476 Top = 192 end object PopupMenu1: TPopupMenu Left = 328 Top = 240 object N1: TMenuItem Caption = #20840#36873 OnClick = N1Click end object N2: TMenuItem Caption = #20840#24323 OnClick = N2Click end end object cxStyleRepository1: TcxStyleRepository object cxStyle1: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] TextColor = clRed end end end