object frmMLOrderInPut: TfrmMLOrderInPut Left = 189 Top = 135 Width = 1319 Height = 705 Caption = #38754#26009#26579#33394#35745#21010#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter WindowState = wsMaximized OnShow = FormShow PixelsPerInch = 107 TextHeight = 13 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1303 Height = 29 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_MYSC.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 TBClose: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object ScrollBox1: TScrollBox Left = 0 Top = 29 Width = 1303 Height = 223 Align = alTop BevelInner = bvNone BevelOuter = bvNone Color = clBtnFace Ctl3D = False ParentColor = False ParentCtl3D = False TabOrder = 1 object Label1: TLabel Left = 35 Top = 11 Width = 70 Height = 13 Caption = #25351#31034#21333#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 231 Top = 11 Width = 72 Height = 13 Caption = #21512' '#21516' '#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 35 Top = 39 Width = 70 Height = 13 Caption = #19979#21333#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 422 Top = 11 Width = 74 Height = 13 Caption = #23458' '#25143#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 856 Top = 39 Width = 56 Height = 13 Caption = #32852#31995#20154#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 1039 Top = 39 Width = 98 Height = 13 Caption = #21152#24037#32852#31995#26041#24335#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 231 Top = 39 Width = 70 Height = 13 Caption = #21152#24037#21333#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 619 Top = 39 Width = 70 Height = 13 Caption = #21152#24037#22320#28857#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label41: TLabel Left = 856 Top = 11 Width = 56 Height = 13 Caption = #36319#21333#21592#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label43: TLabel Left = 619 Top = 11 Width = 72 Height = 13 Caption = #19994' '#21153' '#21592#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label23: TLabel Left = 35 Top = 145 Width = 56 Height = 26 Caption = #25163#24863#26679#21450#13#10#21697#36136#26679':' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label53: TLabel Left = 842 Top = 67 Width = 70 Height = 13 Caption = #21152#24037#31867#22411#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label61: TLabel Left = 35 Top = 67 Width = 72 Height = 13 Caption = #25910' '#36135' '#20154#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label25: TLabel Left = 232 Top = 67 Width = 70 Height = 13 Caption = #25910#36135#22320#28857#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label59: TLabel Left = 619 Top = 67 Width = 98 Height = 13 Caption = #25910#36135#32852#31995#26041#24335#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label60: TLabel Left = 1039 Top = 11 Width = 98 Height = 13 Caption = #36319#21333#32852#31995#26041#24335#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label19: TLabel Left = 35 Top = 94 Width = 70 Height = 13 Caption = #24037#33402#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label42: TLabel Left = 423 Top = 94 Width = 70 Height = 13 Caption = #21253#35013#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label58: TLabel Left = 842 Top = 94 Width = 70 Height = 13 Caption = #36136#37327#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label62: TLabel Left = 35 Top = 122 Width = 70 Height = 13 Caption = #25968#37327#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label63: TLabel Left = 423 Top = 122 Width = 70 Height = 13 Caption = #20854#20182#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object MLConNo: TBtnEditC Tag = 2 Left = 298 Top = 5 Width = 110 Height = 21 ReadOnly = True TabOrder = 11 OnBtnUpClick = MLConNoBtnUpClick OnBtnDnClick = KHNameBtnDnClick end object MLOrderNo: TEdit Tag = 2 Left = 104 Top = 8 Width = 108 Height = 19 Enabled = False TabOrder = 0 Text = #33258#21160#29983#25104 end object OrdDate: TDateTimePicker Tag = 2 Left = 104 Top = 35 Width = 109 Height = 21 BevelInner = bvNone Date = 40916.670856296290000000 Format = 'yyyy-MM-dd' Time = 40916.670856296290000000 TabOrder = 1 end object KHName: TBtnEditC Tag = 2 Left = 491 Top = 7 Width = 105 Height = 21 ReadOnly = True TabOrder = 2 OnBtnUpClick = KHNameBtnUpClick OnBtnDnClick = KHNameBtnDnClick end object JGLXR: TBtnEditC Tag = 2 Left = 909 Top = 35 Width = 109 Height = 21 Hint = 'JGLXR/'#21152#24037#32852#31995#20154 TabOrder = 3 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object JGLXFS: TBtnEditC Tag = 2 Left = 1133 Top = 35 Width = 109 Height = 21 Hint = 'JGLXFS/'#21152#24037#32852#31995#26041#24335 TabOrder = 4 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object JGDanWei: TBtnEditC Tag = 2 Left = 298 Top = 35 Width = 298 Height = 21 Hint = 'JGDanWei/'#21152#24037#21333#20301 ReadOnly = True TabOrder = 5 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object JGAdd: TBtnEditC Tag = 2 Left = 716 Top = 35 Width = 110 Height = 21 Hint = 'JGAdd/'#21152#24037#22320#28857 TabOrder = 6 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object GenDan: TBtnEditC Tag = 2 Left = 909 Top = 7 Width = 109 Height = 21 Hint = 'GenDan/'#36319#21333#21592 TabOrder = 7 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object YWY: TBtnEditC Tag = 2 Left = 716 Top = 7 Width = 110 Height = 21 Hint = 'YWY/'#19994#21153#21592 TabOrder = 8 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object SGYang: TMemo Tag = 2 Left = 104 Top = 145 Width = 1143 Height = 65 ScrollBars = ssVertical TabOrder = 9 end object JGtype: TBtnEditC Tag = 2 Left = 909 Top = 63 Width = 109 Height = 21 Hint = 'JGType/'#21152#24037#31867#22411 ReadOnly = True TabOrder = 10 Text = #26579#33394 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object SHName: TEdit Tag = 2 Left = 104 Top = 64 Width = 108 Height = 19 TabOrder = 12 Text = '0' end object SHAdd: TBtnEditC Tag = 2 Left = 298 Top = 63 Width = 298 Height = 21 Hint = 'SHAdd/'#25910#36135#22320#28857 TabOrder = 13 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object SHLXFS: TEdit Tag = 2 Left = 716 Top = 64 Width = 110 Height = 19 TabOrder = 14 Text = '0' end object GenDanLXR: TBtnEditC Tag = 2 Left = 1133 Top = 7 Width = 109 Height = 21 Hint = 'GenDanLXR/'#36319#21333#32852#31995#26041#24335 TabOrder = 15 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object GYNote: TBtnEditC Tag = 2 Left = 104 Top = 90 Width = 302 Height = 21 Hint = 'GYNote/'#24037#33402#35201#27714 TabOrder = 16 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object BZNote: TBtnEditC Tag = 2 Left = 489 Top = 90 Width = 337 Height = 21 Hint = 'BZNote/'#21253#35013#35201#27714 TabOrder = 17 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object ZLNote: TBtnEditC Tag = 2 Left = 910 Top = 90 Width = 334 Height = 21 Hint = 'ZLNote/'#36136#37327#35201#27714 TabOrder = 18 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object QtyNote: TBtnEditC Tag = 2 Left = 104 Top = 118 Width = 302 Height = 21 Hint = 'QtyNote/'#25968#37327#35201#27714 TabOrder = 19 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end object QTnote: TBtnEditC Tag = 2 Left = 489 Top = 118 Width = 337 Height = 21 Hint = 'QTnote/'#20854#20182#35201#27714 TabOrder = 20 OnBtnUpClick = OrdDefStr2BtnUpClick OnBtnDnClick = KHNameBtnDnClick end end object ToolBar2: TToolBar Left = 0 Top = 252 Width = 1303 Height = 29 ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_MYSC.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 12 OnClick = ToolButton1Click end object ToolButton2: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 13 OnClick = ToolButton2Click end object ToolButton3: TToolButton Left = 126 Top = 0 Caption = #19968#38190#26367#25442 ImageIndex = 102 OnClick = ToolButton3Click end object CYID: TEdit Tag = 2 Left = 209 Top = 0 Width = 295 Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnKeyPress = CYIDKeyPress end end object cxGrid1: TcxGrid Left = 0 Top = 281 Width = 1303 Height = 384 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> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1Qty 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 OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Inactive = DataLink_MYSC.SHuangSe Styles.IncSearch = DataLink_MYSC.SHuangSe Styles.Selection = DataLink_MYSC.SHuangSe Styles.Header = DataLink_MYSC.Default object v1XHNo: TcxGridDBColumn Caption = #24207#21495 DataBinding.FieldName = 'XHNo' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_MYSC.Default Width = 35 end object v1MLCode: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'MLCode' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1PRTCodePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object v1MLCodeName: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'MLCodeName' HeaderAlignmentHorz = taCenter Width = 83 end object v1MLColor: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'MLColor' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v1PRTColorPropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 82 end object v1MLColorNo: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'MLColorNo' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_MYSC.Default Width = 77 end object v1Qty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' HeaderAlignmentHorz = taCenter Styles.Header = DataLink_MYSC.Default Width = 82 end object v1QtyUnit: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1OrderUnitPropertiesButtonClick HeaderAlignmentHorz = taCenter Styles.Header = DataLink_MYSC.Default Width = 77 end object v1TrueSe: TcxGridDBColumn Caption = #30830#35748#33394 DataBinding.FieldName = 'TrueSe' HeaderAlignmentHorz = taCenter Width = 70 end object v1MXNote: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'MXNote' HeaderAlignmentHorz = taCenter Width = 293 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_MYSC.ADOLink LockType = ltReadOnly Parameters = <> Left = 1251 Top = 33 end object ADOCmd: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 1312 Top = 181 end object DataSource1: TDataSource DataSet = Order_Sub Left = 1252 Top = 94 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 1274 Top = 159 end object ADOQuery1: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 1256 Top = 125 end object CDS_CON: TClientDataSet Aggregates = <> Params = <> Left = 1276 Top = 191 end object DSCON: TDataSource DataSet = CDS_CON Left = 1309 Top = 147 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 1251 Top = 63 end object ADOQueryCmd: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 1288 Top = 121 end object ADOQueryTmp: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 1316 Top = 211 end object ADOQuery2: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 1292 Top = 85 end end