object frmJTSJY220725: TfrmJTSJY220725 Left = 79 Top = 46 Width = 1398 Height = 930 Caption = #21152#24377#19997#31216#37325 Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 120 TextHeight = 24 object CPInfo: TRichEdit Left = 0 Top = 0 Width = 306 Height = 883 Align = alLeft Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ScrollBars = ssVertical TabOrder = 0 end object Panel3: TPanel Left = 306 Top = 0 Width = 1074 Height = 883 Align = alClient Caption = 'Panel3' Color = clSkyBlue TabOrder = 1 object Panel4: TPanel Left = 1 Top = 1 Width = 526 Height = 881 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 0 object Label5: TLabel Left = 11 Top = 839 Width = 72 Height = 70 Caption = #22791#27880#13#10#26426#21488 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Panel2: TPanel Left = 2 Top = 704 Width = 522 Height = 120 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 0 object Label4: TLabel Left = 243 Top = 20 Width = 82 Height = 80 Caption = 'Kg' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -80 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object SQty: TEdit Left = 16 Top = 15 Width = 228 Height = 88 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -80 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = SQtyClick end object Button3: TButton Left = 352 Top = 20 Width = 153 Height = 82 Caption = #25171#21360 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Button3Click end end object Panel8: TPanel Left = 2 Top = 74 Width = 522 Height = 270 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 10 Top = 10 Width = 72 Height = 70 Caption = #32440#31649#13#10#39068#33394 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object ZGHLab: TLabel Tag = 2 Left = 195 Top = 8 Width = 77 Height = 79 AutoSize = False Caption = #20986#32440 Color = clRed Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object ZGLLab: TLabel Tag = 2 Left = 426 Top = 6 Width = 77 Height = 81 AutoSize = False Color = 16752190 Font.Charset = ANSI_CHARSET Font.Color = clGreen Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object ZGFHLab1: TLabel Tag = 2 Left = 193 Top = 93 Width = 39 Height = 80 AutoSize = False Caption = #20986#32440 Color = clFuchsia Font.Charset = ANSI_CHARSET Font.Color = clFuchsia Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object ZGFHLab2: TLabel Tag = 2 Left = 232 Top = 93 Width = 40 Height = 80 AutoSize = False Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clGreen Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object ZGLH2: TLabel Tag = 2 Left = 464 Top = 93 Width = 39 Height = 80 AutoSize = False Color = clSilver Font.Charset = ANSI_CHARSET Font.Color = clGreen Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object ZGLH1: TLabel Tag = 2 Left = 424 Top = 93 Width = 40 Height = 80 AutoSize = False Color = 4259584 Font.Charset = ANSI_CHARSET Font.Color = clFuchsia Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object ZGHuangLab: TLabel Tag = 2 Left = 193 Top = 181 Width = 79 Height = 80 AutoSize = False Color = clYellow Font.Charset = ANSI_CHARSET Font.Color = clFuchsia Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object ZGHuangBLab2: TLabel Tag = 2 Left = 464 Top = 181 Width = 39 Height = 80 AutoSize = False Color = clWhite Font.Charset = ANSI_CHARSET Font.Color = clGreen Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object ZGHuangBLab1: TLabel Tag = 2 Left = 424 Top = 181 Width = 40 Height = 80 AutoSize = False Color = 4227072 Font.Charset = ANSI_CHARSET Font.Color = clFuchsia Font.Height = -22 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object Label6: TLabel Left = 19 Top = 99 Width = 72 Height = 70 Caption = #20219#24847#13#10' '#33394 Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object ZGH: TEdit Tag = 2 Left = 106 Top = 6 Width = 87 Height = 80 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -72 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 0 Visible = False OnClick = ZGHClick end object ZGL: TEdit Tag = 2 Left = 339 Top = 6 Width = 87 Height = 80 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -72 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 1 Visible = False OnClick = ZGHClick end object ZGFH: TEdit Tag = 2 Left = 105 Top = 93 Width = 87 Height = 80 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -72 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 2 Visible = False OnClick = ZGHClick end object ZGLH: TEdit Tag = 2 Left = 337 Top = 93 Width = 87 Height = 80 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -72 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 3 Visible = False OnClick = ZGHClick end object ZGHuang: TEdit Tag = 2 Left = 105 Top = 181 Width = 87 Height = 80 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -72 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 4 Visible = False OnClick = ZGHClick end object ZGHuangB: TEdit Tag = 2 Left = 337 Top = 181 Width = 87 Height = 80 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -72 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 5 Visible = False OnClick = ZGHClick end object ZGRYS: TEdit Tag = 2 Left = 9 Top = 181 Width = 87 Height = 80 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -72 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 6 Visible = False OnClick = ZGHClick end end object Panel9: TPanel Left = 2 Top = 464 Width = 522 Height = 120 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 2 object Label3: TLabel Left = 5 Top = 42 Width = 86 Height = 42 Caption = #31561#32423 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -42 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Y_Type: TComboBox Left = 93 Top = 27 Width = 420 Height = 77 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -62 Font.Name = 'Times New Roman' Font.Style = [fsBold] ItemHeight = 69 ItemIndex = 0 ParentFont = False TabOrder = 0 Text = #21452'A'#22909#19997 Items.Strings = ( #21452'A'#22909#19997 #21333'A'#21482#20570#40657#30333 'B'#31561#27611#19997) end end object Panel6: TPanel Left = 2 Top = 2 Width = 522 Height = 72 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 3 object btnSampleSel: TButton Left = 23 Top = 6 Width = 130 Height = 61 Caption = #36873#25321#21697#31181 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -22 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = btnSampleSelClick end object Button1: TButton Left = 383 Top = 6 Width = 130 Height = 61 Caption = #20851#38381 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -22 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Button1Click end end object Panel1: TPanel Left = 2 Top = 584 Width = 522 Height = 120 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 4 object Label14: TLabel Left = 11 Top = 20 Width = 72 Height = 70 Caption = #26631#31614#13#10#20221#25968 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 174 Top = 20 Width = 72 Height = 70 Caption = #33258#21160#13#10#21462#20540 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object ComboBox1: TComboBox Left = 93 Top = 16 Width = 75 Height = 77 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -62 Font.Name = 'Times New Roman' Font.Style = [fsBold] ItemHeight = 69 ItemIndex = 0 ParentFont = False TabOrder = 0 Text = '1' Items.Strings = ( '1' '2' '3' '4') end object Edit13: TEdit Left = 249 Top = 15 Width = 87 Height = 80 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -72 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 1 Text = #8730 OnClick = Edit13Click end object Button2: TButton Left = 352 Top = 15 Width = 153 Height = 82 Caption = #37325#25171 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -30 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = Button2Click end end object Panel5: TPanel Left = 2 Top = 344 Width = 522 Height = 120 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 5 object Label2: TLabel Left = 5 Top = 42 Width = 86 Height = 42 Caption = #26426#21488 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -42 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 227 Top = 29 Width = 72 Height = 70 Caption = #32440#31649#13#10#39063#25968 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -35 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 436 Top = 24 Width = 81 Height = 80 Caption = #39063 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -80 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object MachNO: TComboBox Left = 93 Top = 27 Width = 129 Height = 77 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -62 Font.Name = 'Times New Roman' Font.Style = [fsBold] ItemHeight = 69 ItemIndex = 0 ParentFont = False TabOrder = 0 Text = '1'#21495 Items.Strings = ( '1'#21495 '2'#21495 #20551#25467#19997) end object ZGQty: TEdit Left = 309 Top = 20 Width = 122 Height = 88 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -80 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 Text = '20' OnClick = ZGQtyClick end end object JTNote: TEdit Left = 82 Top = 829 Width = 227 Height = 88 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -80 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnClick = SQtyClick end end object Panel10: TPanel Left = 527 Top = 1 Width = 508 Height = 881 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel10' Color = clSkyBlue TabOrder = 1 object cxGrid3: TcxGrid Left = 2 Top = 2 Width = 504 Height = 586 Align = alClient Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object Tv3: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skCount Column = cxGridDBColumn1 end item Kind = skSum Column = v3Column2 end> 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' OnCustomDrawCell = cxGridDBColumn1CustomDrawCell HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False SortIndex = 0 SortOrder = soDescending Width = 106 end object v3Column4: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'ZGColor' OnCustomDrawCell = cxGridDBColumn1CustomDrawCell HeaderAlignmentHorz = taCenter Width = 59 end object v3Column1: TcxGridDBColumn Caption = #39063#25968 DataBinding.FieldName = 'ZGKS' OnCustomDrawCell = cxGridDBColumn1CustomDrawCell HeaderAlignmentHorz = taCenter Width = 42 end object v3Column3: TcxGridDBColumn Caption = #20928#37325 DataBinding.FieldName = 'JYNW' OnCustomDrawCell = cxGridDBColumn1CustomDrawCell HeaderAlignmentHorz = taCenter Width = 74 end object v3Column2: TcxGridDBColumn Caption = #27611#37325 DataBinding.FieldName = 'JYGW' OnCustomDrawCell = cxGridDBColumn1CustomDrawCell HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 66 end object Tv3Column1: TcxGridDBColumn Caption = #26426#21488 DataBinding.FieldName = 'MachNO' OnCustomDrawCell = cxGridDBColumn1CustomDrawCell HeaderAlignmentHorz = taCenter Options.Editing = False Width = 63 end end object cxGridLevel2: TcxGridLevel GridView = Tv3 end end object Panel7: TPanel Left = 2 Top = 588 Width = 504 Height = 291 Align = alBottom BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object SpeedButton1: TSpeedButton Left = 69 Top = 10 Width = 88 Height = 89 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 = 163 Top = 10 Width = 88 Height = 89 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 = 256 Top = 10 Width = 88 Height = 89 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 = 349 Top = 10 Width = 89 Height = 89 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 = 69 Top = 101 Width = 88 Height = 88 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 = 163 Top = 101 Width = 88 Height = 88 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 = 256 Top = 101 Width = 88 Height = 88 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 = 349 Top = 101 Width = 89 Height = 88 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 = 69 Top = 196 Width = 88 Height = 88 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 = 163 Top = 196 Width = 88 Height = 88 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 = 256 Top = 196 Width = 88 Height = 88 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 = 349 Top = 196 Width = 89 Height = 88 Caption = #8592 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -47 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton12Click end end end end object ADOQueryTemp: TADOQuery Connection = DataLink_YarnTexturing.ADOLink Parameters = <> Left = 592 Top = 112 end object ADOCmd: TADOQuery Connection = DataLink_YarnTexturing.ADOLink Parameters = <> Left = 584 Top = 144 end object ClientDataSet1: TClientDataSet Aggregates = <> Params = <> Left = 923 Top = 169 end object DataSource1: TDataSource DataSet = ClientDataSet1 Left = 851 Top = 161 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 = 416 Top = 672 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 448 Top = 672 end object ADOQueryPrint: TADOQuery Connection = DataLink_YarnTexturing.ADOLink LockType = ltReadOnly Parameters = <> Left = 384 Top = 676 end end