inherited frmTatFlawQuery: TfrmTatFlawQuery Left = 160 Top = 87 Caption = #30133#28857#20449#24687#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 = 103 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 TBKFMod: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #25187#20998#25968#20462#25913 ImageIndex = 3 OnClick = TBKFModClick end object TBExpSum: TToolButton Left = 178 Top = 0 AutoSize = True Caption = #27719#24635#23548#20986 ImageIndex = 20 OnClick = TBExpSumClick end object TBExpDet: TToolButton Left = 273 Top = 0 AutoSize = True Caption = #26126#32454#23548#20986 ImageIndex = 20 OnClick = TBExpDetClick end object TBSaveFmt: TToolButton Left = 368 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = TBSaveFmtClick end object TBClose: TToolButton Left = 463 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 = 329 Top = 15 Width = 52 Height = 12 Caption = #20135#21697#32534#21495 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 weaver_name: TEdit Tag = 2 Left = 594 Top = 10 Width = 110 Height = 20 Hint = '0' TabOrder = 0 OnKeyPress = weaver_nameKeyPress end object C_Code: TEdit Tag = 2 Left = 387 Top = 12 Width = 130 Height = 20 Hint = '0' TabOrder = 1 OnKeyPress = C_CodeKeyPress 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 ExplicitTop = 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 = TvSSumPoints 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 TvSweaver_name: TcxGridDBColumn Caption = #25377#36710#24037#21517#31216 DataBinding.FieldName = 'weaver_name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 160 end object TvSSumPoints: TcxGridDBColumn Caption = #25187#20998#24635#25968 DataBinding.FieldName = 'SumPoints' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end end object cxGridSLevel1: TcxGridLevel GridView = TvS end end object PanelS: TPanel Left = 0 Top = 0 Width = 1096 Height = 30 Align = alTop TabOrder = 1 ExplicitLeft = -3 ExplicitTop = -16 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 ExplicitTop = 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 = TvDpoints 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 TvDSSel: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 50 end object TvDFillTime: TcxGridDBColumn Caption = #26816#39564#26102#38388 DataBinding.FieldName = 'FillTime' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 140 end object TvDC_Code: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'C_Code' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end object TvDweaver_name: TcxGridDBColumn Caption = #25377#36710#24037#21517#31216 DataBinding.FieldName = 'weaver_name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object TvDpoints: TcxGridDBColumn Caption = #25187#20998#25968 DataBinding.FieldName = 'points' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object TvDCIFName: TcxGridDBColumn Caption = #30133#28857#21517#31216 DataBinding.FieldName = 'CIFName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 110 end object TvDFiller: TcxGridDBColumn Caption = #26816#39564#24037#21517#31216 DataBinding.FieldName = 'Filler' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end object Tvcarno: TcxGridDBColumn Caption = #26426#21488#21495 DataBinding.FieldName = 'carno' 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 = 110 end object TvDCIFID: TcxGridDBColumn Caption = #30133#28857'ID' DataBinding.FieldName = 'CIFID' DataBinding.IsNullValueType = True Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end end object cxGridDLevel1: TcxGridLevel GridView = TvD end end object PanelD: TPanel Left = 0 Top = 0 Width = 1096 Height = 30 Align = alTop TabOrder = 1 ExplicitTop = 482 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 ADOQueryCmd: TADOQuery [6] Connection = DataLink_TatInsp.ADOLink Parameters = <> Left = 200 Top = 296 end object ADOQueryTemp: TADOQuery [7] Connection = DataLink_TatInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 280 Top = 296 end object DS_S: TDataSource [8] DataSet = CDS_Sum Left = 680 Top = 324 end object DS_D: TDataSource [9] DataSet = CDS_Detail Left = 720 Top = 324 end object CDS_Sum: TClientDataSet [10] Aggregates = <> Params = <> Left = 616 Top = 360 end object CDS_Detail: TClientDataSet [11] Aggregates = <> Params = <> Left = 656 Top = 360 end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_TatInsp.ADOLink end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_TatInsp.ADOLink end end