object frmMLContractInPut_PB: TfrmMLContractInPut_PB Left = 58 Top = 38 Width = 1312 Height = 653 Caption = #22383#24067#37319#36141#35745#21010#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter WindowState = wsMaximized OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1296 Height = 30 ButtonHeight = 30 ButtonWidth = 67 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] Images = DataLink_Contract.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 5 OnClick = TBSaveClick end object Panel1: TPanel Left = 71 Top = 0 Width = 342 Height = 30 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 end object Label1: TLabel Left = 413 Top = 0 Width = 183 Height = 30 Caption = ' '#22383#24067#37319#36141#35745#21010 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -27 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Panel21: TPanel Left = 596 Top = 0 Width = 236 Height = 30 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 end object TBClose: TToolButton Left = 832 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object ScrollBox1: TScrollBox Left = 0 Top = 30 Width = 1296 Height = 118 Align = alTop BevelInner = bvNone BevelOuter = bvNone Color = clBtnFace Ctl3D = False ParentColor = False ParentCtl3D = False TabOrder = 1 object Label10: TLabel Left = 61 Top = 13 Width = 90 Height = 17 Caption = #35745#21010#21333#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 660 Top = 85 Width = 90 Height = 17 Caption = #19979#21333#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 61 Top = 48 Width = 92 Height = 17 Caption = #20379' '#24212' '#21830#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label42: TLabel Left = 61 Top = 85 Width = 90 Height = 17 Caption = #22383#24067#21517#31216#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 380 Top = 13 Width = 90 Height = 17 Caption = #37319#36141#21305#25968#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 660 Top = 13 Width = 90 Height = 17 Caption = #37319#36141#21333#20215#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 380 Top = 48 Width = 90 Height = 17 Caption = #37319#36141#25968#37327#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 380 Top = 85 Width = 90 Height = 17 Caption = #25968#37327#21333#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 660 Top = 48 Width = 90 Height = 17 Caption = #26159#21542#21547#31246#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 577 Top = 13 Width = 56 Height = 17 Caption = '('#21512#35745')' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 577 Top = 48 Width = 56 Height = 17 Caption = '('#21512#35745')' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object CJDate: TDateTimePicker Tag = 2 Left = 753 Top = 81 Width = 137 Height = 25 BevelInner = bvNone Date = 40916.670856296290000000 Format = 'yyyy-MM-dd' Time = 40916.670856296290000000 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object GYSName: TBtnEditC Tag = 2 Left = 143 Top = 44 Width = 214 Height = 26 Hint = 'GYSNO' Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 1 OnBtnUpClick = GYSNameBtnUpClick OnBtnDnClick = GYSNameBtnDnClick end object CJNO: TEdit Left = 143 Top = 10 Width = 214 Height = 23 Color = clScrollBar Enabled = False Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 2 end object CJPS: TEdit Tag = 2 Left = 464 Top = 10 Width = 109 Height = 23 Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 3 end object CJPrice: TEdit Tag = 2 Left = 753 Top = 10 Width = 134 Height = 23 Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 4 end object CJQty: TEdit Tag = 2 Left = 464 Top = 45 Width = 109 Height = 23 Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 5 end object CJQtyUnit: TComboBox Tag = 2 Left = 464 Top = 81 Width = 108 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 6 Items.Strings = ( 'M' 'Kg') end object HanShui: TComboBox Tag = 2 Left = 753 Top = 45 Width = 136 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 7 Items.Strings = ( #21547#31246 #19981#21547#31246) end object MLCodeName: TBtnEditA Tag = 2 Left = 143 Top = 81 Width = 213 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 8 OnChange = MLCodeNameChange OnBtnClick = MLCodeNameBtnClick end object Edit1: TEdit Left = 176 Top = 120 Width = 109 Height = 23 Color = clWhite Enabled = False Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 9 end end object ToolBar2: TToolBar Left = 0 Top = 148 Width = 1296 Height = 29 ButtonHeight = 30 ButtonWidth = 115 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] Images = DataLink_Contract.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #36873#25321#25351#31034#21333 ImageIndex = 12 end end object cxGrid1: TcxGrid Left = 0 Top = 177 Width = 1296 Height = 438 Align = alClient TabOrder = 3 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = '0' Position = spFooter end item Format = '0' Position = spFooter Column = v1Qty end item Format = '0' Position = spFooter end item Kind = skSum Position = spFooter end item Kind = skSum end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1Qty end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.Editing = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Content = DataLink_Contract.Default Styles.Inactive = DataLink_Contract.SHuangSe Styles.IncSearch = DataLink_Contract.SHuangSe Styles.Selection = DataLink_Contract.SHuangSe Styles.Header = DataLink_Contract.Default object v1XHNo: TcxGridDBColumn Tag = 2 Caption = #24207#21495 DataBinding.FieldName = 'CMXH' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_Contract.Default Width = 74 end object v1ConCode: TcxGridDBColumn Caption = #25351#31034#21333#21495 DataBinding.FieldName = 'MLOrderNo' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Styles.Header = DataLink_Contract.SHuangSe Width = 135 end object v1ConCodeName: TcxGridDBColumn Caption = #25351#31034#21333#21697#21517 DataBinding.FieldName = 'MLCodeName' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_Contract.SHuangSe Width = 131 end object v1Qty: TcxGridDBColumn Caption = #25351#31034#21333#25968#37327 DataBinding.FieldName = 'MLHZQty' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_Contract.SHuangSe Width = 115 end object v1QtyUnit: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'MLHZQtyUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Styles.Header = DataLink_Contract.SHuangSe Width = 83 end object v1Column1: TcxGridDBColumn Tag = 2 Caption = #35745#21010#37319#36141#21305#25968 DataBinding.FieldName = 'CMPS' Width = 140 end object v1ConPrice: TcxGridDBColumn Tag = 2 Caption = #35745#21010#37319#36141#25968#37327 DataBinding.FieldName = 'CMQty' HeaderAlignmentHorz = taCenter Width = 147 end object v1Column3: TcxGridDBColumn Caption = #24065#31181 Visible = False HeaderAlignmentHorz = taCenter Width = 48 end object v1ConNote: TcxGridDBColumn Tag = 2 Caption = #22791#27880 DataBinding.FieldName = 'CMNote' HeaderAlignmentHorz = taCenter Width = 229 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_Contract.ADOLink LockType = ltReadOnly Parameters = <> Left = 639 Top = 1 end object ADOCmd: TADOQuery Connection = DataLink_Contract.ADOLink Parameters = <> Left = 605 Top = 4 end object DataSource1: TDataSource DataSet = Order_Sub Left = 740 Top = 6 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 781 Top = 11 end object ADOQuery1: TADOQuery Connection = DataLink_Contract.ADOLink Parameters = <> Left = 704 Top = 5 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 907 Top = 71 end object ADOQueryCmd: TADOQuery Connection = DataLink_Contract.ADOLink Parameters = <> Left = 672 Top = 1 end end