object frmContractOldList: TfrmContractOldList Left = 186 Top = 57 Width = 1382 Height = 741 Caption = #38144#21806#21512#21516 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1366 AutoSize = True ButtonHeight = 30 ButtonWidth = 65 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] Images = DataLink_ContractManagement.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 TBClose: TToolButton Left = 69 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 32 Width = 1366 Height = 43 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 23 Top = 15 Width = 52 Height = 12 Caption = #21046#21333#26085#26399 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 291 Top = 15 Width = 40 Height = 12 Caption = #38656' '#26041 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 430 Top = 99 Width = 52 Height = 12 Caption = #20135#21697#21517#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 436 Top = 15 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 Label12: TLabel Left = 303 Top = 99 Width = 26 Height = 12 Caption = #20811#37325 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 303 Top = 123 Width = 26 Height = 12 Caption = #38376#24133 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 160 Top = 16 Width = 6 Height = 12 Caption = '-' end object Label3: TLabel Left = 579 Top = 15 Width = 39 Height = 12 Caption = #21046#21333#20154 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 = 11 Width = 85 Height = 20 Date = 40675.464742650460000000 Format = 'yyyy-MM-dd' Time = 40675.464742650460000000 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 TabOrder = 0 end object EndDate: TDateTimePicker Left = 168 Top = 11 Width = 86 Height = 20 Date = 40675.464761099540000000 Format = 'yyyy-MM-dd' Time = 40675.464761099540000000 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 TabOrder = 1 end object BuyName: TEdit Tag = 2 Left = 331 Top = 11 Width = 78 Height = 20 ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 2 OnChange = BuyNameChange end object MPRTCodeName: TEdit Tag = 2 Left = 483 Top = 95 Width = 76 Height = 20 ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 6 OnChange = BuyNameChange end object ConNo: TEdit Tag = 2 Left = 477 Top = 11 Width = 77 Height = 20 ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 3 OnChange = BuyNameChange end object MPRTKZ: TEdit Tag = 2 Left = 332 Top = 95 Width = 56 Height = 20 ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 5 OnChange = BuyNameChange end object MPRTMF: TEdit Tag = 2 Left = 332 Top = 119 Width = 56 Height = 20 ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 7 OnChange = BuyNameChange end object Filler: TEdit Tag = 2 Left = 620 Top = 11 Width = 77 Height = 20 ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 4 OnChange = BuyNameChange end end object cxGrid2: TcxGrid Left = 0 Top = 75 Width = 1366 Height = 628 Align = alClient TabOrder = 2 object Tv2: TcxGridDBTableView PopupMenu = PopupMenu2 NavigatorButtons.ConfirmDelete = False OnCustomDrawCell = Tv2CustomDrawCell DataController.DataSource = DS_Sub DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = '0' Position = spFooter end item Format = '0' Position = spFooter Column = v1PRTOrderQty end item Format = '0' Position = spFooter Column = v1PRTPrice end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1PRTOrderQty end item Kind = skSum Column = V2Column3 end item Kind = skSum Column = V2Column5 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Inactive = DataLink_ContractManagement.SHuangSe Styles.IncSearch = DataLink_ContractManagement.SHuangSe Styles.Selection = DataLink_ContractManagement.SHuangSe Styles.Header = DataLink_ContractManagement.Default object v2Column6: TcxGridDBColumn Caption = #21512#21516#21495 DataBinding.FieldName = 'ConNo' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 74 end object v2Column7: TcxGridDBColumn Caption = #20379#26041 DataBinding.FieldName = 'SellName' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 end object v2Column8: TcxGridDBColumn Caption = #38656#26041 DataBinding.FieldName = 'BuyName' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 end object cxGridDBColumn1: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'P_Code' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 88 end object cxGridDBColumn2: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'P_Name' Visible = False HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 94 end object V2Column4: TcxGridDBColumn Caption = #21305#38271 DataBinding.FieldName = 'PiLen' HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 50 end object V2Column5: TcxGridDBColumn Caption = #24635#21305#25968 DataBinding.FieldName = 'PiQty' HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 50 end object v1PRTOrderQty: TcxGridDBColumn Caption = #24635#25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 80 end object v1OrderUnit: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( 'Kg' 'M' 'Y') HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 77 end object v1PRTPrice: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Options.Sorting = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 50 end object V2Column3: TcxGridDBColumn Caption = #24635#37329#39069 DataBinding.FieldName = 'MxMoney' HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 80 end object v2Column1: TcxGridDBColumn Caption = #26159#21542#25490#36724 DataBinding.FieldName = 'SFPaiZ' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 81 end object v2Column22: TcxGridDBColumn Caption = #26159#21542#24320#24037#33402#21333 DataBinding.FieldName = 'SFKGyiDan' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 91 end object v2Column12: TcxGridDBColumn Caption = #24050#23433#25490#21305#25968 DataBinding.FieldName = 'YAnPaiPS' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 87 end object v2Column13: TcxGridDBColumn Caption = #26410#23433#25490#21305#25968 DataBinding.FieldName = 'WAnPaiPS' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 87 end object v2Column11: TcxGridDBColumn Caption = #24050#20837#24211#21305#25968 DataBinding.FieldName = 'YRKPS' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 87 end object v2Column20: TcxGridDBColumn Caption = #24050#20986#24211#21305#25968 DataBinding.FieldName = 'YCKPS' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 91 end object v2Column14: TcxGridDBColumn Caption = #26410#20837#24211#21305#25968 DataBinding.FieldName = 'WRKPS' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 93 end object v2Column19: TcxGridDBColumn Caption = #24211#23384#21305#25968 DataBinding.FieldName = 'KCPS' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 83 end object v2Column15: TcxGridDBColumn Caption = #24050#20837#24211#25968#37327 DataBinding.FieldName = 'YRKLen' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 85 end object v2Column17: TcxGridDBColumn Caption = #24050#20986#24211#25968#37327 DataBinding.FieldName = 'YCKLen' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 86 end object v2Column16: TcxGridDBColumn Caption = #26410#20837#24211#25968#37327 DataBinding.FieldName = 'WRKLen' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 90 end object v2Column18: TcxGridDBColumn Caption = #24211#23384#25968#37327 DataBinding.FieldName = 'KCLen' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 83 end object v2Column21: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 end object v2Column9: TcxGridDBColumn Caption = #21046#21333#26085#26399 DataBinding.FieldName = 'ConDate' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 81 end object V2Column2: TcxGridDBColumn Caption = #20135#21697#20132#36135#26085#26399 DataBinding.FieldName = 'SubDlyDate' HeaderAlignmentHorz = taCenter MinWidth = 0 Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 100 end object v2Column10: TcxGridDBColumn Caption = #35746#21333#20132#36135#26085#26399 DataBinding.FieldName = 'DlyDate' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 Width = 103 end object v2Column23: TcxGridDBColumn DataBinding.FieldName = 'status' Visible = False Options.Editing = False end object v2Column24: TcxGridDBColumn Caption = #21512#21516#29366#24577 DataBinding.FieldName = 'ConNoStatu' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle1 Styles.Footer = cxStyle1 Styles.Header = cxStyle1 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object cxGridPopupMenu1: TcxGridPopupMenu PopupMenus = <> Left = 712 Top = 216 end object ADOQueryCmd: TADOQuery Connection = DataLink_ContractManagement.ADOLink Parameters = <> Left = 400 Top = 160 end object ADOQueryMain: TADOQuery Connection = DataLink_ContractManagement.ADOLink LockType = ltReadOnly Parameters = <> Left = 368 Top = 160 end object ADOQueryTemp: TADOQuery Connection = DataLink_ContractManagement.ADOLink LockType = ltReadOnly Parameters = <> Left = 344 Top = 160 end object DS_Main: TDataSource DataSet = CDS_Main Left = 656 Top = 216 end object CDS_Sub: TClientDataSet Aggregates = <> Params = <> Left = 600 Top = 264 end object RM1: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, 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 CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 732 Top = 364 ReportData = {} end object RMDBDataSet1: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 144 Top = 240 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 = 784 Top = 360 end object ADOQueryPrint: TADOQuery Connection = DataLink_ContractManagement.ADOLink LockType = ltReadOnly Parameters = <> Left = 104 Top = 240 end object PopupMenu2: TPopupMenu Left = 332 Top = 276 object N11: TMenuItem Caption = #26597#30475#32455#36896#24037#33402#21333 OnClick = N11Click end object N1: TMenuItem Caption = #26597#30475#25972#32463#24037#33402#21333 OnClick = N1Click end end object DS_Sub: TDataSource DataSet = CDS_Sub Left = 648 Top = 264 end object cxGridPopupMenu2: TcxGridPopupMenu PopupMenus = <> Left = 712 Top = 264 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 600 Top = 216 end object cxStyleRepository1: TcxStyleRepository object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] end object cxStyle2: TcxStyle end end object CDS_PM: TClientDataSet Aggregates = <> Params = <> Left = 464 Top = 412 end object RMDB_Main: TRMDBDataSet Visible = True DataSet = CDS_PM Left = 496 Top = 412 end object CDS_QZ: TClientDataSet Aggregates = <> Params = <> Left = 468 Top = 448 end object RMDB_QZ: TRMDBDataSet Visible = True DataSet = CDS_QZ Left = 496 Top = 448 end object CDS_PJS: TClientDataSet Aggregates = <> Params = <> Left = 468 Top = 480 end object RMDB_JS: TRMDBDataSet Visible = True DataSet = CDS_PJS Left = 500 Top = 480 end object CDS_PWS: TClientDataSet Aggregates = <> Params = <> Left = 468 Top = 512 end object RMDB_WS: TRMDBDataSet Visible = True DataSet = CDS_PWS Left = 504 Top = 512 end end