object frmMJEdit: TfrmMJEdit Left = 204 Top = 180 Width = 870 Height = 500 Caption = #24067#21305#31649#29702 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 = 854 Height = 30 ButtonHeight = 30 ButtonWidth = 59 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 Caption = #20316#24223 ImageIndex = 48 OnClick = ToolButton4Click end object TBClose: TToolButton Left = 248 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 30 Width = 854 Height = 83 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 25 Top = 16 Width = 52 Height = 12 Caption = #24067#21305#26465#30721 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 33 Top = 48 Width = 7 Height = 12 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label4: TLabel Left = 339 Top = 48 Width = 24 Height = 12 Caption = #37325#37327 end object M: TLabel Left = 420 Top = 16 Width = 6 Height = 12 Caption = 'M' end object Label6: TLabel Left = 339 Top = 16 Width = 24 Height = 12 Caption = #38271#24230 end object Ma: TLabel Left = 300 Top = 16 Width = 6 Height = 12 Caption = 'M' end object Label7: TLabel Left = 219 Top = 16 Width = 24 Height = 12 Caption = #21407#30721 end object Label5: TLabel Left = 292 Top = 48 Width = 6 Height = 12 Caption = 'M' end object Label8: TLabel Left = 219 Top = 48 Width = 24 Height = 12 Caption = #24133#23485 end object Label9: TLabel Left = 300 Top = 48 Width = 12 Height = 12 Caption = 'cm' end object Label10: TLabel Left = 420 Top = 48 Width = 12 Height = 12 Caption = 'Kg' end object Label3: TLabel Left = 459 Top = 48 Width = 24 Height = 12 Caption = #20811#37325 end object Label11: TLabel Left = 540 Top = 48 Width = 24 Height = 12 Caption = 'g/'#13217 end object Label13: TLabel Left = 459 Top = 16 Width = 24 Height = 12 Caption = #36192#36865 end object MJID: TEdit Left = 80 Top = 10 Width = 110 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 OnKeyPress = MJIDKeyPress end object MJMaoZ: TEdit Left = 364 Top = 44 Width = 54 Height = 20 TabOrder = 1 end object MJLen: TEdit Left = 364 Top = 12 Width = 54 Height = 20 TabOrder = 2 end object RadioGroup1: TRadioGroup Left = 592 Top = -5 Width = 185 Height = 88 Columns = 3 ItemIndex = 0 Items.Strings = ( #27491#21697 #27425#21697 #25913#33394#21697) TabOrder = 3 end object MJQty1: TEdit Left = 244 Top = 12 Width = 54 Height = 20 TabOrder = 4 end object MJFK: TEdit Left = 244 Top = 44 Width = 54 Height = 20 TabOrder = 5 end object MJSJKZ: TEdit Left = 484 Top = 44 Width = 54 Height = 20 TabOrder = 6 end object MJQty2: TEdit Left = 484 Top = 12 Width = 54 Height = 20 TabOrder = 7 end end object cxGrid2: TcxGrid Left = 0 Top = 113 Width = 854 Height = 349 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 Column = v2Column1 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 = #20301#32622#36215 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 = #20301#32622#27490 DataBinding.FieldName = 'CDend' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Styles.Content = DataLink_TradeManage.Default Width = 93 end object Tv2CDQty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'CDQty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Focusing = False Options.Sorting = False Styles.Content = DataLink_TradeManage.Default Width = 93 end object Tv2CDReason: TcxGridDBColumn Caption = #21407#22240 DataBinding.FieldName = 'CDReason' Visible = False HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 131 end object v2Column1: TcxGridDBColumn DataBinding.FieldName = 'CDQty' Visible = False Width = 55 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 end