object frmWireInspection: TfrmWireInspection Left = 121 Top = 22 Width = 1322 Height = 902 Caption = #25289#19997#19979#26426 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poDefault OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 120 TextHeight = 15 object Panel7: TPanel Left = 0 Top = 111 Width = 451 Height = 725 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object OrdNote: TRichEdit Left = 2 Top = 2 Width = 447 Height = 302 Align = alTop Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -23 Font.Name = #23435#20307 Font.Style = [fsBold] ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ParentFont = False ScrollBars = ssVertical TabOrder = 0 end object Panel2: TPanel Left = 2 Top = 304 Width = 447 Height = 419 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object Label5: TLabel Left = 21 Top = 284 Width = 52 Height = 28 Caption = #39063#37325 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -25 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 21 Top = 93 Width = 52 Height = 28 Caption = #31665#21495 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -25 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 21 Top = 224 Width = 52 Height = 28 Caption = #32440#31665 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -25 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 21 Top = 163 Width = 52 Height = 28 Caption = #32440#31649 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -25 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label7: TLabel Left = 21 Top = 344 Width = 52 Height = 28 Caption = #39063#25968 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -25 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label8: TLabel Left = 21 Top = 33 Width = 52 Height = 28 Caption = #32433#26550 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -25 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object JYGW: TEdit Left = 76 Top = 273 Width = 250 Height = 48 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -40 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = KSClick OnKeyPress = MJstr3KeyPress end object BTPrint: TButton Left = 139 Top = 453 Width = 100 Height = 56 Caption = #25552#20132 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -25 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = BTPrintClick end object XNO: TEdit Left = 76 Top = 81 Width = 250 Height = 48 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -40 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 end object Button6: TButton Left = 330 Top = 275 Width = 69 Height = 46 Caption = #36873#25321 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -22 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 3 Visible = False end object ZXZL: TEdit Left = 76 Top = 213 Width = 250 Height = 48 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -40 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnClick = KSClick OnKeyPress = MJstr3KeyPress end object ZGZL: TEdit Left = 76 Top = 151 Width = 250 Height = 48 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -40 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 OnClick = KSClick OnKeyPress = MJstr3KeyPress end object Button1: TButton Left = 340 Top = 93 Width = 69 Height = 46 Caption = #21462#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -22 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 6 OnClick = Button1Click end object KS: TEdit Left = 76 Top = 333 Width = 250 Height = 48 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -40 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 7 OnClick = KSClick OnKeyPress = MJstr3KeyPress end object YRNo: TEdit Left = 76 Top = 21 Width = 165 Height = 48 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -40 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 8 end object Button3: TButton Left = 340 Top = 24 Width = 69 Height = 46 Caption = #36873#25321 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -22 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 9 end object YRWeight: TEdit Left = 246 Top = 21 Width = 75 Height = 48 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -40 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 10 end end end object Panel5: TPanel Left = 0 Top = 0 Width = 1319 Height = 41 Align = alTop TabOrder = 0 object ToolBar1: TToolBar Left = 1 Top = 1 Width = 1317 Height = 30 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clSkyBlue EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_YarnTexturing.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 0 end object TBClose: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end end object cxGrid3: TcxGrid Left = 451 Top = 111 Width = 868 Height = 703 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 3 object Tv3: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> DataController.DataSource = DS_MJID DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsSelection.CellSelect = False OptionsView.Footer = True OptionsView.GroupByBox = False object cxGridDBColumn1: TcxGridDBColumn Caption = #26465#30721#21495 DataBinding.FieldName = 'JYID' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 114 end object v3Column3: TcxGridDBColumn Caption = #26495#21495 DataBinding.FieldName = 'BNO' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 78 end object v3Column1: TcxGridDBColumn Caption = #31665#21495 DataBinding.FieldName = 'XNO' HeaderAlignmentHorz = taCenter Width = 68 end object v3Column2: TcxGridDBColumn Caption = #39063#37325 DataBinding.FieldName = 'JYGW' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 95 end object v3Column4: TcxGridDBColumn Caption = #32433#26550#21495 DataBinding.FieldName = 'YRNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v3Column5: TcxGridDBColumn Caption = #32433#26550#37325 DataBinding.FieldName = 'YRWeight' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v3Column6: TcxGridDBColumn Caption = #32440#31649 DataBinding.FieldName = 'ZGZL' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v3Column7: TcxGridDBColumn Caption = #32440#31665 DataBinding.FieldName = 'ZXZL' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end end object cxGridLevel2: TcxGridLevel GridView = Tv3 end end object Panel3: TPanel Left = 473 Top = 429 Width = 478 Height = 289 BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 2 Visible = False object SpeedButton1: TSpeedButton Left = 5 Top = 4 Width = 88 Height = 87 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 98 Top = 4 Width = 87 Height = 87 Caption = '1' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton3: TSpeedButton Left = 190 Top = 4 Width = 88 Height = 87 Caption = '2' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton4: TSpeedButton Left = 283 Top = 4 Width = 87 Height = 87 Caption = '3' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton5: TSpeedButton Left = 5 Top = 94 Width = 88 Height = 87 Caption = '4' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton6: TSpeedButton Left = 98 Top = 94 Width = 87 Height = 87 Caption = '5' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton7: TSpeedButton Left = 190 Top = 94 Width = 88 Height = 87 Caption = '6' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton8: TSpeedButton Left = 283 Top = 94 Width = 87 Height = 87 Caption = '7' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton9: TSpeedButton Left = 5 Top = 188 Width = 88 Height = 87 Caption = '8' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton10: TSpeedButton Left = 98 Top = 188 Width = 87 Height = 87 Caption = '9' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton11: TSpeedButton Tag = 9 Left = 190 Top = 188 Width = 88 Height = 87 Caption = '.' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -40 Font.Name = #40657#20307 Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton12: TSpeedButton Left = 283 Top = 188 Width = 87 Height = 87 Caption = #8592 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton12Click end object SpeedButton49: TSpeedButton Tag = 9 Left = 379 Top = 101 Width = 81 Height = 72 Caption = #38544#34255 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = #26999#20307'_GB2312' Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton49Click end end object Panel6: TPanel Left = 0 Top = 41 Width = 1319 Height = 70 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 4 object Label26: TLabel Left = 586 Top = 19 Width = 48 Height = 26 Caption = #20986#32440 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -23 Font.Name = 'Arial' Font.Style = [] ParentFont = False Visible = False end object Label34: TLabel Left = 713 Top = 19 Width = 48 Height = 26 Caption = #20221#25968 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -23 Font.Name = 'Arial' Font.Style = [] ParentFont = False Visible = False end object btnSampleSel: TButton Left = 24 Top = 11 Width = 129 Height = 42 Caption = #36873#25321#21697#31181 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -23 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = btnSampleSelClick end object Edit6: TEdit Left = 640 Top = 5 Width = 50 Height = 51 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -43 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 1 Text = #8730 Visible = False OnClick = Edit6Click OnKeyPress = MJstr3KeyPress end object ComboBox1: TComboBox Left = 766 Top = 8 Width = 50 Height = 48 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -35 Font.Name = 'Times New Roman' Font.Style = [fsBold] ItemHeight = 40 ItemIndex = 0 ParentFont = False TabOrder = 2 Text = '1' Visible = False Items.Strings = ( '1' '2' '3' '4') end object Button5: TButton Left = 859 Top = 4 Width = 100 Height = 56 Caption = #37325#25171 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -25 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 Visible = False OnClick = Button5Click end end object cxGridPopupMenu1: TcxGridPopupMenu PopupMenus = <> Left = 740 Top = 536 end object DataSource1: TDataSource DataSet = Order_MJ Left = 564 Top = 504 end object Order_MJ: TClientDataSet Aggregates = <> Params = <> Left = 528 Top = 504 end object ADOCmd: TADOQuery Connection = DataLink_YarnTexturing.ADOLink Parameters = <> Left = 700 Top = 184 end object RMDB_Main: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 592 Top = 560 end object RM2: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator] DefaultCollate = False ShowPrintDialog = False SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\' PreviewOptions.RulerUnit = rmutScreenPixels PreviewOptions.RulerVisible = False PreviewOptions.DrawBorder = False PreviewOptions.BorderPen.Color = clGray PreviewOptions.BorderPen.Style = psDash Dataset = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 544 Top = 556 ReportData = {} end object DS_MJCD: TDataSource DataSet = CDS_MJCD Left = 704 Top = 540 end object CDS_MJCD: TClientDataSet Aggregates = <> Params = <> Left = 672 Top = 544 end object DS_MJID: TDataSource DataSet = CDS_MJID Left = 704 Top = 508 end object CDS_MJID: TClientDataSet Aggregates = <> Params = <> Left = 668 Top = 508 end object ADOQueryPrint: TADOQuery Connection = DataLink_YarnTexturing.ADOLink LockType = ltReadOnly Parameters = <> Left = 660 Top = 184 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid3 PopupMenus = <> Left = 736 Top = 503 end object ADOQueryMainDSC: TADOQuery Connection = DataLink_YarnTexturing.ADOLink LockType = ltReadOnly Parameters = <> SQL.Strings = ( 'select A.*,C.OrderNo,B.SWFBColor,B.SWFBHW,B.SWFBCodeName,' ' B.SWFBCode,B.SWFBKZ,B.WKMS,B.KZBig,B.KZSmal,' ' SCMQty=(select isnull(Sum(MJLen),0) from WFB_MJJY WM wher' + 'e WM.APId=A.APId and len(WM.MJID)>8),' ' Case when A.OrderQtyM-(select isnull(Sum(MJLen),0) from W' + 'FB_MJJY WM where WM.APId=A.APId )>0 ' ' then A.OrderQtyM-(select isnull(Sum(MJLen),0) fr' + 'om WFB_MJJY WM where WM.APId=A.APId ) else 0 end as WSCMQty' 'from WFBOrder_Sub_AnPai A ' 'inner join WFBOrder_Sub B on A.SubId=B.SubId' 'inner join WFBOrder_Main C on A.MainId=C.MainId' 'where C.ChkStatus='#39#23457#26680#36890#36807#39' and RTrim(isnull(A.SCStatus,'#39#39'))<>'#39#24050#23436#25104#39 + ' ' 'and isnull(B.AnPaiChkStatus,'#39#39')='#39#23457#26680#36890#36807#39' and A.SCXDFlag=1' '') Left = 492 Top = 504 end object RM3: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator] DefaultCollate = False ShowPrintDialog = False SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\' PreviewOptions.RulerUnit = rmutScreenPixels PreviewOptions.RulerVisible = False PreviewOptions.DrawBorder = False PreviewOptions.BorderPen.Color = clGray PreviewOptions.BorderPen.Style = psDash Dataset = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 492 Top = 556 ReportData = {} end object ADOTmp: TADOQuery Connection = DataLink_YarnTexturing.ADOLink Parameters = <> Left = 739 Top = 183 end object CDS_LSNO: TClientDataSet Aggregates = <> Params = <> Left = 392 Top = 192 end object DataSource2: TDataSource DataSet = CDS_LSNO Left = 428 Top = 188 end object PopupMenu1: TPopupMenu Left = 820 Top = 112 object N1: TMenuItem Caption = #36136#26816#19968#39063 OnClick = N1Click end object N2: TMenuItem Caption = #36136#26816#19968#25209 OnClick = N2Click end end end