object frmOrderSel: TfrmOrderSel Left = 17 Top = 12 Width = 1328 Height = 687 Caption = #29983#20135#25351#31034#21333#26032 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False WindowState = wsMaximized OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1312 AutoSize = True ButtonHeight = 30 ButtonWidth = 73 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] Images = DataLink_Contract.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 24 OnClick = TBRafreshClick end object ToolButton2: TToolButton Left = 77 Top = 0 Caption = #30830#23450 ImageIndex = 10 end object ToolButton1: TToolButton Left = 150 Top = 0 AutoSize = True Caption = #26597#30475 ImageIndex = 39 end object TBClose: TToolButton Left = 227 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 32 Width = 1312 Height = 78 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 305 Top = 14 Width = 72 Height = 17 Caption = #19979#21333#26085#26399 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 459 Top = 49 Width = 54 Height = 17 Caption = #25351#31034#21333 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 31 Top = 14 Width = 56 Height = 17 Caption = #23458' '#25143 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 31 Top = 49 Width = 54 Height = 17 Caption = #21512#21516#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 613 Top = 119 Width = 26 Height = 12 Caption = #20811#37325 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 239 Top = 49 Width = 72 Height = 17 Caption = #20135#21697#21517#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 525 Top = 88 Width = 52 Height = 12 Caption = #23457#26680#29366#24577 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object BegDate: TDateTimePicker Left = 378 Top = 10 Width = 123 Height = 25 Date = 40675.464742650460000000 Format = 'yyyy-MM-dd' Time = 40675.464742650460000000 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnChange = BegDateChange end object EndDate: TDateTimePicker Left = 500 Top = 10 Width = 123 Height = 25 Date = 40675.464761099540000000 Format = 'yyyy-MM-dd' Time = 40675.464761099540000000 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnChange = EndDateChange end object MLOrderNo: TEdit Tag = 2 Left = 515 Top = 45 Width = 108 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnChange = KHNameHZChange OnKeyPress = MLOrderNoKeyPress end object KHNameHZ: TEdit Tag = 2 Left = 90 Top = 10 Width = 207 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnChange = KHNameHZChange end object MLConNo: TEdit Tag = 2 Left = 90 Top = 44 Width = 116 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnChange = KHNameHZChange OnKeyPress = MLConNoKeyPress end object MPRTKZ: TEdit Tag = 2 Left = 654 Top = 99 Width = 56 Height = 20 TabOrder = 5 end object MLCodeName: TEdit Tag = 2 Left = 316 Top = 45 Width = 109 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnChange = KHNameHZChange OnKeyPress = MLCodeNameKeyPress end object status: TComboBox Tag = 2 Left = 581 Top = 87 Width = 103 Height = 20 ItemHeight = 12 TabOrder = 7 Visible = False Items.Strings = ( #26410#23457#26680 #24050#23457#26680 #24050#23436#25104 '') end end object Cxgrid1: TcxGrid Left = 0 Top = 110 Width = 1312 Height = 336 Align = alClient PopupMenu = PopupMenu1 TabOrder = 2 object Tv1: TcxGridDBTableView OnMouseDown = Tv1MouseDown NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1Column2 end item Kind = skCount Column = v1OrdDate end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Content = cxStyle1 Styles.Inactive = cxStyle1 Styles.IncSearch = cxStyle1 Styles.Selection = cxStyle1 Styles.Header = cxStyle1 object v1Ssel: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'Ssel' PropertiesClassName = 'TcxCheckBoxProperties' HeaderAlignmentHorz = taCenter Width = 83 end object v1OrdDate: TcxGridDBColumn Caption = #19979#21333#26085#26399 DataBinding.FieldName = 'OrdDate' PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False SortIndex = 0 SortOrder = soAscending Width = 175 end object v1MLOrderNo: TcxGridDBColumn Caption = #25351#31034#21333#21495 DataBinding.FieldName = 'MLOrderNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 198 end object v1MLConNo: TcxGridDBColumn Caption = #21512#21516#21495 DataBinding.FieldName = 'MLConNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 141 end object v1MLCodeName: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'MLCodeName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 225 end object v1KHName: TcxGridDBColumn Caption = #23458#25143 DataBinding.FieldName = 'KHNameJC' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 211 end object v1Column2: TcxGridDBColumn Caption = #24635#25968#37327 DataBinding.FieldName = 'ZQty' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end end object Cxgrid1Level1: TcxGridLevel GridView = Tv1 end end object cxSplitter1: TcxSplitter Left = 0 Top = 446 Width = 1312 Height = 8 HotZoneClassName = 'TcxMediaPlayer9Style' AlignSplitter = salBottom Control = Panel2 end object Panel2: TPanel Left = 0 Top = 454 Width = 1312 Height = 195 Align = alBottom BevelOuter = bvNone TabOrder = 4 object cxGrid2: TcxGrid Left = 0 Top = 0 Width = 1312 Height = 195 Align = alClient TabOrder = 0 object Tv2: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource2 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 OptionsData.Editing = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Content = cxStyle1 Styles.Inactive = cxStyle1 Styles.IncSearch = cxStyle1 Styles.Selection = cxStyle1 Styles.Header = cxStyle1 object v1XHNo: TcxGridDBColumn Caption = #24207#21495 DataBinding.FieldName = 'XHNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 50 end object v1MLColor: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'MLColor' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 140 end object v1MLColorNo: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'MLColorNo' HeaderAlignmentHorz = taCenter Width = 144 end object v1MLHX: TcxGridDBColumn Caption = #33457#22411 DataBinding.FieldName = 'MLHX' HeaderAlignmentHorz = taCenter Width = 137 end object v1Qty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' HeaderAlignmentHorz = taCenter Width = 100 end object v1QtyUnit: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 175 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end end object cxGridPopupMenu1: TcxGridPopupMenu Grid = Cxgrid1 PopupMenus = <> Left = 493 Top = 181 end object ADOQueryCmd: TADOQuery Connection = DataLink_Contract.ADOLink Parameters = <> Left = 425 Top = 188 end object ADOQueryMain: TADOQuery Connection = DataLink_Contract.ADOLink LockType = ltReadOnly Parameters = <> Left = 337 Top = 180 end object ADOQueryTemp: TADOQuery Connection = DataLink_Contract.ADOLink LockType = ltReadOnly Parameters = <> Left = 304 Top = 179 end object DataSource1: TDataSource DataSet = Order_Main Left = 397 Top = 181 end object Order_Main: TClientDataSet Aggregates = <> Params = <> Left = 461 Top = 180 end object PopupMenu1: TPopupMenu Left = 366 Top = 179 object N2: TMenuItem Caption = #20840#36873 end object N1: TMenuItem Caption = #20840#24323 end end object ADOQuerySub: TADOQuery Connection = DataLink_Contract.ADOLink Parameters = <> Left = 296 Top = 541 end object DataSource2: TDataSource DataSet = ADOQuerySub Left = 326 Top = 541 end object cxStyleRepository1: TcxStyleRepository Left = 668 Top = 60 object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] end end end