object frmMJEdit: TfrmMJEdit Left = 231 Top = 282 Width = 870 Height = 522 Caption = 'Fabric management' 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 = 71 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 = 'Add' ImageIndex = 103 OnClick = ToolButton1Click end object ToolButton3: TToolButton Left = 57 Top = 0 AutoSize = True Caption = 'delete' ImageIndex = 107 OnClick = ToolButton3Click end object ToolButton2: TToolButton Left = 132 Top = 0 AutoSize = True Caption = 'Save' ImageIndex = 58 OnClick = ToolButton2Click end object ToolButton4: TToolButton Left = 195 Top = 0 Caption = 'Cancel' ImageIndex = 48 OnClick = ToolButton4Click end object TBClose: TToolButton Left = 266 Top = 0 AutoSize = True Caption = 'Close' ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 30 Width = 854 Height = 74 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 25 Top = 16 Width = 49 Height = 12 Caption = 'Barcode' 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 = 238 Top = 48 Width = 18 Height = 12 Caption = 'G.W' end object M: TLabel Left = 514 Top = 16 Width = 6 Height = 12 Caption = 'M' end object Label6: TLabel Left = 455 Top = 16 Width = 36 Height = 12 Caption = 'Length' end object Ma: TLabel Left = 304 Top = 88 Width = 6 Height = 12 Caption = 'M' end object Label7: TLabel Left = 223 Top = 88 Width = 24 Height = 12 Caption = #21407#30721 end object Label5: TLabel Left = 308 Top = 116 Width = 6 Height = 12 Caption = 'M' end object Label8: TLabel Left = 223 Top = 120 Width = 24 Height = 12 Caption = #24133#23485 end object Label9: TLabel Left = 316 Top = 112 Width = 12 Height = 12 Caption = 'cm' end object Label10: TLabel Left = 322 Top = 48 Width = 12 Height = 12 Caption = 'Kg' end object Label3: TLabel Left = 331 Top = 100 Width = 24 Height = 12 Caption = #20811#37325 end object Label11: TLabel Left = 412 Top = 100 Width = 24 Height = 12 Caption = 'g/'#13217 end object Label13: TLabel Left = 439 Top = 120 Width = 24 Height = 12 Caption = #36192#36865 end object Label12: TLabel Left = 357 Top = 48 Width = 18 Height = 12 Caption = 'N.W' end object Label14: TLabel Left = 440 Top = 48 Width = 12 Height = 12 Caption = 'Kg' end object Label15: TLabel Left = 216 Top = 16 Width = 48 Height = 12 Caption = 'Roll No.' end object Label16: TLabel Left = 338 Top = 16 Width = 42 Height = 12 Caption = 'Lot NO.' end object MJID: TEdit Left = 80 Top = 10 Width = 110 Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 OnKeyPress = MJIDKeyPress end object MJMaoZ: TEdit Left = 266 Top = 44 Width = 54 Height = 23 TabOrder = 5 end object MJLen: TEdit Left = 480 Top = 12 Width = 54 Height = 23 TabOrder = 4 end object RadioGroup1: TRadioGroup Left = 634 Top = 15 Width = 230 Height = 65 Columns = 2 ItemIndex = 0 Items.Strings = ( 'Quality goods ' 'Defective goods ') TabOrder = 0 end object MJQty1: TEdit Left = 248 Top = 84 Width = 54 Height = 23 TabOrder = 7 end object MJFK: TEdit Left = 248 Top = 116 Width = 54 Height = 23 TabOrder = 9 end object MJSJKZ: TEdit Left = 356 Top = 96 Width = 54 Height = 23 TabOrder = 8 end object MJQty2: TEdit Left = 464 Top = 116 Width = 54 Height = 23 TabOrder = 10 end object MJQty4: TEdit Left = 380 Top = 44 Width = 54 Height = 23 TabOrder = 6 end object MJXH: TEdit Left = 266 Top = 12 Width = 53 Height = 23 TabOrder = 2 Text = 'MJXH' end object MJstr4: TEdit Left = 380 Top = 12 Width = 53 Height = 23 TabOrder = 3 Text = 'Edit1' end end object cxGrid2: TcxGrid Left = 0 Top = 104 Width = 854 Height = 379 Align = alClient TabOrder = 2 object Tv2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> 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.NoDataToDisplayInfoText = 'None' OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Header = DataLink_TradeManage.TextSHuangSe object tv2CDType: TcxGridDBColumn Caption = 'Defect details' 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 = 'Initial position' 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 = 'Terminal position' DataBinding.FieldName = 'CDend' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Styles.Content = DataLink_TradeManage.Default Width = 93 end object Tv2CDQty: TcxGridDBColumn Caption = 'Qty' 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 Caption = 'Points' DataBinding.FieldName = 'KouFenQty' HeaderAlignmentHorz = taCenter Width = 80 end object v2Column3: TcxGridDBColumn Caption = 'Edge distance' DataBinding.FieldName = 'JBQty' HeaderAlignmentHorz = taCenter Width = 102 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