object frmMJEdit: TfrmMJEdit Left = 191 Top = 136 Width = 1147 Height = 688 Caption = #24067#21305#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 = 1131 Height = 30 ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' Color = clSkyBlue EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TradeManage.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = ToolButton1Click end object ToolButton3: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 107 OnClick = ToolButton3Click end object ToolButton2: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 58 OnClick = ToolButton2Click end object ToolButton4: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20316#24223 ImageIndex = 48 OnClick = ToolButton4Click end object TBQPrint: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #26631#31614#25171#21360 ImageIndex = 12 OnClick = TBQPrintClick end object TBClose: TToolButton Left = 339 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 30 Width = 1131 Height = 81 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 27 Top = 17 Width = 56 Height = 13 Caption = #24067#21305#26465#30721 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 36 Top = 52 Width = 8 Height = 13 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label4: TLabel Left = 497 Top = 22 Width = 26 Height = 13 Caption = #27611#37325 end object M: TLabel Left = 464 Top = 22 Width = 7 Height = 13 Caption = 'M' OnDblClick = MDblClick end object Label6: TLabel Left = 372 Top = 22 Width = 26 Height = 13 Caption = #38271#24230 end object Ma: TLabel Left = 321 Top = 108 Width = 7 Height = 13 Caption = 'M' end object Label7: TLabel Left = 229 Top = 108 Width = 26 Height = 13 Caption = #21407#30721 end object Label5: TLabel Left = 360 Top = 113 Width = 7 Height = 13 Caption = 'M' end object Label8: TLabel Left = 610 Top = 22 Width = 26 Height = 13 Caption = #24133#23485 end object Label9: TLabel Left = 698 Top = 22 Width = 14 Height = 13 Caption = 'cm' end object Label10: TLabel Left = 585 Top = 22 Width = 14 Height = 13 Caption = 'Kg' end object Label3: TLabel Left = 610 Top = 48 Width = 26 Height = 13 Caption = #20811#37325 end object Label11: TLabel Left = 698 Top = 48 Width = 27 Height = 13 Caption = 'g/'#13217 end object Label13: TLabel Left = 372 Top = 48 Width = 26 Height = 13 Caption = #36192#36865 end object Label12: TLabel Left = 497 Top = 48 Width = 26 Height = 13 Caption = #20928#37325 end object Label14: TLabel Left = 585 Top = 48 Width = 14 Height = 13 Caption = 'Kg' end object Label15: TLabel Left = 250 Top = 22 Width = 26 Height = 13 Caption = #21367#21495 end object Label16: TLabel Left = 250 Top = 48 Width = 26 Height = 13 Caption = #32568#21495 end object Label17: TLabel Left = 27 Top = 52 Width = 56 Height = 13 Caption = #25171#21360#20221#25968 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object MJID: TEdit Left = 87 Top = 11 Width = 119 Height = 26 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 OnKeyPress = MJIDKeyPress end object MJMaoZ: TEdit Left = 524 Top = 17 Width = 59 Height = 21 TabOrder = 1 end object MJLen: TEdit Left = 399 Top = 17 Width = 58 Height = 21 TabOrder = 2 end object RadioGroup1: TRadioGroup Left = 737 Top = 3 Width = 165 Height = 63 Columns = 3 ItemIndex = 0 Items.Strings = ( #27491#21697 #27425#21697) TabOrder = 3 end object MJQty1: TEdit Left = 256 Top = 108 Width = 58 Height = 21 TabOrder = 4 end object MJFK: TEdit Left = 637 Top = 17 Width = 59 Height = 21 TabOrder = 5 end object MJSJKZ: TEdit Left = 637 Top = 43 Width = 59 Height = 21 TabOrder = 6 end object MJQty2: TEdit Left = 399 Top = 43 Width = 58 Height = 21 TabOrder = 7 end object MJQty4: TEdit Left = 524 Top = 43 Width = 59 Height = 21 TabOrder = 8 end object MJXH: TEdit Left = 277 Top = 17 Width = 59 Height = 21 TabOrder = 9 end object MJStr4: TEdit Left = 277 Top = 43 Width = 59 Height = 21 TabOrder = 10 end object FS: TComboBox Left = 87 Top = 46 Width = 121 Height = 24 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 11 Text = '1' Items.Strings = ( '1' '2' '3' '4') end end object cxGrid2: TcxGrid Left = 0 Top = 111 Width = 1131 Height = 537 Align = alClient TabOrder = 2 object Tv2: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum Column = Tv2CDQty end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Header = DataLink_TradeManage.TextSHuangSe object tv2CDType: TcxGridDBColumn Caption = #30133#28857#21517#31216 DataBinding.FieldName = 'CDName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = tv2CDTypePropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Content = DataLink_TradeManage.Default Width = 144 end object tv2CDWZ: TcxGridDBColumn Caption = #20010#25968 DataBinding.FieldName = 'CDBeg' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = tv2CDWZPropertiesEditValueChanged HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Options.Sorting = False Styles.Content = DataLink_TradeManage.Default Width = 96 end object v2Column2: TcxGridDBColumn Caption = #20844#26020#25968 DataBinding.FieldName = 'CDend' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Styles.Content = DataLink_TradeManage.Default Width = 93 end object Tv2CDQty: TcxGridDBColumn Caption = #38271#24230 DataBinding.FieldName = 'CDQty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Content = DataLink_TradeManage.Default Width = 93 end object Tv2CDReason: TcxGridDBColumn Caption = #36127#36131#20154 DataBinding.FieldName = 'CDReason' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 131 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object ADOTmp: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 832 Top = 72 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 312 Top = 200 end object ADOCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 832 Top = 40 end object DataSource1: TDataSource DataSet = Order_MJ Left = 528 Top = 200 end object Order_MJ: TClientDataSet Aggregates = <> Params = <> Left = 344 Top = 200 end object ADOQueryPrint: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 327 Top = 230 end object RMDBMain: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 541 Top = 160 end object RM2: 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 = 397 Top = 244 ReportData = {} end end