object frmContractListNX: TfrmContractListNX Left = 74 Top = 54 Width = 1573 Height = 902 Caption = #20869#38144#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 = 1557 AutoSize = True ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] 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 TBFind: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 20 OnClick = TBFindClick end object TBAdd: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 1 OnClick = TBAddClick end object TBEdit: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 11 OnClick = TBEditClick end object ToolButton2: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #22797#21046 ImageIndex = 38 OnClick = ToolButton2Click end object ToolButton1: TToolButton Left = 315 Top = 0 AutoSize = True Caption = #26597#30475 ImageIndex = 26 OnClick = ToolButton1Click end object ToolButton5: TToolButton Left = 378 Top = 0 AutoSize = True Caption = #38468#20214 ImageIndex = 83 OnClick = ToolButton5Click end object TBPrint: TToolButton Left = 441 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 4 OnClick = TBPrintClick end object btnTijiao: TToolButton Left = 504 Top = 0 AutoSize = True Caption = #25552#20132 ImageIndex = 31 OnClick = btnTijiaoClick end object btnCXTijiao: TToolButton Left = 567 Top = 0 AutoSize = True Caption = #25764#38144#25552#20132 ImageIndex = 52 OnClick = btnCXTijiaoClick end object tchk: TToolButton Left = 654 Top = 0 AutoSize = True Caption = #23457#26680 ImageIndex = 31 OnClick = tchkClick end object Tnochk: TToolButton Left = 717 Top = 0 AutoSize = True Caption = #25764#38144#23457#26680 ImageIndex = 52 Visible = False OnClick = TnochkClick end object Tqx: TToolButton Left = 804 Top = 0 AutoSize = True Caption = #21462#28040 ImageIndex = 3 OnClick = TqxClick end object Tnoqx: TToolButton Left = 867 Top = 0 AutoSize = True Caption = #25764#38144#21462#28040 ImageIndex = 52 OnClick = TnoqxClick end object ToolButton3: TToolButton Left = 954 Top = 0 AutoSize = True Caption = #25805#20316#26085#24535 ImageIndex = 22 OnClick = ToolButton3Click end object TBClose: TToolButton Left = 1041 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object cxGrid1: TcxGrid Left = 0 Top = 96 Width = 1557 Height = 395 Align = alTop TabOrder = 3 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellDblClick = Tv1CellDblClick OnCustomDrawCell = Tv1CustomDrawCell OnFocusedRecordChanged = Tv1FocusedRecordChanged DataController.DataSource = DS_Main DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsData.Editing = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Inactive = DataLink_ContractManagement.SHuangSe Styles.IncSearch = DataLink_ContractManagement.SHuangSe Styles.Selection = DataLink_ContractManagement.SHuangSe Styles.Header = DataLink_ContractManagement.Default object v1Column4: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.NullStyle = nssUnchecked Visible = False HeaderAlignmentHorz = taCenter Width = 49 end object v1ConNo: TcxGridDBColumn Caption = #35746#21333#21495 DataBinding.FieldName = 'ConNo' HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Header = DataLink_ContractManagement.Default Width = 73 end object v1OrdPerson1: TcxGridDBColumn Caption = #19994#21153#21592 DataBinding.FieldName = 'Salesman' HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Header = DataLink_ContractManagement.Default Width = 91 end object v1Column15: TcxGridDBColumn Caption = #29702#21333 DataBinding.FieldName = 'lidan' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v1Column14: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'SCMName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 91 end object Tv1Column1: TcxGridDBColumn Caption = #26126#32454 DataBinding.FieldName = 'OrderDetail' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 83 end object v1Column16: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'SCMSpec' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v1Column17: TcxGridDBColumn Caption = #38376#24133 DataBinding.FieldName = 'SCMMF' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v1Column18: TcxGridDBColumn Caption = #20811#37325 DataBinding.FieldName = 'SCMKZ' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v1CustomerNoName: TcxGridDBColumn Caption = #38656#26041 DataBinding.FieldName = 'BuyName' HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Header = DataLink_ContractManagement.Default Width = 99 end object v1OrdDate: TcxGridDBColumn Caption = #21046#21333#26085#26399 DataBinding.FieldName = 'OrdDate' PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Header = DataLink_ContractManagement.Default Width = 86 end object v1DeliveryDate: TcxGridDBColumn Caption = #25104#20132#26085#26399 DataBinding.FieldName = 'DlyDate' PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Header = DataLink_ContractManagement.Default Width = 85 end object v1Column10: TcxGridDBColumn DataBinding.FieldName = 'status' Visible = False VisibleForCustomization = False end object v1Column12: TcxGridDBColumn Caption = #38468#20214 DataBinding.FieldName = 'ISSC' PropertiesClassName = 'TcxCheckBoxProperties' Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 87 end object v1Column9: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'note' HeaderAlignmentHorz = taCenter Width = 80 end object v1Column13: TcxGridDBColumn Caption = #21046#21333#20154 DataBinding.FieldName = 'Filler' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 78 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object Panel1: TPanel Left = 0 Top = 32 Width = 1557 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 Label5: TLabel Left = 454 Top = 15 Width = 53 Height = 12 Caption = #19994' '#21153' '#21592 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 = 623 Top = 15 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 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 = 766 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 Label6: TLabel Left = 900 Top = 15 Width = 52 Height = 12 Caption = #38590#24230#31995#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label33: TLabel Left = 1058 Top = 15 Width = 65 Height = 12 Caption = #20462#25913#27425#25968#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack 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 = 23 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 TabOrder = 2 OnChange = BuyNameChange end object Salesman: TEdit Tag = 2 Left = 507 Top = 11 Width = 76 Height = 23 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 TabOrder = 3 OnChange = BuyNameChange end object MPRTCodeName: TEdit Tag = 2 Left = 483 Top = 95 Width = 76 Height = 23 ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 7 OnChange = BuyNameChange end object ConNo: TEdit Tag = 2 Left = 664 Top = 11 Width = 77 Height = 23 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 TabOrder = 4 OnChange = BuyNameChange end object MPRTKZ: TEdit Tag = 2 Left = 332 Top = 95 Width = 56 Height = 23 ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 6 OnChange = BuyNameChange end object MPRTMF: TEdit Tag = 2 Left = 332 Top = 119 Width = 56 Height = 23 ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 8 OnChange = BuyNameChange end object Filler: TEdit Tag = 2 Left = 807 Top = 11 Width = 77 Height = 23 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 TabOrder = 5 OnChange = BuyNameChange end object SCMNDXS: TComboBox Tag = 1 Left = 954 Top = 11 Width = 89 Height = 20 Style = csDropDownList ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ItemHeight = 12 TabOrder = 9 OnChange = BuyNameChange Items.Strings = ( #9733 #9733#9733 #9733#9733#9733 '') end object xgcs: TComboBox Tag = 2 Left = 1117 Top = 10 Width = 100 Height = 22 Style = csOwnerDrawFixed ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ItemHeight = 16 TabOrder = 10 OnChange = BuyNameChange Items.Strings = ( #31532'1'#27425#20462#25913 #31532'2'#27425#20462#25913 #31532'3'#27425#20462#25913 #31532'4'#27425#20462#25913 '') end end object cxTabControl1: TcxTabControl Left = 0 Top = 75 Width = 1557 Height = 21 Align = alTop TabOrder = 2 Properties.CustomButtons.Buttons = <> Properties.Style = 9 Properties.TabIndex = 0 Properties.Tabs.Strings = ( #26410#25552#20132 #24050#25552#20132 #24050#23457#26680 #24050#21462#28040 #20840#37096) OnChange = cxTabControl1Change ClientRectRight = 0 ClientRectTop = 0 end object cxSplitter1: TcxSplitter Left = 0 Top = 855 Width = 1557 Height = 8 HotZoneClassName = 'TcxMediaPlayer9Style' AlignSplitter = salBottom end object cxGrid2: TcxGrid Left = 0 Top = 491 Width = 1557 Height = 364 Align = alClient TabOrder = 4 object TV2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> 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 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 v1XHNo: TcxGridDBColumn Caption = #24207#21495 DataBinding.FieldName = 'XHNo' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_ContractManagement.Default Width = 55 end object v1PRTColor: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'SCSColor' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Styles.Header = DataLink_ContractManagement.handBlack Width = 70 end object cxGridDBColumn2: TcxGridDBColumn Caption = #33521#25991#39068#33394 DataBinding.FieldName = 'SCSEColor' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object V2Column1: TcxGridDBColumn Caption = #30830#35748#33394#21495 DataBinding.FieldName = 'SCSColorno' HeaderAlignmentHorz = taCenter Width = 61 end object v1PRTPrice: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'SCSPIQty' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Styles.Header = DataLink_ContractManagement.handBlack Width = 70 end object v1PRTOrderQty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'SCSQty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_ContractManagement.Default Width = 70 end object v1OrderUnit: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'SCSUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( 'Kg' 'M' 'Y') HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_ContractManagement.Default Width = 68 end object v1Column2: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'SCSNote' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end end object cxGridLevel1: TcxGridLevel GridView = TV2 end end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 712 Top = 208 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 Dataset = RMDBDataSet1 CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 184 Top = 240 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 = 240 Top = 240 end object ADOQueryPrint: TADOQuery Connection = DataLink_ContractManagement.ADOLink LockType = ltReadOnly Parameters = <> Left = 104 Top = 240 end object PopupMenu2: TPopupMenu Left = 240 Top = 128 object N11: TMenuItem Caption = #26684#24335'1' end object N21: TMenuItem Caption = #26684#24335'2' end object N31: TMenuItem Caption = #26684#24335'3' end end object DS_Sub: TDataSource DataSet = CDS_Sub Left = 648 Top = 264 end object cxGridPopupMenu2: TcxGridPopupMenu PopupMenus = <> Left = 712 Top = 272 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 600 Top = 216 end end