object frmDYSQInPut: TfrmDYSQInPut Left = 235 Top = 76 Width = 1268 Height = 683 Caption = #35843#26679#30003#35831#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1252 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_ShipmentRequest.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 = 1252 Height = 95 Align = alTop BevelInner = bvNone BevelOuter = bvNone Color = clBtnFace Ctl3D = False ParentColor = False ParentCtl3D = False TabOrder = 1 object Label14: TLabel Left = 31 Top = 13 Width = 67 Height = 12 Caption = #23458' '#25143#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 688 Top = 45 Width = 65 Height = 12 Caption = #20986#24211#31867#22411#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label12: TLabel Left = 31 Top = 69 Width = 67 Height = 12 Caption = #22791' '#27880#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 873 Top = 18 Width = 65 Height = 12 Caption = #25910#36135#21333#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object lbl2: TLabel Left = 456 Top = 15 Width = 65 Height = 12 Caption = #30003#35831#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 257 Top = 15 Width = 52 Height = 12 Caption = #25805#20316#21592#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 900 Top = 45 Width = 65 Height = 12 Caption = #38144#21806#31867#22411#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label16: TLabel Left = 36 Top = 39 Width = 65 Height = 12 Caption = #25968#37327#21333#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label28: TLabel Left = 244 Top = 38 Width = 65 Height = 12 Caption = #30721#21333#25260#22836#65306 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object CRType: TComboBox Tag = 1 Left = 750 Top = 42 Width = 136 Height = 20 Style = csDropDownList ItemHeight = 12 ItemIndex = 0 TabOrder = 0 Text = #38144#21806#20986#24211 Visible = False Items.Strings = ( #38144#21806#20986#24211) end object Note: TEdit Tag = 1 Left = 96 Top = 67 Width = 560 Height = 18 TabOrder = 2 end object SHDanWei: TBtnEditC Tag = 1 Left = 936 Top = 15 Width = 138 Height = 20 TabOrder = 1 Visible = False OnBtnUpClick = SHDanWeiBtnUpClick OnBtnDnClick = SHDanWeiBtnDnClick end object CustomerNoName: TBtnEditA Tag = 1 Left = 96 Top = 10 Width = 139 Height = 20 ReadOnly = True TabOrder = 3 OnBtnClick = CustomerNoNameBtnClick end object DLYDATE: TDateTimePicker Tag = 1 Left = 520 Top = 10 Width = 110 Height = 20 Date = 40675.464761099540000000 Format = 'yyyy-MM-dd' Time = 40675.464761099540000000 TabOrder = 4 end object XSType: TComboBox Tag = 1 Left = 964 Top = 42 Width = 134 Height = 20 Style = csDropDownList ItemHeight = 12 TabOrder = 5 Visible = False Items.Strings = ( #20869#38144 #22806#38144) end object filler: TEdit Tag = 1 Left = 306 Top = 12 Width = 137 Height = 18 ReadOnly = True TabOrder = 6 end object HZUnit: TBtnEditC Tag = 1 Left = 97 Top = 35 Width = 136 Height = 20 Hint = 'Salesman/'#19994#21153#21592 TabOrder = 7 Text = 'M' OnBtnUpClick = HZUnitBtnUpClick OnBtnDnClick = HZUnitBtnDnClick end object MDTT: TComboBox Tag = 1 Left = 306 Top = 35 Width = 136 Height = 20 Style = csDropDownList ItemHeight = 12 TabOrder = 8 Items.Strings = ( #32461#20852#23431#23578 #27993#27743#23431#31908) end end object ToolBar2: TToolBar Left = 0 Top = 124 Width = 1252 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_ShipmentRequest.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 57 OnClick = ToolButton1Click end object ToolButton2: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 113 OnClick = ToolButton2Click end end object cxGrid1: TcxGrid Left = 0 Top = 153 Width = 1252 Height = 491 Align = alClient TabOrder = 3 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Content = DataLink_ShipmentRequest.Default Styles.Inactive = DataLink_ShipmentRequest.SHuangSe Styles.IncSearch = DataLink_ShipmentRequest.SHuangSe Styles.Selection = DataLink_ShipmentRequest.SHuangSe Styles.Header = DataLink_ShipmentRequest.Default object v1Column2: TcxGridDBColumn Caption = #35745#21010#21333#21495 DataBinding.FieldName = 'SCConNo' Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 144 end object v1Column5: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'SPrtCode' HeaderAlignmentHorz = taCenter Width = 80 end object v1Column6: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'SPrtCodeName' HeaderAlignmentHorz = taCenter Width = 71 end object Tv1Column2: TcxGridDBColumn Caption = #21367#26465#30721 DataBinding.FieldName = 'MJID' HeaderAlignmentHorz = taCenter Width = 90 end object Tv1Column1: TcxGridDBColumn Caption = #32568#21495 DataBinding.FieldName = 'gangno' HeaderAlignmentHorz = taCenter Width = 71 end object v1Column1: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'PRTColor' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 83 end object cv1Column3: TcxGridDBColumn Caption = #30003#35831#25968#37327 DataBinding.FieldName = 'sqqty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cv1Column3PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 86 end object v1Column3: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'orderUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( #31859 #20844#26020) HeaderAlignmentHorz = taCenter Width = 81 end object Tv1Column6: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'PRICE' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = Tv1Column6PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 71 end object Tv1Column7: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'MONEY' HeaderAlignmentHorz = taCenter Width = 67 end object Tv1Column3: TcxGridDBColumn Caption = #24211#20301 DataBinding.FieldName = 'CANGWEI' HeaderAlignmentHorz = taCenter Width = 74 end object Tv1Column4: TcxGridDBColumn Caption = #26159#21542#24320#21305 DataBinding.FieldName = 'SFKP' PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( #21542 #26159) HeaderAlignmentHorz = taCenter Width = 81 end object Tv1Column5: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'mxnote' HeaderAlignmentHorz = taCenter Width = 102 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_ShipmentRequest.ADOLink LockType = ltReadOnly Parameters = <> Left = 520 Top = 1 end object ADOCmd: TADOQuery Connection = DataLink_ShipmentRequest.ADOLink Parameters = <> Left = 488 Top = 1 end object DataSource1: TDataSource DataSet = Order_Sub Left = 644 Top = 268 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 588 Top = 268 end object ADOQuery1: TADOQuery Connection = DataLink_ShipmentRequest.ADOLink Parameters = <> Left = 460 Top = 1 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 528 Top = 268 end object cxStyleRepository1: TcxStyleRepository Left = 552 PixelsPerInch = 96 object dazi1: TcxStyle AssignedValues = [svColor] Color = clRed end end end