object frmYMTRKInPut: TfrmYMTRKInPut Left = 465 Top = 477 Width = 1876 Height = 623 Align = alClient Caption = #22238#20179#20837#24211 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object cxGrid2: TcxGrid Left = 0 Top = 33 Width = 1609 Height = 559 Align = alClient TabOrder = 0 object Tv1: TcxGridDBTableView OnMouseDown = Tv1MouseDown Navigator.Buttons.CustomButtons = <> DataController.DataSource = DataSource3 DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skCount end item Kind = skSum end item Kind = skSum Column = v2Column6 end item Kind = skSum end item Kind = skSum Column = Tv1PiQty end item Kind = skCount Column = v1Column6 end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Inactive = DataLink_YXYMT.SHuangSe Styles.IncSearch = DataLink_YXYMT.SHuangSe Styles.Selection = DataLink_YXYMT.SHuangSe Styles.Header = DataLink_YXYMT.Default object v1Column6: TcxGridDBColumn Caption = #20837#24211#21333#21495 DataBinding.FieldName = 'SPID' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 83 end object v1Column2: TcxGridDBColumn Tag = 2 Caption = #20837#24211#26102#38388 DataBinding.FieldName = 'CRTime' PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False HeaderAlignmentHorz = taCenter Width = 100 end object v1Column4: TcxGridDBColumn Tag = 2 Caption = #20837#24211#31867#22411 DataBinding.FieldName = 'CRType' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #21152#24037#23436#25104 #22238#20462#23436#25104 #26816#39564#36864#22238 #26399#21021#20837#24211 #23458#25143#36864#36135 #37319#36141#20837#24211 #27425#21697#20837#24211) HeaderAlignmentHorz = taCenter Width = 83 end object Tv1CustomerNo: TcxGridDBColumn Caption = #23458#25143#32534#21495 DataBinding.FieldName = 'CustomerNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 90 end object v1Column21: TcxGridDBColumn Tag = 2 Caption = #23458#25143 DataBinding.FieldName = 'CustomerNoName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column21PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 76 end object v1Column20: TcxGridDBColumn Tag = 2 Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'spcode' HeaderAlignmentHorz = taCenter end object v2Column1: TcxGridDBColumn Tag = 2 Caption = #21697#21517 DataBinding.FieldName = 'SPName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 97 end object v1Column8: TcxGridDBColumn Tag = 2 Caption = #35268#26684 DataBinding.FieldName = 'SPSpec' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 65 end object v1Column15: TcxGridDBColumn Tag = 2 Caption = #39068#33394 DataBinding.FieldName = 'SPColor' HeaderAlignmentHorz = taCenter Width = 69 end object v1Column17: TcxGridDBColumn Tag = 2 Caption = #33457#22411 DataBinding.FieldName = 'SPHX' HeaderAlignmentHorz = taCenter Width = 70 end object Tv1FactoryNo: TcxGridDBColumn Caption = #20379#24212#21830#32534#21495 DataBinding.FieldName = 'FactoryNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 90 end object v1Column14: TcxGridDBColumn Tag = 2 Caption = #20379#24212#21830 DataBinding.FieldName = 'FactoryName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column14PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 101 end object Tv1GangNo: TcxGridDBColumn Tag = 2 Caption = #32568#21495 DataBinding.FieldName = 'GangNo' HeaderAlignmentHorz = taCenter Width = 74 end object v1Column7: TcxGridDBColumn Tag = 2 Caption = #25104#20998 DataBinding.FieldName = 'SPCF' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 73 end object Tv1Column1: TcxGridDBColumn Tag = 2 Caption = #24037#33402 DataBinding.FieldName = 'GYLXName' HeaderAlignmentHorz = taCenter Width = 77 end object v1Column1: TcxGridDBColumn Tag = 2 Caption = #38376#24133 DataBinding.FieldName = 'SPMF' HeaderAlignmentHorz = taCenter Width = 73 end object v1Column10: TcxGridDBColumn Tag = 2 Caption = #20811#37325 DataBinding.FieldName = 'SPKZ' HeaderAlignmentHorz = taCenter Width = 90 end object v1Column11: TcxGridDBColumn Tag = 2 Caption = #23384#25918#24037#21378 DataBinding.FieldName = 'ToFactoryName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column11PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 84 end object v1Column18: TcxGridDBColumn Tag = 2 Caption = #24211#20301 DataBinding.FieldName = 'KuWei' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column18PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 77 end object Tv1PiQty: TcxGridDBColumn Tag = 2 Caption = #21305#25968 DataBinding.FieldName = 'PiQty' PropertiesClassName = 'TcxCurrencyEditProperties' Properties.DecimalPlaces = 0 Properties.DisplayFormat = '0;' Properties.OnEditValueChanged = Tv1PiQtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 67 end object v2Column6: TcxGridDBColumn Tag = 2 Caption = #25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxCurrencyEditProperties' Properties.DisplayFormat = '0.00;' Properties.OnEditValueChanged = Tv1PricePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 85 end object Tv1Column2: TcxGridDBColumn Tag = 2 Caption = #30721#23610 DataBinding.FieldName = 'Yardwand' PropertiesClassName = 'TcxCurrencyEditProperties' Properties.DecimalPlaces = 0 Properties.DisplayFormat = '0' Properties.OnEditValueChanged = Tv1PricePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 60 end object Tv1Column4: TcxGridDBColumn Caption = #23454#38469#31859#25968 DataBinding.FieldName = 'FactMQty' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object v1Column3: TcxGridDBColumn Tag = 2 Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'Kg' 'M' 'Y') HeaderAlignmentHorz = taCenter Width = 77 end object Tv1Column3: TcxGridDBColumn Tag = 2 Caption = #37325#37327 DataBinding.FieldName = 'KGQty' PropertiesClassName = 'TcxCurrencyEditProperties' Properties.DisplayFormat = '0.00;' Properties.OnEditValueChanged = Tv1PricePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 80 end object v1Column12: TcxGridDBColumn Tag = 2 Caption = #22791#27880 DataBinding.FieldName = 'Note' HeaderAlignmentHorz = taCenter Width = 79 end object Tv1PriceType: TcxGridDBColumn Tag = 2 Caption = #35745#20215#26041#24335 DataBinding.FieldName = 'PriceType' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #31859 #20844#26020) Properties.OnEditValueChanged = Tv1PriceTypePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 70 end object Tv1IsTax: TcxGridDBColumn Tag = 2 Caption = #31246#20917 DataBinding.FieldName = 'IsTax' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #21547#31246 #19981#21547#31246) HeaderAlignmentHorz = taCenter Width = 70 end object Tv1Money: TcxGridDBColumn Tag = 2 Caption = #24635#37329#39069 DataBinding.FieldName = 'Money' HeaderAlignmentHorz = taCenter Width = 70 end object Tv1Price: TcxGridDBColumn Tag = 2 Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxCurrencyEditProperties' Properties.DisplayFormat = '0.00;' Properties.OnEditValueChanged = Tv1PricePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 70 end end object cxGrid2Level1: TcxGridLevel GridView = Tv1 end end object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1868 Height = 33 ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_YXYMT.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 1 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 15 OnClick = TBSaveClick end object TBAdd: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 12 OnClick = TBAddClick end object TBDel: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 13 OnClick = TBDelClick end object ToolButton2: TToolButton Left = 189 Top = 0 Caption = #19968#38190#26367#25442 ImageIndex = 22 OnClick = ToolButton2Click end object TBClose: TToolButton Left = 272 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel4: TPanel Left = 736 Top = 128 Width = 225 Height = 217 TabOrder = 2 Visible = False object Label14: TLabel Left = 48 Top = 88 Width = 6 Height = 12 end object Panel10: TPanel Left = 1 Top = 1 Width = 223 Height = 23 Align = alTop Alignment = taLeftJustify BevelOuter = bvNone Caption = #25253#34920#21517#31216 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 object Image2: TImage Left = 193 Top = 3 Width = 22 Height = 16 ParentShowHint = False Picture.Data = { 07544269746D617076040000424D760400000000000036000000280000001500 0000110000000100180000000000400400000000000000000000000000000000 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FF00FFFFFFFFFFFFF0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6 F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFF404040404040404040404040404040404040404040404040 404040404040404040404040404040404040404040404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFF808080808080808080808080808080808080808080 808080808080808080808080808080808080808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4 C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4 C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4 C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4 C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000 000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4 C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4 C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4 C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4 C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FF00} ShowHint = True Transparent = True OnClick = Image2Click end end object Button1: TButton Left = 29 Top = 180 Width = 75 Height = 25 Caption = #20840#36873 TabOrder = 1 OnClick = Button1Click end object GroupBox1: TGroupBox Left = 24 Top = 56 Width = 177 Height = 121 Caption = #26367#25442#23383#27573 TabOrder = 2 object CheckBox1: TCheckBox Left = 11 Top = 16 Width = 73 Height = 17 Caption = #20837#24211#31867#22411 TabOrder = 0 end object CheckBox2: TCheckBox Left = 11 Top = 36 Width = 73 Height = 17 Caption = #21152' '#24037' '#21378 TabOrder = 1 end object CheckBox3: TCheckBox Left = 11 Top = 56 Width = 73 Height = 17 Caption = #26579#21378#32568#21495 TabOrder = 2 end object CheckBox4: TCheckBox Left = 11 Top = 76 Width = 73 Height = 17 Caption = #23384#25918#24037#21378 TabOrder = 3 end object CheckBox5: TCheckBox Left = 11 Top = 96 Width = 73 Height = 17 Caption = #24211' '#20301 TabOrder = 4 end object CheckBox6: TCheckBox Left = 99 Top = 17 Width = 73 Height = 17 Caption = #21305' '#25968 TabOrder = 5 end object CheckBox7: TCheckBox Left = 99 Top = 37 Width = 73 Height = 17 Caption = #25968' '#37327 TabOrder = 6 end object CheckBox8: TCheckBox Left = 99 Top = 57 Width = 73 Height = 17 Caption = #25968#37327#21333#20301 TabOrder = 7 end object CheckBox9: TCheckBox Left = 99 Top = 77 Width = 73 Height = 17 Caption = #22791' '#27880 TabOrder = 8 end end object Button2: TButton Left = 133 Top = 180 Width = 75 Height = 25 Caption = #30830#23450 TabOrder = 3 OnClick = Button2Click end end object Panel2: TPanel Left = 1609 Top = 33 Width = 259 Height = 559 Align = alRight Caption = 'Panel2' TabOrder = 3 object cxGrid1: TcxGrid Left = 1 Top = 71 Width = 257 Height = 487 Align = alClient TabOrder = 0 object TvMX: TcxGridDBTableView OnKeyDown = TvMXKeyDown Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False OnEditKeyDown = TvMXEditKeyDown DataController.DataSource = DS_MX DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Kind = skCount Position = spFooter end item Kind = skSum Position = spFooter Column = TvMXMXQty end item Kind = skCount end item Kind = skSum Column = TvMXMXQty end> DataController.Summary.FooterSummaryItems = < item Kind = skCount end item Kind = skSum Column = TvMXMXQty end item Kind = skSum Column = TvMXColumn1 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.AlwaysShowEditor = True OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True OptionsView.IndicatorWidth = 33 OnCustomDrawIndicatorCell = TvMXCustomDrawIndicatorCell object TvMXMXID: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'MXID' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 99 end object TvMXMXQty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'MQty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 60 end object TvMXColumn1: TcxGridDBColumn Caption = #37325#37327 DataBinding.FieldName = 'KGQty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 60 end end object cxGridLevel2: TcxGridLevel GridView = TvMX end end object Panel3: TPanel Left = 1 Top = 1 Width = 257 Height = 41 Align = alTop TabOrder = 1 object Label17: TLabel Left = 6 Top = 12 Width = 36 Height = 12 Caption = #22686#34892#25968 Layout = tlCenter end object AddNum: TEdit Left = 47 Top = 10 Width = 41 Height = 20 TabOrder = 0 OnKeyPress = AddNumKeyPress end object BtnQuicklyAdd: TButton Left = 98 Top = 4 Width = 75 Height = 30 Caption = #24555#36895#22686#34892 TabOrder = 1 OnClick = BtnQuicklyAddClick end end object ToolBar2: TToolBar Left = 1 Top = 42 Width = 257 Height = 29 ButtonHeight = 30 ButtonWidth = 71 Caption = 'ToolBar2' Images = DataLink_YXYMT.ThreeImgList List = True ShowCaptions = True TabOrder = 2 object TbAddRow: TToolButton Left = 0 Top = 2 AutoSize = True Caption = #22686#21333#34892 ImageIndex = 12 OnClick = TbAddRowClick end object TbDeleteRow: TToolButton Left = 75 Top = 2 AutoSize = True Caption = #21024#34892 ImageIndex = 13 OnClick = TbDeleteRowClick end end end object DataSource3: TDataSource DataSet = CDS_Sub Left = 504 Top = 136 end object CDS_Sub: TClientDataSet Aggregates = <> Params = <> Left = 472 Top = 136 end object ADOQueryCmd: TADOQuery Connection = DataLink_YXYMT.ADOLink Parameters = <> Left = 344 Top = 136 end object ADOQueryMain: TADOQuery Connection = DataLink_YXYMT.ADOLink LockType = ltReadOnly Parameters = <> Left = 376 Top = 136 end object ADOQueryTemp: TADOQuery Connection = DataLink_YXYMT.ADOLink LockType = ltReadOnly Parameters = <> Left = 408 Top = 136 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 440 Top = 136 end object CDS_MX: TClientDataSet Aggregates = <> Params = <> Left = 1136 Top = 288 end object DS_MX: TDataSource DataSet = CDS_MX Left = 1170 Top = 287 end object http: TIdHTTP MaxLineAction = maException ReadTimeout = 0 AllowCookies = True ProxyParams.BasicAuthentication = False ProxyParams.ProxyPort = 0 Request.ContentLength = -1 Request.ContentRangeEnd = 0 Request.ContentRangeStart = 0 Request.ContentType = 'text/html' Request.Accept = 'text/html, */*' Request.BasicAuthentication = False Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)' HTTPOptions = [hoForceEncodeParams] Left = 532 Top = 320 end end