object frmWorkDeptFeeList: TfrmWorkDeptFeeList Left = 220 Top = 109 Width = 1158 Height = 571 Caption = #36153#29992#25253#38144#21333 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 = 1142 AutoSize = True ButtonHeight = 30 ButtonWidth = 95 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_YSYF.ThreeImgList List = True ParentColor = False ParentFont = 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 TBAdd: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 103 OnClick = TBAddClick end object ToolButton4: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #22797#21046 ImageIndex = 58 OnClick = ToolButton4Click end object TBEdit: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 54 OnClick = TBEditClick end object ToolButton5: TToolButton Left = 315 Top = 0 AutoSize = True Caption = #25552#20132 ImageIndex = 41 OnClick = ToolButton5Click end object TBDel: TToolButton Left = 378 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 17 OnClick = TBDelClick end object ToolButton1: TToolButton Left = 441 Top = 0 AutoSize = True Caption = #26597#30475 ImageIndex = 57 OnClick = ToolButton1Click end object TBExport: TToolButton Left = 504 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 53 OnClick = TBExportClick end object ToolButton3: TToolButton Left = 567 Top = 0 AutoSize = True Caption = #30003#35831#21333#39044#35272 ImageIndex = 58 OnClick = ToolButton3Click end object ComboBox1: TComboBox Left = 666 Top = 1 Width = 150 Height = 27 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ItemHeight = 19 ItemIndex = 0 ParentFont = False TabOrder = 0 Text = #25253#38144#21333 Items.Strings = ( #25253#38144#21333 #25253#38144#21333'(A4'#32440')' '') end object TBPrint: TToolButton Left = 816 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 96 OnClick = TBPrintClick end object TBClose: TToolButton Left = 879 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object cxTabControl1: TcxTabControl Left = 0 Top = 95 Width = 1142 Height = 23 Align = alTop Style = 9 TabIndex = 0 TabOrder = 1 Tabs.Strings = ( #26410#25552#20132 #24050#25552#20132'/'#24453#23457#26680 #23457#26680#36890#36807 #23457#26680#19981#36890#36807 #20840#37096) OnChange = cxTabControl1Change ClientRectBottom = 23 ClientRectRight = 1142 ClientRectTop = 19 end object cxGrid1: TcxGrid Left = 0 Top = 118 Width = 1142 Height = 212 Align = alClient TabOrder = 2 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False OnFocusedRecordChanged = Tv1FocusedRecordChanged DataController.DataSource = DataSource1 DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter Column = v1Column2 end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1Column8 end item Kind = skSum Column = v1Column10 end item Kind = skSum Column = v1Column20 end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsSelection.CellSelect = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.GroupFooters = gfAlwaysVisible Styles.Header = DataLink_YSYF.Default object v1Column5: TcxGridDBColumn Caption = #25253#38144#21333#21495 DataBinding.FieldName = 'BXNO' HeaderAlignmentHorz = taCenter Width = 100 end object v1Column14: TcxGridDBColumn Caption = #21512#21516#21495 DataBinding.FieldName = 'ConNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 106 end object v1Column7: TcxGridDBColumn Caption = #26085#26399 DataBinding.FieldName = 'WFDate' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 101 end object v1Column17: TcxGridDBColumn Caption = #25253#38144#20154 DataBinding.FieldName = 'Worker' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object v1Column12: TcxGridDBColumn Caption = #37096#38376#20998#31867 DataBinding.FieldName = 'Dept' HeaderAlignmentHorz = taCenter Width = 90 end object v1Column1: TcxGridDBColumn Caption = #22823#31867 DataBinding.FieldName = 'WFType' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Options.Editing = False Width = 75 end object v1Column13: TcxGridDBColumn Caption = #23567#31867 DataBinding.FieldName = 'WFTypeSub' HeaderAlignmentHorz = taCenter Width = 83 end object v1Column16: TcxGridDBColumn Caption = #24065#31181 DataBinding.FieldName = 'BZType' HeaderAlignmentHorz = taCenter Width = 65 end object v1Column2: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'HZYBMoney' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter HeaderAlignmentVert = vaCenter HeaderGlyphAlignmentHorz = taCenter Width = 103 end object v1Column20: TcxGridDBColumn Caption = #20154#27665#24065#37329#39069 DataBinding.FieldName = 'HZMoney' Width = 75 end object v1Column8: TcxGridDBColumn Caption = #24050#25253#38144#37329#39069 DataBinding.FieldName = 'BXMoneyHZ' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_YSYF.FontBlue Styles.Footer = DataLink_YSYF.FontBlue Styles.Header = DataLink_YSYF.FontBlue Width = 92 end object v1Column10: TcxGridDBColumn Caption = #24453#25253#38144#37329#39069 DataBinding.FieldName = 'DBXMoneyHZ' FooterAlignmentHorz = taCenter HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_YSYF.FoneRed Styles.Footer = DataLink_YSYF.FoneRed Styles.Header = DataLink_YSYF.FoneRed Width = 80 end object v1Column11: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 94 end object v1Column18: TcxGridDBColumn Caption = #30331#35760#20154 DataBinding.FieldName = 'Filler' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 69 end object v1Column19: TcxGridDBColumn Caption = #30331#35760#26102#38388 DataBinding.FieldName = 'FillTIme' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 71 end object v1Column3: TcxGridDBColumn Caption = #23457#26680#29366#24577 DataBinding.FieldName = 'ChkStatus' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 75 end object v1Column15: TcxGridDBColumn Caption = #23457#26680#22791#27880 DataBinding.FieldName = 'ChkNote' HeaderAlignmentHorz = taCenter Width = 75 end object v1Column4: TcxGridDBColumn Caption = #23457#26680#20154 DataBinding.FieldName = 'Chker' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 69 end object v1Column6: TcxGridDBColumn Caption = #23457#26680#26102#38388 DataBinding.FieldName = 'ChkTime' PropertiesClassName = 'TcxDateEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 73 end object v1Column21: TcxGridDBColumn Caption = #20379#24212#21830 DataBinding.FieldName = 'FactoryName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 88 end object v1Column22: TcxGridDBColumn Caption = #25171#21360#29366#24577 DataBinding.FieldName = 'PrintStatus' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 60 end object v1Column23: TcxGridDBColumn Caption = #21457#31080#21495 DataBinding.FieldName = 'FPNo' HeaderAlignmentHorz = taCenter Width = 66 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object Panel1: TPanel Left = 0 Top = 32 Width = 1142 Height = 63 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 3 object Label1: TLabel Left = 23 Top = 13 Width = 52 Height = 12 Caption = #26597#35810#26085#26399 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 161 Top = 13 Width = 18 Height = 12 Caption = '---' end object Label6: TLabel Left = 418 Top = 13 Width = 39 Height = 12 Caption = #25253#38144#20154 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 550 Top = 13 Width = 26 Height = 12 Caption = #22823#31867 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 272 Top = 13 Width = 52 Height = 12 Caption = #25253#38144#21333#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 550 Top = 38 Width = 26 Height = 12 Caption = #23567#31867 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 274 Top = 38 Width = 52 Height = 12 Caption = #37096#38376#20998#31867 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 417 Top = 38 Width = 39 Height = 12 Caption = #21512#21516#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 1007 Top = 13 Width = 52 Height = 12 Caption = #25171#21360#29366#24577 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 670 Top = 14 Width = 39 Height = 12 Caption = #21457#31080#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 670 Top = 39 Width = 39 Height = 12 Caption = #20379#24212#21830 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 801 Top = 13 Width = 39 Height = 12 Caption = #35746#21333#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object BegDate: TDateTimePicker Left = 76 Top = 9 Width = 85 Height = 20 Date = 40675.464742650460000000 Format = 'yyyy-MM-dd' Time = 40675.464742650460000000 TabOrder = 0 end object EndDate: TDateTimePicker Left = 179 Top = 9 Width = 86 Height = 20 Date = 40675.464761099540000000 Format = 'yyyy-MM-dd' Time = 40675.464761099540000000 TabOrder = 1 end object Worker: TEdit Tag = 2 Left = 459 Top = 9 Width = 83 Height = 20 TabOrder = 2 OnChange = WorkerChange end object WFType: TEdit Tag = 2 Left = 578 Top = 9 Width = 84 Height = 20 TabOrder = 3 OnChange = WorkerChange end object BXNO: TEdit Tag = 2 Left = 326 Top = 9 Width = 83 Height = 20 TabOrder = 4 OnChange = WorkerChange OnKeyPress = BXNOKeyPress end object WFTypeSub: TEdit Tag = 2 Left = 578 Top = 34 Width = 84 Height = 20 TabOrder = 5 OnChange = WorkerChange end object Dept: TEdit Tag = 2 Left = 326 Top = 34 Width = 83 Height = 20 TabOrder = 6 OnChange = WorkerChange end object ConNo: TEdit Tag = 2 Left = 459 Top = 34 Width = 83 Height = 20 TabOrder = 7 OnChange = WorkerChange end object PrintStatus: TComboBox Tag = 2 Left = 1064 Top = 8 Width = 69 Height = 20 ItemHeight = 12 TabOrder = 8 OnChange = WorkerChange Items.Strings = ( #24050#25171#21360 #26410#25171#21360 '') end object FPNo: TEdit Tag = 2 Left = 712 Top = 10 Width = 82 Height = 20 TabOrder = 9 OnChange = WorkerChange end object FactoryName: TEdit Tag = 2 Left = 712 Top = 35 Width = 82 Height = 20 TabOrder = 10 OnChange = WorkerChange end object OrderNoM: TEdit Tag = 2 Left = 843 Top = 9 Width = 84 Height = 20 TabOrder = 11 OnChange = WorkerChange end end object cxGrid2: TcxGrid Left = 0 Top = 338 Width = 1142 Height = 195 Align = alBottom TabOrder = 4 object Tv2: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource2 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = 'C_Code' end item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1MSMoney end item Kind = skSum Column = cxGridDBColumn6 end item Kind = skSum Column = v2Column1 end item Kind = skSum Column = v2Column2 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsSelection.CellSelect = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Header = DataLink_YSYF.Default object v2Column4: TcxGridDBColumn Caption = #21457#29983#26085#26399 DataBinding.FieldName = 'HapDate' HeaderAlignmentHorz = taCenter Width = 97 end object v2Column5: TcxGridDBColumn Caption = #35746#21333#21495 DataBinding.FieldName = 'OrderNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object cxGridDBColumn2: TcxGridDBColumn Caption = #36135#29289#21517#31216 DataBinding.FieldName = 'KeMu' PropertiesClassName = 'TcxButtonEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 94 end object cxGridDBColumn3: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.CharCase = ecUpperCase HeaderAlignmentHorz = taCenter Width = 86 end object cxGridDBColumn4: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 60 end object cxGridDBColumn5: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 69 end object v2Column3: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'YBMoney' HeaderAlignmentHorz = taCenter Width = 78 end object cxGridDBColumn6: TcxGridDBColumn Caption = #24320#31080#37329#39069 DataBinding.FieldName = 'MoneyKP' HeaderAlignmentHorz = taCenter Width = 81 end object cxGridDBColumn7: TcxGridDBColumn Caption = #25910#27454#20154 DataBinding.FieldName = 'FactoryNameKP' HeaderAlignmentHorz = taCenter Width = 79 end object v1MSMoney: TcxGridDBColumn Caption = #20154#27665#24065#37329#39069 DataBinding.FieldName = 'Money' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 111 end object v2Column1: TcxGridDBColumn Caption = #24050#25253#38144#37329#39069 DataBinding.FieldName = 'BXMoney' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_YSYF.FontBlue Styles.Footer = DataLink_YSYF.FontBlue Styles.Header = DataLink_YSYF.FontBlue Width = 83 end object v2Column2: TcxGridDBColumn Caption = #24453#25253#38144#37329#39069 DataBinding.FieldName = 'DBXMoney' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_YSYF.FoneRed Styles.Footer = DataLink_YSYF.FoneRed Styles.Header = DataLink_YSYF.FoneRed Width = 84 end object v1Column9: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'SNote' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 134 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object cxSplitter1: TcxSplitter Left = 0 Top = 330 Width = 1142 Height = 8 HotZoneClassName = 'TcxMediaPlayer9Style' AlignSplitter = salBottom Control = cxGrid2 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 816 Top = 8 end object ADOQueryCmd: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 972 Top = 4 end object ADOQueryMain: TADOQuery Connection = DataLink_YSYF.ADOLink LockType = ltReadOnly Parameters = <> Left = 1008 Top = 4 end object ADOQueryTemp: TADOQuery Connection = DataLink_YSYF.ADOLink LockType = ltReadOnly Parameters = <> Left = 1040 Top = 8 end object DataSource1: TDataSource DataSet = Order_Main Left = 904 Top = 16 end object Order_Main: TClientDataSet Aggregates = <> Params = <> Left = 871 Top = 15 end object RM1: 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 = RMDBMain CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 456 Top = 182 ReportData = {} end object RMDBMain: TRMDBDataSet Visible = True DataSet = CDS_PRT Left = 397 Top = 181 end object RMXLSExport1: TRMXLSExport ShowAfterExport = True ExportPrecision = 1 PagesOfSheet = 1 ExportImages = True ExportFrames = True ExportImageFormat = ifBMP JPEGQuality = 0 ScaleX = 1.000000000000000000 ScaleY = 1.000000000000000000 CompressFile = False Left = 427 Top = 181 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 485 Top = 184 end object ClientDataSet2: TClientDataSet Aggregates = <> Params = <> Left = 645 Top = 385 end object DataSource2: TDataSource DataSet = ClientDataSet2 Left = 616 Top = 384 end object cxGridPopupMenu3: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 576 Top = 384 end object ADOQueryPrint: TADOQuery Connection = DataLink_YSYF.ADOLink LockType = ltReadOnly Parameters = <> Left = 580 Top = 196 end object CDS_PRT: TClientDataSet Aggregates = <> Params = <> Left = 612 Top = 200 end end