object frmMJManageNewFDNew: TfrmMJManageNewFDNew Left = 347 Top = 156 Width = 1366 Height = 738 Caption = #25104#21697#26816#39564 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClick = FormClick OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object Label34: TLabel Left = 21 Top = 264 Width = 40 Height = 22 Caption = #20986#32440 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1350 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 = #21047#26032 ImageIndex = 9 OnClick = ToolButton1Click end object ToolButton2: TToolButton Left = 63 Top = 0 Caption = #30133#28857#21462#21495 ImageIndex = 56 OnClick = ToolButton2Click end object TBCD: TToolButton Left = 146 Top = 0 AutoSize = True Caption = #30133#28857#31649#29702 ImageIndex = 132 OnClick = TBCDClick end object TBClose: TToolButton Left = 233 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object cxGrid2: TcxGrid Left = 745 Top = 78 Width = 338 Height = 621 Align = alLeft TabOrder = 1 object Tv2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellClick = Tv2CellClick OnCellDblClick = Tv2CellDblClick DataController.DataSource = DataSource2 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 OptionsSelection.CellSelect = False OptionsView.Footer = True OptionsView.GroupByBox = False object tv2CDType: TcxGridDBColumn Caption = #30133#28857#21517#31216 DataBinding.FieldName = 'CDName' HeaderAlignmentHorz = taCenter Options.Focusing = False Options.Sorting = False Styles.Content = cxStyle4 Styles.Header = cxStyle4 Width = 89 end object tv2CDWZ: TcxGridDBColumn Caption = #20301#32622#36215 DataBinding.FieldName = 'CDBeg' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Options.Sorting = False Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 76 end object v2Column2: TcxGridDBColumn Caption = #20301#32622#27490 DataBinding.FieldName = 'CDend' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Styles.Content = cxStyle1 Styles.Header = cxStyle1 Width = 75 end object Tv2CDQty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'CDQty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = Tv2CDQtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Content = cxStyle3 Styles.Header = cxStyle3 Width = 73 end object Tv2CDReason: TcxGridDBColumn Caption = #21407#22240 DataBinding.FieldName = 'CDReason' Visible = False HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Content = cxStyle2 Styles.Header = cxStyle1 Width = 131 end object v2Column1: TcxGridDBColumn DataBinding.FieldName = 'CDQty' Visible = False Width = 55 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object cxGrid3: TcxGrid Left = 1083 Top = 78 Width = 267 Height = 621 Align = alClient TabOrder = 2 object Tv3: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellClick = Tv3CellClick DataController.DataSource = DataSource3 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skCount Column = cxGridDBColumn1 end item Kind = skSum Column = v3Column2 end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Inactive = cxStyle4 Styles.IncSearch = cxStyle4 Styles.Selection = cxStyle4 object cxGridDBColumn1: TcxGridDBColumn Caption = #21367#26465#30721 DataBinding.FieldName = 'MJID' HeaderAlignmentHorz = taCenter Options.Focusing = False Options.Sorting = False Styles.Content = cxStyle5 Styles.Header = cxStyle5 Width = 110 end object v3Column2: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'MJLen' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle3 Styles.Header = cxStyle3 Width = 60 end object v3Column3: TcxGridDBColumn Caption = #31867#22411 DataBinding.FieldName = 'MJType' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle5 Styles.Header = cxStyle5 Width = 67 end object v3Column1: TcxGridDBColumn Caption = #21367#21495 DataBinding.FieldName = 'MJXH' Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = cxStyle4 Styles.Header = cxStyle4 Width = 49 end end object cxGridLevel2: TcxGridLevel GridView = Tv3 end end object ScrollBox1: TScrollBox Left = 0 Top = 78 Width = 489 Height = 621 Align = alLeft TabOrder = 3 object SpeedButton13: TSpeedButton Left = 7 Top = 3 Width = 70 Height = 70 Caption = #23567#40657#28857 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton14: TSpeedButton Left = 86 Top = 3 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton15: TSpeedButton Left = 166 Top = 3 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton16: TSpeedButton Left = 245 Top = 3 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton17: TSpeedButton Left = 325 Top = 3 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton18: TSpeedButton Left = 404 Top = 3 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton21: TSpeedButton Left = 7 Top = 77 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton22: TSpeedButton Left = 86 Top = 77 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton23: TSpeedButton Left = 166 Top = 77 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton24: TSpeedButton Left = 245 Top = 77 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton25: TSpeedButton Left = 325 Top = 77 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton26: TSpeedButton Left = 404 Top = 77 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton29: TSpeedButton Left = 7 Top = 151 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton30: TSpeedButton Left = 86 Top = 151 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton31: TSpeedButton Left = 166 Top = 151 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton32: TSpeedButton Left = 245 Top = 151 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton33: TSpeedButton Left = 325 Top = 151 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton34: TSpeedButton Left = 404 Top = 151 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton37: TSpeedButton Left = 7 Top = 225 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton38: TSpeedButton Left = 86 Top = 225 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton39: TSpeedButton Left = 166 Top = 225 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton40: TSpeedButton Left = 245 Top = 225 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton41: TSpeedButton Left = 325 Top = 225 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton42: TSpeedButton Left = 404 Top = 225 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton45: TSpeedButton Left = 7 Top = 299 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton46: TSpeedButton Left = 86 Top = 299 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton47: TSpeedButton Left = 166 Top = 299 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton48: TSpeedButton Left = 245 Top = 299 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton50: TSpeedButton Left = 325 Top = 299 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton51: TSpeedButton Left = 404 Top = 299 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton54: TSpeedButton Left = 7 Top = 373 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton55: TSpeedButton Left = 86 Top = 373 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton56: TSpeedButton Left = 166 Top = 373 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton57: TSpeedButton Left = 245 Top = 373 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton58: TSpeedButton Left = 325 Top = 373 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton59: TSpeedButton Left = 404 Top = 373 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton62: TSpeedButton Left = 7 Top = 447 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton63: TSpeedButton Left = 86 Top = 447 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton64: TSpeedButton Left = 166 Top = 447 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton65: TSpeedButton Left = 245 Top = 447 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton66: TSpeedButton Left = 325 Top = 447 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton67: TSpeedButton Left = 404 Top = 447 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton70: TSpeedButton Left = 7 Top = 521 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton71: TSpeedButton Left = 86 Top = 521 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton72: TSpeedButton Left = 166 Top = 521 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton73: TSpeedButton Left = 245 Top = 521 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton74: TSpeedButton Left = 325 Top = 521 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end object SpeedButton75: TSpeedButton Left = 404 Top = 521 Width = 70 Height = 70 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False OnClick = SpeedButton13Click end end object MovePanel1: TMovePanel Left = 86 Top = 112 Width = 313 Height = 281 BevelInner = bvLowered Color = clSkyBlue TabOrder = 4 Visible = False object Label17: TLabel Left = 29 Top = 24 Width = 88 Height = 21 Caption = #36215#22987#20301#32622 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label18: TLabel Left = 178 Top = 59 Width = 20 Height = 19 Caption = #21040 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label19: TLabel Left = 264 Top = 24 Width = 22 Height = 21 Caption = #30721 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label20: TLabel Left = 264 Top = 89 Width = 22 Height = 21 Caption = #30721 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label21: TLabel Left = 29 Top = 89 Width = 84 Height = 21 Caption = 'Label21' Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 264 Top = 167 Width = 22 Height = 21 Caption = #30721 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 29 Top = 167 Width = 92 Height = 21 Caption = #38271' '#24230 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Edit1: TEdit Left = 124 Top = 14 Width = 131 Height = 41 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnChange = Edit2Change OnClick = Edit1Click end object Button1: TButton Left = 36 Top = 221 Width = 66 Height = 43 Caption = #30830#23450 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Button1Click end object Button4: TButton Left = 190 Top = 221 Width = 64 Height = 42 Caption = #21462#28040 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = Button4Click end object Edit2: TEdit Left = 124 Top = 79 Width = 131 Height = 41 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnChange = Edit2Change OnClick = Edit1Click end object CDQty: TEdit Left = 124 Top = 157 Width = 131 Height = 41 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 end end object Panel1: TPanel Left = 0 Top = 30 Width = 1350 Height = 48 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 5 object Label1: TLabel Left = 9 Top = 16 Width = 80 Height = 19 Caption = #25195#25551#20837#21475 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 396 Top = 15 Width = 42 Height = 20 Caption = #32568#21495 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 1088 Top = 13 Width = 42 Height = 12 Caption = 'Label16' Visible = False end object Label24: TLabel Left = 528 Top = 15 Width = 63 Height = 20 Caption = #35746#21333#21495 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label25: TLabel Left = 672 Top = 15 Width = 42 Height = 20 Caption = #39068#33394 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label29: TLabel Left = 748 Top = 15 Width = 11 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label30: TLabel Left = 848 Top = 15 Width = 11 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label31: TLabel Left = 632 Top = 15 Width = 11 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object APID: TEdit Left = 88 Top = 12 Width = 185 Height = 27 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 OnClick = Edit1Click OnKeyPress = APIDKeyPress end object BTAdd: TButton Left = 1211 Top = 8 Width = 46 Height = 25 Caption = #26032#22686 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 Visible = False OnClick = BTAddClick end object BTEdit: TButton Left = 1155 Top = 8 Width = 38 Height = 25 Caption = #20462#25913 TabOrder = 2 Visible = False OnClick = BTEditClick end object CheckBox3: TCheckBox Left = 984 Top = 16 Width = 97 Height = 17 Caption = #33258#21160#21462#20540 Checked = True Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False State = cbChecked TabOrder = 3 end object Button2: TButton Left = 276 Top = 12 Width = 75 Height = 29 Caption = #30830#23450 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnClick = Button2Click end end object Panel2: TPanel Left = 489 Top = 78 Width = 256 Height = 621 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 6 object Label9: TLabel Left = 186 Top = 191 Width = 15 Height = 22 Caption = 'M' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 474 Top = 144 Width = 26 Height = 22 Caption = 'cm' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 21 Top = 191 Width = 40 Height = 22 Caption = #38271#24230 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 313 Top = 144 Width = 40 Height = 22 Caption = #38376#24133 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label10: TLabel Left = 137 Top = 305 Width = 40 Height = 22 Caption = #27491#21697 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label12: TLabel Left = 22 Top = 357 Width = 60 Height = 22 Caption = #27425' '#21697 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label15: TLabel Left = 36 Top = 336 Width = 5 Height = 22 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False Visible = False end object Label22: TLabel Left = 474 Top = 183 Width = 36 Height = 22 Caption = 'g/'#13217 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label23: TLabel Left = 313 Top = 182 Width = 40 Height = 22 Caption = #20811#37325 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label28: TLabel Left = 22 Top = 404 Width = 60 Height = 22 Caption = #25913#33394#21697 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label26: TLabel Left = 21 Top = 308 Width = 40 Height = 22 Caption = #20986#32440 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 21 Top = 40 Width = 40 Height = 22 Caption = #21697#21517 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 21 Top = 76 Width = 40 Height = 22 Caption = #39068#33394 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 361 Top = 240 Width = 40 Height = 23 Caption = #32568#21495 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -20 Font.Name = 'Arial' Font.Style = [] ParentFont = False Visible = False end object Label14: TLabel Left = 21 Top = 112 Width = 40 Height = 22 Caption = #32568#21495 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label27: TLabel Left = 297 Top = 419 Width = 80 Height = 22 Caption = #22238#20179#25968#37327 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label32: TLabel Left = 21 Top = 264 Width = 11 Height = 22 Caption = '1' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label33: TLabel Left = 93 Top = 264 Width = 11 Height = 22 Caption = '2' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label35: TLabel Left = 169 Top = 264 Width = 11 Height = 22 Caption = '3' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label36: TLabel Left = 25 Top = 451 Width = 40 Height = 22 Caption = #21305#25968 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False Visible = False end object Label37: TLabel Left = 25 Top = 491 Width = 80 Height = 22 Caption = #25171#21360#20221#25968 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object MJFK: TEdit Left = 361 Top = 139 Width = 110 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = Edit1Click end object MJLen: TEdit Left = 69 Top = 186 Width = 110 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnClick = Edit1Click OnKeyPress = MJLenKeyPress end object BTPrint: TButton Left = 11 Top = 524 Width = 83 Height = 54 Caption = #25171#21360 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 OnClick = BTPrintClick end object Button5: TButton Left = 131 Top = 524 Width = 83 Height = 54 Caption = #37325#25171 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnClick = Button5Click end object Edit3: TEdit Left = 182 Top = 295 Width = 46 Height = 43 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 7 Text = #8730 OnClick = Edit3Click end object Edit4: TEdit Left = 104 Top = 347 Width = 46 Height = 43 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 8 OnClick = Edit4Click end object MJSJKZ: TEdit Left = 361 Top = 177 Width = 110 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 9 OnClick = Edit1Click end object Edit5: TEdit Left = 104 Top = 394 Width = 46 Height = 43 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 10 OnClick = Edit5Click end object Edit6: TEdit Left = 70 Top = 298 Width = 46 Height = 43 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 11 Text = #8730 OnClick = Edit6Click end object C_CodeName: TEdit Left = 69 Top = 35 Width = 110 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Edit1Click OnExit = C_CodeNameExit OnKeyPress = C_CodeNameKeyPress end object C_Color: TEdit Left = 69 Top = 71 Width = 110 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = Edit1Click OnExit = C_ColorExit OnKeyPress = C_CodeNameKeyPress end object BCGangNo: TEdit Left = 69 Top = 107 Width = 110 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnClick = Edit1Click OnExit = BCGangNoExit OnKeyPress = C_CodeNameKeyPress end object MJQty1: TEdit Left = 377 Top = 414 Width = 80 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 12 OnClick = Edit1Click OnKeyPress = MJQty1KeyPress end object Edit7: TEdit Left = 38 Top = 254 Width = 46 Height = 43 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 13 OnClick = Edit7Click end object Edit8: TEdit Left = 114 Top = 254 Width = 46 Height = 43 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 14 OnClick = Edit8Click end object Edit9: TEdit Left = 186 Top = 250 Width = 46 Height = 43 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 15 OnClick = Edit9Click end object Edit10: TEdit Left = 69 Top = 446 Width = 110 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 16 Text = '1' Visible = False OnClick = Edit1Click end object ComboBox1: TComboBox Left = 104 Top = 488 Width = 81 Height = 27 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ItemHeight = 19 ItemIndex = 1 ParentFont = False TabOrder = 17 Text = '2' Items.Strings = ( '1' '2' '3' '4' '5' '6') end end object Panel3: TPanel Left = 86 Top = 422 Width = 383 Height = 231 BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 7 Visible = False object SpeedButton1: TSpeedButton Left = 4 Top = 3 Width = 70 Height = 70 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 78 Top = 3 Width = 70 Height = 70 Caption = '1' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton3: TSpeedButton Left = 152 Top = 3 Width = 70 Height = 70 Caption = '2' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton4: TSpeedButton Left = 226 Top = 3 Width = 70 Height = 70 Caption = '3' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton5: TSpeedButton Left = 4 Top = 75 Width = 70 Height = 70 Caption = '4' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton6: TSpeedButton Left = 78 Top = 75 Width = 70 Height = 70 Caption = '5' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton7: TSpeedButton Left = 152 Top = 75 Width = 70 Height = 70 Caption = '6' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton8: TSpeedButton Left = 226 Top = 75 Width = 70 Height = 70 Caption = '7' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton9: TSpeedButton Left = 4 Top = 150 Width = 70 Height = 70 Caption = '8' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton10: TSpeedButton Left = 78 Top = 150 Width = 70 Height = 70 Caption = '9' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton11: TSpeedButton Tag = 9 Left = 152 Top = 150 Width = 70 Height = 70 Caption = '.' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #40657#20307 Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton12: TSpeedButton Left = 226 Top = 150 Width = 70 Height = 70 Caption = #8592 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton12Click end object SpeedButton49: TSpeedButton Tag = 9 Left = 303 Top = 81 Width = 65 Height = 57 Caption = #38544#34255 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton49Click end end object cxStyleRepository1: TcxStyleRepository Left = 368 PixelsPerInch = 96 object cxStyle1: TcxStyle AssignedValues = [svColor, svFont] Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle2: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = #23435#20307 Font.Pitch = fpFixed Font.Style = [fsBold] TextColor = clDefault end end object cxGridPopupMenu1: TcxGridPopupMenu PopupMenus = <> Left = 400 end object DataSource1: TDataSource DataSet = Order_MJ Left = 616 end object Order_MJ: TClientDataSet Aggregates = <> Params = <> Left = 432 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 576 end object ADOCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 536 end object ADOTmp: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 504 end object RMDB_Main: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 648 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 = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 464 ReportData = {} end object DataSource2: TDataSource DataSet = CDS_MJCD Left = 816 end object CDS_MJCD: TClientDataSet Aggregates = <> Params = <> Left = 768 end object DataSource3: TDataSource DataSet = CDS_MJID Left = 1000 Top = 296 end object CDS_MJID: TClientDataSet Aggregates = <> Params = <> Left = 1016 Top = 312 end object Timer1: TTimer Interval = 100 Left = 944 Top = 320 end object ADOQueryPrint: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 720 end object cxStyleRepository2: TcxStyleRepository PixelsPerInch = 96 object cxStyle3: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clBlue end end object cxStyleRepository3: TcxStyleRepository PixelsPerInch = 96 object cxStyle4: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clRed end end object cxStyleRepository4: TcxStyleRepository PixelsPerInch = 96 object cxStyle5: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clOlive end end object cxStyleRepository5: TcxStyleRepository PixelsPerInch = 96 object cxStyle6: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -29 Font.Name = #23435#20307 Font.Style = [fsBold] end end object cxGridPopupMenu2: TcxGridPopupMenu PopupMenus = <> Left = 616 Top = 587 end object ADOQueryMainDSC: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> SQL.Strings = ( 'select A.*,C.OrderNo,B.SWFBColor,B.SWFBHW,B.SWFBCodeName,' ' B.SWFBCode,B.SWFBKZ,B.WKMS,B.KZBig,B.KZSmal,' ' SCMQty=(select isnull(Sum(MJLen),0) from WFB_MJJY WM wher' + 'e WM.APId=A.APId and len(WM.MJID)>8),' ' Case when A.OrderQtyM-(select isnull(Sum(MJLen),0) from W' + 'FB_MJJY WM where WM.APId=A.APId )>0 ' ' then A.OrderQtyM-(select isnull(Sum(MJLen),0) fr' + 'om WFB_MJJY WM where WM.APId=A.APId ) else 0 end as WSCMQty' 'from WFBOrder_Sub_AnPai A ' 'inner join WFBOrder_Sub B on A.SubId=B.SubId' 'inner join WFBOrder_Main C on A.MainId=C.MainId' 'where C.ChkStatus='#39#23457#26680#36890#36807#39' and RTrim(isnull(A.SCStatus,'#39#39'))<>'#39#24050#23436#25104#39 + ' ' 'and isnull(B.AnPaiChkStatus,'#39#39')='#39#23457#26680#36890#36807#39' and A.SCXDFlag=1' '') Left = 840 Top = 144 end object ADOQueryTmp: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 852 Top = 4 end end