inherited frmTatKnitterQuery: TfrmTatKnitterQuery Left = 160 Top = 87 Caption = #25377#36710#24037#20135#37327#26597#35810 ClientHeight = 620 ClientWidth = 1100 FormStyle = fsMDIChild Position = poScreenCenter Visible = True ExplicitWidth = 1116 ExplicitHeight = 659 PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1100 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 91 Caption = 'ToolBar1' Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TatInsp.ImageList_new32 List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 1 OnClick = TBRafreshClick end object TBExpSum: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #27719#24635#23548#20986 ImageIndex = 20 OnClick = TBExpSumClick end object TBExpDet: TToolButton Left = 166 Top = 0 AutoSize = True Caption = #26126#32454#23548#20986 ImageIndex = 20 OnClick = TBExpDetClick end object TBSaveFmt: TToolButton Left = 261 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = TBSaveFmtClick end object TBClose: TToolButton Left = 356 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object Panel1: TPanel [1] Left = 0 Top = 38 Width = 1100 Height = 46 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = 16242829 ParentBackground = False TabOrder = 1 object Label1: TLabel Left = 523 Top = 15 Width = 65 Height = 12 Caption = #25377#36710#24037#21517#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 353 Top = 15 Width = 26 Height = 12 Caption = #21697#21517 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 204 Top = 16 Width = 13 Height = 12 Caption = #33267 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object knitter: TEdit Tag = 2 Left = 594 Top = 10 Width = 110 Height = 20 Hint = '0' TabOrder = 0 OnKeyPress = knitterKeyPress end object C_Name: TEdit Tag = 2 Left = 387 Top = 12 Width = 130 Height = 20 Hint = '0' TabOrder = 1 OnKeyPress = C_NameKeyPress end object IsJYTime: TCheckBox Left = 12 Top = 15 Width = 90 Height = 17 Caption = #25353#26816#39564#26102#38388 Checked = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False State = cbChecked TabOrder = 2 end object BegDate: TDateTimePicker Left = 108 Top = 12 Width = 90 Height = 22 Date = 44774.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.464742650459811600 TabOrder = 3 end object EndDate: TDateTimePicker Left = 223 Top = 12 Width = 90 Height = 22 Date = 44774.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.464742650459811600 TabOrder = 4 end end object cxPageControl1: TcxPageControl [2] Left = 0 Top = 84 Width = 1100 Height = 536 Align = alClient TabOrder = 2 Properties.ActivePage = TabDet Properties.CustomButtons.Buttons = <> ClientRectBottom = 534 ClientRectLeft = 2 ClientRectRight = 1098 ClientRectTop = 22 object TabSum: TcxTabSheet Caption = #27719#24635#39029 ImageIndex = 0 object cxGridS: TcxGrid Left = 0 Top = 30 Width = 1096 Height = 482 Align = alClient BorderStyle = cxcbsNone Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object TvS: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DS_S DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = TvSSumQty end item Kind = skSum Column = TvSRollCount end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.IndicatorWidth = 30 Styles.IncSearch = DataLink_TatInsp.SHuangSe Styles.Footer = DataLink_TatInsp.Default Styles.Header = DataLink_TatInsp.Default Styles.Inactive = DataLink_TatInsp.SHuangSe Styles.Selection = DataLink_TatInsp.SHuangSe OnCustomDrawIndicatorCell = TvSCustomDrawIndicatorCell object TvSknitter: TcxGridDBColumn Caption = #25377#36710#24037#21517#31216 DataBinding.FieldName = 'knitter' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 160 end object TvSC_Name: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'C_Name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 160 end object TvSSumQty: TcxGridDBColumn Caption = #20135#37327 DataBinding.FieldName = 'SumQty' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object TvSRollCount: TcxGridDBColumn Caption = #21367#25968 DataBinding.FieldName = 'RollCount' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end end object cxGridSLevel1: TcxGridLevel GridView = TvS end end object PanelS: TPanel Left = 0 Top = 0 Width = 1096 Height = 30 Align = alTop TabOrder = 1 object LabelS1: TLabel Left = 10 Top = 8 Width = 78 Height = 12 Caption = #27599#39029#35760#24405#26465#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object LBCPAPS: TLabel Left = 310 Top = 8 Width = 85 Height = 12 Caption = #24403#21069#39029'/'#24635#39029#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object TCBNORS: TComboBox Tag = 2 Left = 95 Top = 5 Width = 78 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ItemIndex = 0 ParentFont = False TabOrder = 0 Text = '500' OnChange = TCBNORSChange Items.Strings = ( '500' '1000' '5000' '10000') end object BTLPS: TButton Left = 200 Top = 4 Width = 60 Height = 22 Caption = #19978#19968#39029 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = BTLPSClick end object BTNPS: TButton Left = 400 Top = 4 Width = 60 Height = 22 Caption = #19979#19968#39029 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = BTNPSClick end end end object TabDet: TcxTabSheet Caption = #26126#32454#39029 ImageIndex = 1 object cxGridD: TcxGrid Left = 0 Top = 30 Width = 1096 Height = 482 Align = alClient BorderStyle = cxcbsNone Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object TvD: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DS_D DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = TvDqty end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.IndicatorWidth = 30 Styles.IncSearch = DataLink_TatInsp.SHuangSe Styles.Footer = DataLink_TatInsp.Default Styles.Header = DataLink_TatInsp.Default Styles.Inactive = DataLink_TatInsp.SHuangSe Styles.Selection = DataLink_TatInsp.SHuangSe OnCustomDrawIndicatorCell = TvDCustomDrawIndicatorCell object TvDFillTime: TcxGridDBColumn Caption = #26816#39564#26102#38388 DataBinding.FieldName = 'FillTime' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 140 end object TvDCARNO: TcxGridDBColumn Caption = #19979#24067#26426#21488#21495 DataBinding.FieldName = 'CARNO' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 110 end object TvDknitter: TcxGridDBColumn Caption = #25377#36710#24037#21517#31216 DataBinding.FieldName = 'knitter' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 130 end object TvDC_Name: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'C_Name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 150 end object TvDqty: TcxGridDBColumn Caption = #20135#37327 DataBinding.FieldName = 'qty' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 90 end object TvDCIID: TcxGridDBColumn Caption = #21367#26465#30721 DataBinding.FieldName = 'CIID' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end end object cxGridDLevel1: TcxGridLevel GridView = TvD end end object PanelD: TPanel Left = 0 Top = 0 Width = 1096 Height = 30 Align = alTop TabOrder = 1 object LabelD1: TLabel Left = 10 Top = 8 Width = 78 Height = 12 Caption = #27599#39029#35760#24405#26465#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object LBCPAPD: TLabel Left = 310 Top = 8 Width = 85 Height = 12 Caption = #24403#21069#39029'/'#24635#39029#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object TCBNORD: TComboBox Tag = 2 Left = 95 Top = 5 Width = 78 Height = 20 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ItemIndex = 0 ParentFont = False TabOrder = 0 Text = '500' OnChange = TCBNORDChange Items.Strings = ( '500' '1000' '5000' '10000') end object BTLPD: TButton Left = 200 Top = 4 Width = 60 Height = 22 Caption = #19978#19968#39029 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = BTLPDClick end object BNTPD: TButton Left = 400 Top = 4 Width = 60 Height = 22 Caption = #19979#19968#39029 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = BNTPDClick end end end end object MovePanel2: TMovePanel [3] Left = 592 Top = 216 Width = 289 Height = 49 BevelInner = bvLowered Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#8230#8230 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 Visible = False end object ADOQSum: TADOQuery [4] Connection = DataLink_TatInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 40 Top = 296 end object ADOQDetail: TADOQuery [5] Connection = DataLink_TatInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 120 Top = 296 end object ADOQueryTemp: TADOQuery [6] Connection = DataLink_TatInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 280 Top = 296 end object DS_S: TDataSource [7] DataSet = CDS_Sum Left = 680 Top = 324 end object DS_D: TDataSource [8] DataSet = CDS_Detail Left = 720 Top = 324 end object CDS_Sum: TClientDataSet [9] Aggregates = <> Params = <> Left = 616 Top = 360 end object CDS_Detail: TClientDataSet [10] Aggregates = <> Params = <> Left = 656 Top = 360 end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_TatInsp.ADOLink end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_TatInsp.ADOLink end end