RTFormwork/项目代码/RTBasicsV1/C02纱线加弹检验/U_YEClothInspList.dfm
“ddf” 61630656e9 1
2024-07-07 09:35:27 +08:00

846 lines
20 KiB
Plaintext

inherited frmYEClothInspList: TfrmYEClothInspList
Left = 160
Top = 87
Caption = #26816#39564#25253#21578
ClientHeight = 582
ClientWidth = 1527
FormStyle = fsMDIChild
Position = poScreenCenter
Visible = True
ExplicitWidth = 1543
ExplicitHeight = 621
PixelsPerInch = 96
TextHeight = 12
object Panel6: TPanel [0]
Left = 0
Top = 107
Width = 1527
Height = 28
Align = alTop
AutoSize = True
BorderStyle = bsSingle
TabOrder = 3
DesignSize = (
1523
24)
object Label31: TLabel
Left = 22
Top = 5
Width = 84
Height = 13
Alignment = taCenter
Anchors = [akLeft]
Caption = #27599#39029#35760#24405#26465#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Layout = tlCenter
end
object LBCPAP: TLabel
Left = 483
Top = 1
Width = 85
Height = 20
Alignment = taCenter
Anchors = [akLeft]
AutoSize = False
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
Layout = tlCenter
end
object BTLP: TButton
Left = 404
Top = 1
Width = 78
Height = 22
Anchors = [akLeft]
Caption = #19978#19968#39029
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = BTLPClick
end
object BTNP: TButton
Left = 569
Top = 1
Width = 78
Height = 22
Anchors = [akLeft]
Caption = #19979#19968#39029
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = BTNPClick
end
object TCBNOR: TComboBox
Tag = 2
Left = 110
Top = 2
Width = 78
Height = 20
Anchors = [akLeft]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemIndex = 0
ParentFont = False
TabOrder = 2
Text = '500'
OnChange = TCBNORChange
Items.Strings = (
'500'
'1000'
'5000'
'10000')
end
end
object cxGrid1: TcxGrid [1]
Left = 0
Top = 135
Width = 1527
Height = 447
Align = alClient
BorderStyle = cxcbsNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PM_1
TabOrder = 2
ExplicitTop = 133
object Tv1: TcxGridDBTableView
OnMouseUp = Tv1MouseUp
Navigator.Buttons.CustomButtons = <>
OnCellDblClick = Tv1CellDblClick
DataController.DataSource = DS_1
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1Column8
end
item
Kind = skSum
Column = v1Column28
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.IndicatorWidth = 30
Styles.IncSearch = DataLink_YEInsp.SHuangSe
Styles.Footer = DataLink_YEInsp.Default
Styles.Header = DataLink_YEInsp.Default
Styles.Inactive = DataLink_YEInsp.SHuangSe
Styles.Selection = DataLink_YEInsp.SHuangSe
OnCustomDrawIndicatorCell = Tv1CustomDrawIndicatorCell
object v1Column22: TcxGridDBColumn
Caption = #36873#20013
DataBinding.FieldName = 'SSel'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 66
end
object v1Column21: TcxGridDBColumn
Caption = #25171#30721#26102#38388
DataBinding.FieldName = 'FillTime'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 71
end
object v1Column20: TcxGridDBColumn
Caption = #25171#30721#20154
DataBinding.FieldName = 'Filler'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1Column8: TcxGridDBColumn
Caption = #27611#37325
DataBinding.FieldName = 'GrossWeight'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1Column28: TcxGridDBColumn
Caption = #20928#37325
DataBinding.FieldName = 'NetWeight'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1Column12: TcxGridDBColumn
Caption = #21697#36136
DataBinding.FieldName = 'Grade'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1Column42: TcxGridDBColumn
Caption = #24635#35760#24405#25968
DataBinding.FieldName = 'TotalCount'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column1: TcxGridDBColumn
Caption = #26426#22411
DataBinding.FieldName = 'MachNO'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column2: TcxGridDBColumn
Caption = #21152#24377#19997#21697#21517
DataBinding.FieldName = 'YE_Name'
HeaderAlignmentHorz = taCenter
Width = 95
end
object Tv1Column3: TcxGridDBColumn
Caption = #21152#24377#19997#32534#21495
DataBinding.FieldName = 'YE_Code'
HeaderAlignmentHorz = taCenter
Width = 98
end
object Tv1Column4: TcxGridDBColumn
Caption = #21407#19997#35268#26684
DataBinding.FieldName = 'Y_Spec'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column5: TcxGridDBColumn
Caption = #21407#19997#39068#33394
DataBinding.FieldName = 'Y_Color'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column6: TcxGridDBColumn
Caption = #21152#24037#21378
DataBinding.FieldName = 'FtyName'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column7: TcxGridDBColumn
Caption = #25209#21495
DataBinding.FieldName = 'BatchNo'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column8: TcxGridDBColumn
Caption = #32440#31649#37325#37327
DataBinding.FieldName = 'PaperTubeWeight'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column9: TcxGridDBColumn
Caption = #32440#31665#37325#37327
DataBinding.FieldName = 'PaperBoxWeight'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column10: TcxGridDBColumn
Caption = #35013#31665#39063#25968
DataBinding.FieldName = 'BoxCount'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column11: TcxGridDBColumn
Caption = #19997#26550#39063#25968
DataBinding.FieldName = 'YarnRackCount'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column12: TcxGridDBColumn
Caption = #32440#31649#31867#22411
DataBinding.FieldName = 'PaperTubeType'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column13: TcxGridDBColumn
Caption = #21407#19997#21697#21517
DataBinding.FieldName = 'Y_Name'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column14: TcxGridDBColumn
Caption = #21407#19997#32534#21495
DataBinding.FieldName = 'Y_Code'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column15: TcxGridDBColumn
Caption = #32440#31649#39068#33394
DataBinding.FieldName = 'PaperTubeColor'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column16: TcxGridDBColumn
Caption = #19997#26550#37325#37327
DataBinding.FieldName = 'YarnRackWeight'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column17: TcxGridDBColumn
Caption = #19997#26550#32534#21495
DataBinding.FieldName = 'YarnRackNo'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column18: TcxGridDBColumn
Caption = #21253#35013#31867#22411
DataBinding.FieldName = 'PacketType'
HeaderAlignmentHorz = taCenter
Width = 66
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ToolBar1: TToolBar [2]
Tag = 1
Left = 0
Top = 0
Width = 1527
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_YEInsp.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 btnEdit: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #32534#36753
ImageIndex = 3
OnClick = btnEditClick
end
object TBZF: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 5
OnClick = TBZFClick
end
object btnJBQ: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #25171#21360#26631#31614
ImageIndex = 21
OnClick = btnJBQClick
end
object btnJYBG: TToolButton
Left = 308
Top = 0
AutoSize = True
Caption = #21333#25454#25171#21360
ImageIndex = 21
OnClick = btnJYBGClick
end
object TBExport: TToolButton
Left = 403
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 20
OnClick = TBExportClick
end
object ToolButton1: TToolButton
Left = 474
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 569
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object MovePanel2: TMovePanel [3]
Left = 525
Top = 216
Width = 289
Height = 49
BevelInner = bvLowered
Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Visible = False
end
object Panel1: TPanel [4]
Left = 0
Top = 38
Width = 1527
Height = 69
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = 16242829
ParentBackground = False
TabOrder = 4
object Label3: TLabel
Left = 195
Top = 14
Width = 52
Height = 12
Hint = '0'
Caption = #35745#21010#21333#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 362
Top = 14
Width = 39
Height = 12
Hint = '0'
Caption = #21512#21516#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 525
Top = 14
Width = 26
Height = 12
Hint = '0'
Caption = #39068#33394
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 830
Top = 40
Width = 39
Height = 12
Hint = '1'
Caption = #25171#30721#20154
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 671
Top = 40
Width = 39
Height = 12
Hint = '1'
Caption = #21367#26465#30721
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 1001
Top = 14
Width = 26
Height = 12
Hint = '1'
Caption = #21697#36136
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 362
Top = 40
Width = 39
Height = 12
Hint = '0'
Caption = #20135#21697#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 843
Top = 14
Width = 26
Height = 12
Hint = '1'
Caption = #29366#24577
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 525
Top = 40
Width = 26
Height = 12
Hint = '0'
Caption = #33457#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 195
Top = 40
Width = 52
Height = 12
Hint = '0'
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 Label1: TLabel
Left = 684
Top = 14
Width = 26
Height = 12
Hint = '0'
Caption = #21345#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BegDate: TDateTimePicker
Left = 96
Top = 10
Width = 85
Height = 20
Date = 44774.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.464742650459811600
TabOrder = 0
end
object EndDate: TDateTimePicker
Left = 96
Top = 36
Width = 86
Height = 20
Date = 44774.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.464761099538009100
TabOrder = 6
end
object OrderNo: TEdit
Tag = 2
Left = 248
Top = 10
Width = 100
Height = 20
Hint = '0'
TabOrder = 1
OnKeyPress = OrderNoKeyPress
end
object conNO: TEdit
Tag = 2
Left = 407
Top = 10
Width = 100
Height = 20
Hint = '0'
TabOrder = 7
OnKeyPress = conNOKeyPress
end
object YIID: TEdit
Tag = 2
Left = 711
Top = 36
Width = 100
Height = 20
Hint = '1'
TabOrder = 3
OnKeyPress = KHConNOKeyPress
end
object Grade: TComboBox
Tag = 2
Left = 1030
Top = 10
Width = 100
Height = 20
Hint = '1'
Style = csDropDownList
TabOrder = 10
OnChange = GradeChange
OnKeyPress = KHConNOKeyPress
Items.Strings = (
#27491#21697
#27425#21697
#22810#25340
#24453#23450
'')
end
object C_Name: TEdit
Tag = 2
Left = 409
Top = 36
Width = 100
Height = 20
Hint = '0'
TabOrder = 2
OnKeyPress = conNOKeyPress
end
object CIIOFlag: TComboBox
Tag = 2
Left = 872
Top = 10
Width = 100
Height = 20
Hint = '1'
Style = csDropDownList
TabOrder = 9
OnChange = CIIOFlagChange
OnKeyPress = KHConNOKeyPress
Items.Strings = (
#26410#20837#24211
#24050#20837#24211
#24050#20986#24211
'')
end
object Filler: TComboBox
Tag = 2
Left = 872
Top = 36
Width = 100
Height = 20
Hint = '1'
Style = csDropDownList
TabOrder = 4
OnKeyPress = KHConNOKeyPress
end
object C_Color: TEdit
Tag = 2
Left = 553
Top = 10
Width = 100
Height = 20
Hint = '0'
TabOrder = 8
OnKeyPress = conNOKeyPress
end
object IsJYTime: TCheckBox
Left = 8
Top = 12
Width = 87
Height = 17
Caption = #26816#39564#26085#26399
Checked = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
State = cbChecked
TabOrder = 5
end
object C_Pattern: TEdit
Tag = 2
Left = 553
Top = 36
Width = 100
Height = 20
Hint = '0'
TabOrder = 11
OnKeyPress = KHConNOKeyPress
end
object C_Code: TEdit
Tag = 2
Left = 248
Top = 36
Width = 100
Height = 20
Hint = '0'
TabOrder = 12
OnKeyPress = KHConNOKeyPress
end
object PCId: TEdit
Tag = 2
Left = 711
Top = 10
Width = 100
Height = 20
Hint = '0'
TabOrder = 13
OnKeyPress = KHConNOKeyPress
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_YEInsp.ADOLink
Left = 201
Top = 224
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_YEInsp.ADOLink
Left = 81
Top = 225
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 532
Top = 320
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_YEInsp.ADOLink
Parameters = <>
Left = 40
Top = 296
end
object ADOQueryMain: TADOQuery
Connection = DataLink_YEInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 120
Top = 296
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_YEInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 216
Top = 296
end
object DS_1: TDataSource
DataSet = Order_Main
Left = 680
Top = 324
end
object Order_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 608
Top = 320
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, 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 = 708
Top = 392
ReportData = {}
end
object RMDB_1: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrint
Left = 644
Top = 392
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_YEInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 568
Top = 384
end
object PM_1: TPopupMenu
Left = 748
Top = 324
object N1: TMenuItem
Caption = #22797#21046
OnClick = N1Click
end
end
end