object frmYFCR: TfrmYFCR Left = 189 Top = 137 Width = 1386 Height = 682 Caption = #24212#20184#27454#31649#29702 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 107 TextHeight = 13 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1370 Height = 31 ButtonHeight = 30 ButtonWidth = 87 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Images = DataLink_YSYF.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 = 65 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 59 OnClick = ToolButton2Click end object ToolButton4: TToolButton Left = 130 Top = 0 AutoSize = True Caption = #33258#21160#29983#25104 ImageIndex = 16 OnClick = ToolButton4Click end object ToolButton3: TToolButton Left = 221 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = ToolButton3Click end object TBDel: TToolButton Left = 286 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 17 OnClick = TBDelClick end object Tchk: TToolButton Left = 351 Top = 0 AutoSize = True Caption = #25552#20132 ImageIndex = 41 OnClick = TchkClick end object Tnochk: TToolButton Left = 416 Top = 0 AutoSize = True Caption = #25764#38144#25552#20132 Enabled = False ImageIndex = 56 OnClick = TnochkClick end object TYJTH: TToolButton Left = 507 Top = 0 AutoSize = True Caption = #19968#38190#26367#25442 ImageIndex = 54 OnClick = TYJTHClick end object ToolButton1: TToolButton Left = 598 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 53 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 663 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 31 Width = 1370 Height = 82 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 226 Top = 39 Width = 52 Height = 13 Caption = #36153#29992#21517#31216 end object Label3: TLabel Left = 226 Top = 13 Width = 52 Height = 13 Caption = #23545#26041#21333#20301 end object Label2: TLabel Left = 41 Top = 13 Width = 52 Height = 13 Caption = #26597#35810#26085#26399 end object Label6: TLabel Left = 82 Top = 39 Width = 13 Height = 13 Caption = #33267 end object Label7: TLabel Left = 810 Top = 83 Width = 26 Height = 13 Caption = #21333#20215 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label8: TLabel Left = 399 Top = 39 Width = 52 Height = 13 Caption = #20184#27454#31867#22411 end object Label9: TLabel Left = 399 Top = 13 Width = 54 Height = 13 Caption = #21697' '#21517 end object Label10: TLabel Left = 239 Top = 64 Width = 112 Height = 15 Caption = #23454#38469#32467#31639#24635#25968#37327 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 440 Top = 64 Width = 64 Height = 15 Caption = #25105#21496#37329#39069 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 352 Top = 64 Width = 9 Height = 15 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 504 Top = 64 Width = 9 Height = 15 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label18: TLabel Left = 605 Top = 64 Width = 32 Height = 15 Caption = #21305#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label19: TLabel Left = 640 Top = 64 Width = 9 Height = 15 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 579 Top = 13 Width = 52 Height = 13 Caption = #21407#26009#20840#31216 end object Label5: TLabel Left = 579 Top = 39 Width = 72 Height = 13 Caption = #36710#38431'/'#20379#24212#21830 end object FactoryName: TEdit Tag = 2 Left = 278 Top = 9 Width = 96 Height = 21 TabOrder = 0 OnChange = FactoryNameChange end object begdate: TDateTimePicker Left = 95 Top = 9 Width = 105 Height = 21 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 1 end object Enddate: TDateTimePicker Left = 95 Top = 35 Width = 105 Height = 21 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 2 end object Edit1: TEdit Left = 836 Top = 79 Width = 71 Height = 21 TabOrder = 3 Visible = False end object Button1: TButton Left = 910 Top = 79 Width = 53 Height = 23 Caption = #30830#23450 TabOrder = 4 Visible = False OnClick = Button1Click end object CheckBox1: TCheckBox Left = 43 Top = 59 Width = 105 Height = 19 Caption = #20840#36873 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 5 OnClick = CheckBox1Click end object PayMent: TEdit Tag = 2 Left = 452 Top = 35 Width = 102 Height = 21 TabOrder = 6 OnChange = FactoryNameChange end object P_CodeName: TEdit Tag = 2 Left = 452 Top = 9 Width = 101 Height = 21 TabOrder = 7 OnChange = FactoryNameChange end object YFName: TEdit Tag = 2 Left = 278 Top = 35 Width = 96 Height = 21 TabOrder = 8 OnChange = FactoryNameChange end object YLQName: TEdit Tag = 2 Left = 650 Top = 9 Width = 101 Height = 21 TabOrder = 9 OnChange = FactoryNameChange end object CheDui: TEdit Tag = 2 Left = 650 Top = 35 Width = 101 Height = 21 TabOrder = 10 OnChange = FactoryNameChange end end object cxGrid2: TcxGrid Left = 0 Top = 136 Width = 1370 Height = 506 Align = alClient PopupMenu = PopupMenu1 TabOrder = 2 object Tv2: TcxGridDBTableView 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 = v2MQty end item Kind = skSum Column = v2MQty end item Kind = skSum Column = v2BBMoney end item Kind = skSum Position = spFooter Column = v2BBMoney end> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end item Kind = skSum Column = VYB end item Kind = skSum end item Kind = skSum Column = v2Qty end item Kind = skSum end item Kind = skSum end item Kind = skSum Column = v2MQty end item Kind = skSum Column = v2BBMoney end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.OnGetContentStyle = Tv2StylesGetContentStyle Styles.Header = DataLink_YSYF.Default object v2ssel: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'ssel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.OnChange = v2sselPropertiesChange HeaderAlignmentHorz = taCenter Width = 50 end object cxGridDBColumn1: TcxGridDBColumn Caption = #26085#26399 DataBinding.FieldName = 'CRTime' PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False Properties.OnEditValueChanged = cxGridDBColumn1PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 82 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 HeaderAlignmentHorz = taCenter Options.Focusing = False Width = 85 end object v2YFName: TcxGridDBColumn Caption = #36153#29992#21517#31216 DataBinding.FieldName = 'YFName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2YFNamePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 77 end object cxGridDBColumn3: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'P_CodeName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = cxGridDBColumn3PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 85 end object v2PayMent: TcxGridDBColumn Caption = #20184#27454#31867#22411 DataBinding.FieldName = 'PayMent' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v2PayMentPropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 79 end object v2KPType: TcxGridDBColumn Caption = #24320#31080#31867#22411 DataBinding.FieldName = 'KPType' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #38656#24320 #19981#24320) Properties.OnEditValueChanged = cxGridDBColumn1PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 75 end object v2YLQName: TcxGridDBColumn Caption = #21407#26009#20840#31216 DataBinding.FieldName = 'YLQName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2YLQNamePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 88 end object v2CheDui: TcxGridDBColumn Caption = #36710#38431'/'#20379#24212#21830 DataBinding.FieldName = 'CheDui' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2CheDuiPropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 95 end object v2MQty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'MQty' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Width = 70 end object v2Qty: TcxGridDBColumn Caption = #23454#38469#32467#31639#25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Header = DataLink_YSYF.FontBlue 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_YSYF.FontBlue Width = 70 end object v2Price: TcxGridDBColumn Caption = #23454#38469#21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Header = DataLink_YSYF.FontBlue Width = 72 end object v2BBMoney: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'BBMoney' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn1PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Footer = DataLink_YSYF.FontBlue Styles.Header = DataLink_YSYF.FontBlue Width = 88 end object VYB: TcxGridDBColumn Caption = #35843#25972#37329#39069 DataBinding.FieldName = 'Money' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn1PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Footer = DataLink_YSYF.FoneRed Styles.Header = DataLink_YSYF.FoneRed Width = 75 end object VBZ: TcxGridDBColumn Caption = #24065#31181 DataBinding.FieldName = 'BZType' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column3PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 63 end object v2chknote: TcxGridDBColumn Caption = #23457#26680#22791#27880 DataBinding.FieldName = 'chknote' HeaderAlignmentHorz = taCenter Options.Focusing = False Width = 80 end object v2PBNote: TcxGridDBColumn Caption = #21407#26009#22791#27880 DataBinding.FieldName = 'PBNote' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Width = 77 end object v2Chkstatus: TcxGridDBColumn Caption = #23457#26680#29366#24577 DataBinding.FieldName = 'Chkstatus' Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v2Note: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2BatchNoPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 75 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object cxTabControl1: TcxTabControl Left = 0 Top = 113 Width = 1370 Height = 23 Align = alTop Style = 9 TabIndex = 0 TabOrder = 3 Tabs.Strings = ( #26410#25552#20132 #24050#25552#20132 #24050#23457#26680 #20840#37096) OnChange = cxTabControl1Change ClientRectBottom = 23 ClientRectRight = 1370 ClientRectTop = 20 end object ADOQueryTemp: TADOQuery Connection = DataLink_YSYF.ADOLink LockType = ltReadOnly Parameters = <> Left = 1153 Top = 96 end object ADOQueryCmd: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 1122 Top = 98 end object ADOQueryMain: TADOQuery Connection = DataLink_YSYF.ADOLink LockType = ltReadOnly Parameters = <> Left = 505 Top = 221 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 = 444 Top = 220 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True Left = 475 Top = 220 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 474 Top = 249 end object DS_HZ: TDataSource DataSet = CDS_HZ Left = 444 Top = 249 end object CDS_HZ: TClientDataSet Aggregates = <> Params = <> Left = 506 Top = 250 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 object PopupMenu1: TPopupMenu Left = 414 Top = 220 object N1: TMenuItem Caption = #20840#36873 OnClick = N1Click end object N2: TMenuItem Caption = #20840#24323 OnClick = N2Click end end end