inherited frmDyeInspSet: TfrmDyeInspSet Left = 261 Top = 149 Caption = #25171#21367#21253#35013#35774#32622 ClientHeight = 532 ClientWidth = 1220 Color = clWhite Font.Charset = GB2312_CHARSET Font.Height = -12 Font.Name = #23435#20307 OldCreateOrder = True Position = poScreenCenter OnClose = FormClose ExplicitWidth = 1236 ExplicitHeight = 571 PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1220 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 75 Caption = 'ToolBar1' Color = clWhite DisabledImages = DataLink_DyePlan.ImageList_new32 Images = DataLink_DyePlan.ImageList_new32 List = True ParentColor = False ShowCaptions = True TabOrder = 0 object ToolButton3: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 16 OnClick = ToolButton3Click end object TBClose: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object ScrollBox1: TScrollBox [1] Left = 0 Top = 38 Width = 1220 Height = 83 Align = alTop BevelInner = bvNone BevelOuter = bvNone BorderStyle = bsNone Color = clWhite Ctl3D = False Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = #23435#20307 Font.Style = [] ParentColor = False ParentCtl3D = False ParentFont = False TabOrder = 1 object Label14: TLabel Left = 32 Top = 17 Width = 39 Height = 15 Caption = #21367#26631#31614 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 32 Top = 47 Width = 39 Height = 15 Caption = #21253#26631#31614 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 275 Top = 17 Width = 52 Height = 15 Caption = #31995#25968#31867#22411 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 303 Top = 47 Width = 26 Height = 15 Caption = #31995#25968 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 469 Top = 47 Width = 26 Height = 15 Caption = #21152#37325 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 643 Top = 17 Width = 72 Height = 15 Caption = #30382#37325'('#19978' '#31216')' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 443 Top = 17 Width = 52 Height = 15 Caption = #38271#24230#21333#20301 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 643 Top = 47 Width = 73 Height = 15 Caption = #30382#37325'('#19981#19978#31216')' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object RuleConversion: TComboBox Tag = 2 Left = 335 Top = 13 Width = 97 Height = 22 Style = csDropDownList ItemIndex = 0 TabOrder = 0 Text = #26080#38656#36716#25442 Items.Strings = ( #26080#38656#36716#25442 #31859#36716#20844#26020 #20844#26020#36716#31859) end object Coefficient: TEdit Tag = 2 Left = 335 Top = 44 Width = 97 Height = 20 TabOrder = 1 end object LabVolume: TEdit Tag = 2 Left = 77 Top = 14 Width = 172 Height = 20 ReadOnly = True TabOrder = 2 end object LabPackage: TEdit Tag = 2 Left = 77 Top = 45 Width = 172 Height = 20 ReadOnly = True TabOrder = 3 end object AddWet: TEdit Tag = 2 Left = 501 Top = 44 Width = 98 Height = 20 TabOrder = 4 end object RuleBeforeTare: TEdit Tag = 2 Left = 718 Top = 15 Width = 90 Height = 20 TabOrder = 5 end object RuleLenUnit: TComboBox Tag = 2 Left = 501 Top = 13 Width = 98 Height = 22 Style = csDropDownList TabOrder = 6 Items.Strings = ( 'M' 'Y') end object RuleLaterTare: TEdit Tag = 2 Left = 718 Top = 44 Width = 90 Height = 20 TabOrder = 7 end end object cxPageControl1: TcxPageControl [2] Left = 0 Top = 121 Width = 1220 Height = 411 Align = alClient Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [] ParentBackground = False ParentColor = False ParentFont = False TabOrder = 2 Properties.ActivePage = cxTabSheet1 Properties.CustomButtons.Buttons = <> Properties.Style = 6 OnChange = cxPageControl1Change ClientRectBottom = 411 ClientRectRight = 1220 ClientRectTop = 32 object cxTabSheet1: TcxTabSheet Caption = #26631#31614#35774#32622 ImageIndex = 2 object Panel1: TPanel Left = 0 Top = 0 Width = 1220 Height = 379 Align = alClient Caption = 'Panel1' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object Panel2: TPanel Left = 1 Top = 39 Width = 376 Height = 339 Align = alLeft Caption = 'Panel1' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object cxGridLabel: TcxGrid Left = 1 Top = 35 Width = 374 Height = 303 Align = alClient Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object TVLabel: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellClick = TVLabelCellClick DataController.DataSource = DS_Label DataController.Filter.AutoDataSetFilter = True DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsSelection.CellSelect = False OptionsView.GroupByBox = False object TVLabellabelId: TcxGridDBColumn Caption = #26631#31614'ID' DataBinding.FieldName = 'labelId' Visible = False Width = 53 end object TVLabellabeltype: TcxGridDBColumn Caption = #26631#31614#31867#22411 DataBinding.FieldName = 'labeltype' HeaderAlignmentHorz = taCenter Width = 107 end object TVLabellabelCaption: TcxGridDBColumn Caption = #26631#31614#21517#31216 DataBinding.FieldName = 'labelCaption' HeaderAlignmentHorz = taCenter Width = 261 end object TVLabellabelFile: TcxGridDBColumn Caption = #25991#20214#21517 DataBinding.FieldName = 'labelFile' Visible = False HeaderAlignmentHorz = taCenter Width = 167 end object TVLabelColumn2: TcxGridDBColumn Caption = #25805#20316#26102#38388 DataBinding.FieldName = 'EditTime' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 99 end object TVLabelColumn1: TcxGridDBColumn Caption = #25805#20316#20154 DataBinding.FieldName = 'Editer' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end end object cxGridLabelLevel1: TcxGridLevel GridView = TVLabel end end object Panel4: TPanel Left = 1 Top = 1 Width = 374 Height = 34 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 object Label9: TLabel Left = 17 Top = 9 Width = 48 Height = 12 Caption = #26631#31614#31867#22411 end object Label10: TLabel Left = 184 Top = 10 Width = 48 Height = 12 Caption = #26631#31614#21517#31216 end object LabelCaption: TEdit Left = 236 Top = 6 Width = 100 Height = 20 TabOrder = 0 OnChange = LabelTypeChange end object LabelType: TRTComboBox Tag = 99 Left = 69 Top = 6 Width = 100 Height = 20 Style = csDropDownList ItemIndex = 0 TabOrder = 1 OnChange = LabelTypeChange Items.Strings = ( '' #20013#25991#26631#31614 #33521#25991#26631#31614 #20013#33521#25991#26631#31614) end end end object RMPreview3: TRMPreview Left = 377 Top = 39 Width = 842 Height = 339 Align = alClient BevelOuter = bvLowered Caption = 'Insert After' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 1 Options.RulerUnit = rmutScreenPixels Options.RulerVisible = False Options.DrawBorder = False Options.BorderPen.Color = clGray Options.BorderPen.Style = psDash end object ToolBar2: TToolBar Tag = 1 Left = 1 Top = 1 Width = 1218 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 103 Caption = 'ToolBar2' Color = clBtnFace Images = DataLink_DyePlan.ImageList_new32 List = True ParentColor = False ShowCaptions = True TabOrder = 2 Transparent = False object Tadd: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 2 OnClick = TaddClick end object Tupd: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 3 OnClick = TupdClick end object ToolButton4: TToolButton Left = 142 Top = 0 AutoSize = True Caption = #35774#35745#26631#31614 ImageIndex = 3 OnClick = ToolButton4Click end object Tdel: TToolButton Left = 237 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 5 OnClick = TdelClick end object ToolButton2: TToolButton Left = 308 Top = 0 AutoSize = True Caption = #35774#20026#21253#26631#31614 ImageIndex = 22 OnClick = ToolButton2Click end object ToolButton1: TToolButton Left = 415 Top = 0 AutoSize = True Caption = #35774#20026#21367#26631#31614 ImageIndex = 22 OnClick = ToolButton1Click end end end end object cxTabSheet4: TcxTabSheet Caption = ' '#21367#26631#31614' ' ImageIndex = 3 object RMPreview1: TRMPreview Left = 0 Top = 0 Width = 1220 Height = 379 Align = alClient BevelOuter = bvLowered Caption = 'Insert After' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 0 Options.RulerUnit = rmutScreenPixels Options.RulerVisible = False Options.DrawBorder = False Options.BorderPen.Color = clGray Options.BorderPen.Style = psDash end end object cxTabSheet3: TcxTabSheet Caption = ' '#21253#26631#31614' ' ImageIndex = 3 object RMPreview2: TRMPreview Left = 0 Top = 0 Width = 1220 Height = 379 Align = alClient BevelOuter = bvLowered Caption = 'Insert After' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 0 Options.RulerUnit = rmutScreenPixels Options.RulerVisible = False Options.DrawBorder = False Options.BorderPen.Color = clGray Options.BorderPen.Style = psDash end end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_DyePlan.ADOLink Left = 977 Top = 104 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_DyePlan.ADOLink Left = 1057 Top = 105 end inherited ImageList_new32: TImageList Left = 88 Top = 432 end object ADOQueryTemp: TADOQuery Connection = DataLink_DyePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 171 Top = 280 end object ADOQueryCmd: TADOQuery Connection = DataLink_DyePlan.ADOLink Parameters = <> Left = 78 Top = 280 end object ADOQueryMain: TADOQuery Connection = DataLink_DyePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 181 Top = 489 end object ADOQueryLabel: TADOQuery Connection = DataLink_DyePlan.ADOLink Parameters = <> Left = 228 Top = 365 end object RM1: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbSaveToXLS, rmpbExport, rmpbNavigator] 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_1 CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 472 Top = 240 ReportData = {} end object RMDB_1: TRMDBDataSet Visible = True DataSet = ADO_1 Left = 428 Top = 244 end object ADO_1: TADOQuery Connection = DataLink_DyePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 283 Top = 288 end object RM2: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbSaveToXLS, rmpbExport, rmpbNavigator] 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_1 CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 472 Top = 296 ReportData = {} end object RMDB_2: TRMDBDataSet Visible = True DataSet = ADO_1 Left = 428 Top = 300 end object DS_Label: TDataSource DataSet = CDS_Label Left = 234 Top = 568 end object CDS_Label: TClientDataSet Aggregates = <> Params = <> Left = 164 Top = 563 end object RMDB_Label: TRMDBDataSet Visible = True DataSet = ADO_1 Left = 164 Top = 620 end object RMLabel: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbSaveToXLS, rmpbExport, rmpbNavigator] 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_Label CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 232 Top = 624 ReportData = {} end object RMBarCodeObject1: TRMBarCodeObject Left = 504 Top = 412 end object RMXLSExport1: TRMXLSExport ShowAfterExport = True ExportPrecision = 1 PagesOfSheet = 10 ExportImages = True ExportFrames = True ExportImageFormat = ifBMP JPEGQuality = 0 ScaleX = 1.000000000000000000 ScaleY = 1.000000000000000000 CompressFile = False Left = 432 Top = 472 end object RMDataDictionary1: TRMDataDictionary FieldFieldNames.TableName = 'TableName' FieldFieldNames.FieldName = 'FieldName' FieldFieldNames.FieldAlias = 'FieldAlias' Left = 434 Top = 400 end object ADO_Down: TADOQuery Connection = DataLink_DyePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 59 Top = 352 end end