inherited frmLabSet: TfrmLabSet
Left = 261
Top = 149
Caption = #25171#21367#21253#35013#35774#32622
ClientHeight = 772
ClientWidth = 1320
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Height = -12
Font.Name = #23435#20307
OldCreateOrder = True
Position = poScreenCenter
OnClose = FormClose
ExplicitWidth = 1336
ExplicitHeight = 811
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1320
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 75
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Contract.ImageList_new32
Images = DataLink_Contract.ImageList_new32
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object ToolButton5: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #36873#25321
ImageIndex = 12
OnClick = ToolButton5Click
end
object ToolButton3: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 16
Visible = False
OnClick = ToolButton3Click
end
object TBClose: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox [1]
Left = 0
Top = 38
Width = 1320
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
Visible = False
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 = 728
Top = 40
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
Visible = False
end
object Label2: TLabel
Left = 483
Top = 15
Width = 52
Height = 15
Caption = #19978#31216#30382#37325
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 = 301
Top = 41
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 = 715
Top = 14
Width = 52
Height = 15
Caption = #21367#21495#35268#21017
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 = 19
Top = 44
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 Label8: TLabel
Left = 470
Top = 41
Width = 65
Height = 15
Caption = #19981#19978#31216#30382#37325
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object RuleBeforeTare: TEdit
Tag = 2
Left = 541
Top = 12
Width = 90
Height = 20
TabOrder = 0
end
object RuleConversion: TComboBox
Tag = 2
Left = 333
Top = 13
Width = 100
Height = 22
Style = csDropDownList
ItemIndex = 0
TabOrder = 1
Text = #26080#38656#36716#25442
Items.Strings = (
#26080#38656#36716#25442
#31859#36716#20844#26020
#20928#37325#36716#31859
#27611#37325#36716#31859)
end
object Coefficient: TEdit
Tag = 2
Left = 333
Top = 38
Width = 100
Height = 20
TabOrder = 2
end
object LabVolume: TEdit
Tag = 2
Left = 77
Top = 14
Width = 172
Height = 20
ReadOnly = True
TabOrder = 3
end
object LabPackage: TEdit
Tag = 2
Left = 773
Top = 38
Width = 172
Height = 20
ReadOnly = True
TabOrder = 4
Visible = False
end
object RulePieceNo: TComboBox
Tag = 2
Left = 773
Top = 10
Width = 120
Height = 22
Style = csDropDownList
ItemIndex = 0
TabOrder = 5
Text = #25353#29983#20135#21333#29983#25104
Items.Strings = (
#25353#29983#20135#21333#29983#25104
#25353#32568#21495#29983#25104
#25163#21160#29983#25104)
end
object RuleLenUnit: TComboBox
Tag = 2
Left = 77
Top = 40
Width = 172
Height = 22
Style = csDropDownList
TabOrder = 6
Items.Strings = (
'M'
'Y')
end
object RuleLaterTare: TEdit
Tag = 2
Left = 541
Top = 38
Width = 90
Height = 20
TabOrder = 7
end
end
object cxPageControl1: TcxPageControl [2]
Left = 0
Top = 121
Width = 1320
Height = 651
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 = 651
ClientRectRight = 1320
ClientRectTop = 32
object cxTabSheet1: TcxTabSheet
Caption = #26631#31614#35774#32622
ImageIndex = 2
object Panel1: TPanel
Left = 0
Top = 0
Width = 1320
Height = 619
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 = 579
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 = 543
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 = <>
ScrollbarAnnotations.CustomAnnotations = <>
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'
DataBinding.IsNullValueType = True
Visible = False
Width = 53
end
object TVLabellabeltype: TcxGridDBColumn
Caption = #26631#31614#31867#22411
DataBinding.FieldName = 'labeltype'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 107
end
object TVLabellabelCaption: TcxGridDBColumn
Caption = #26631#31614#21517#31216
DataBinding.FieldName = 'labelCaption'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 261
end
object TVLabellabelFile: TcxGridDBColumn
Caption = #25991#20214#21517
DataBinding.FieldName = 'labelFile'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Width = 167
end
object TVLabelColumn2: TcxGridDBColumn
Caption = #19978#20256#26102#38388
DataBinding.FieldName = 'Filltime'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 99
end
object TVLabelColumn1: TcxGridDBColumn
Caption = #19978#20256#20154
DataBinding.FieldName = 'Filler'
DataBinding.IsNullValueType = True
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 = 9
Width = 48
Height = 12
Caption = #26631#31614#21517#31216
end
object LabelCaption: TEdit
Tag = 2
Left = 236
Top = 5
Width = 100
Height = 20
TabOrder = 0
OnChange = labeltypeChange
end
object labeltype: TComboBox
Tag = 2
Left = 86
Top = 8
Width = 80
Height = 20
Style = csDropDownList
TabOrder = 1
OnChange = labeltypeChange
Items.Strings = (
''
#20013#25991#26631#31614
#33521#25991#26631#31614)
end
end
end
object RMPreview3: TRMPreview
Left = 377
Top = 39
Width = 942
Height = 579
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 = 1318
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 103
Caption = 'ToolBar2'
Color = clBtnFace
Images = DataLink_Contract.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 ToolButton6: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #22797#21046
ImageIndex = 13
OnClick = ToolButton6Click
end
object Tupd: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #20462#25913
ImageIndex = 3
OnClick = TupdClick
end
object ToolButton4: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #35774#35745#26631#31614
ImageIndex = 3
OnClick = ToolButton4Click
end
object Tdel: TToolButton
Left = 308
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 5
OnClick = TdelClick
end
object ToolButton2: TToolButton
Left = 379
Top = 0
AutoSize = True
Caption = #35774#20026#21253#26631#31614
ImageIndex = 22
Visible = False
OnClick = ToolButton2Click
end
object ToolButton1: TToolButton
Left = 486
Top = 0
AutoSize = True
Caption = #35774#20026#21367#26631#31614
ImageIndex = 22
Visible = False
OnClick = ToolButton1Click
end
end
end
end
object cxTabSheet4: TcxTabSheet
Caption = ' '#21367#26631#31614' '
ImageIndex = 3
object RMPreview1: TRMPreview
Left = 0
Top = 0
Width = 1320
Height = 619
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_Contract.ADOLink
Left = 417
Top = 576
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_Contract.ADOLink
Left = 473
Top = 657
end
inherited ImageList_new32: TImageList
Left = 88
Top = 432
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_Contract.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 171
Top = 280
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 78
Top = 280
end
object ADOQueryMain: TADOQuery
Connection = DataLink_Contract.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 181
Top = 489
end
object ADOQueryLabel: TADOQuery
Connection = DataLink_Contract.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_Contract.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_Contract.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 59
Top = 352
end
end