D7DJkele/检验管理/U_CpRkSaoMNew.dfm
DESKTOP-E401PHE\Administrator fb0db4dbfd ~
2025-04-30 19:48:47 +08:00

953 lines
24 KiB
Plaintext

object frmCpRkSaoMNew: TfrmCpRkSaoMNew
Left = 180
Top = 14
Width = 1378
Height = 707
Caption = #25104#21697#20837#24211#25195#25551
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object cxGrid2: TcxGrid
Left = 0
Top = 209
Width = 516
Height = 460
Align = alLeft
TabOrder = 0
object Tv1: TcxGridDBTableView
PopupMenu = PopupMenu1
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource1
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v2Column5
end
item
Kind = skSum
Column = v2Column6
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Format = #21367#25968#37327#65306'#'
Kind = skCount
Column = v1Column1
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object v1Column6: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 41
end
object v1Column1: TcxGridDBColumn
Caption = #35746#21333#21495
DataBinding.FieldName = 'orderNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 89
end
object v1Column3: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'PRTColor'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 54
end
object v1Column5: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'MJXH'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 43
end
object v1mjid: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'mjid'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 65
end
object v2Column5: TcxGridDBColumn
Caption = #20844#26020#25968
DataBinding.FieldName = 'KGQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 67
end
object v2Column6: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 56
end
object v1BaoNo: TcxGridDBColumn
Caption = #21253#21495
DataBinding.FieldName = 'BaoNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 65
end
object v1baoID: TcxGridDBColumn
Caption = #21253#26465#30721
DataBinding.FieldName = 'baoID'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 101
end
object v1Column2: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'QtyUnit'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 53
end
object v1Column7: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'CPType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 56
end
object v1Column4: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'SOrddefstr1'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 50
end
object v1Column8: TcxGridDBColumn
Caption = #32568#21495
DataBinding.FieldName = 'AOrdDefStr1'
HeaderAlignmentHorz = taCenter
Width = 65
end
end
object cxGrid2Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 1362
Height = 209
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Label1: TLabel
Left = 58
Top = 125
Width = 51
Height = 16
Caption = #21367#26465#30721
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 311
Top = 168
Width = 68
Height = 16
Caption = #20837#24211#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 9
Top = 152
Width = 34
Height = 48
Caption = #20837#24211#13#10' '#21333#13#10#26465#30721
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 559
Top = 125
Width = 34
Height = 16
Caption = #24211#20301
Font.Charset = GB2312_CHARSET
Font.Color = clGreen
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 958
Top = 172
Width = 34
Height = 16
Caption = #21253#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label8: TLabel
Left = 1047
Top = 109
Width = 40
Height = 19
Caption = #25171#21253
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label9: TLabel
Left = 259
Top = 124
Width = 51
Height = 16
Caption = #21253#26465#30721
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 844
Top = 124
Width = 46
Height = 12
Caption = #21253#25968#65306'0'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 703
Top = 179
Width = 34
Height = 16
Caption = #31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 703
Top = 155
Width = 34
Height = 16
Caption = #32568#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BaoID: TEdit
Left = 111
Top = 121
Width = 137
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnKeyPress = BaoIDKeyPress
end
object Button2: TButton
Left = 606
Top = 162
Width = 75
Height = 29
Caption = #20851#38381
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 7
Top = 116
Width = 43
Height = 29
Caption = #36873#21333
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = Button3Click
end
object Button1: TButton
Left = 507
Top = 161
Width = 87
Height = 31
Caption = #25764#38144#20837#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = Button1Click
end
object cxGrid1: TcxGrid
Left = 2
Top = 2
Width = 1358
Height = 103
Align = alTop
TabOrder = 4
object Tv2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnCellDblClick = Tv2CellDblClick
DataController.DataSource = DataSource2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
Styles.Footer = DataLink_TradeManage.Default
object v1OrderNo: TcxGridDBColumn
Caption = #35746#21333#21495
DataBinding.FieldName = 'OrderNo'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 78
end
object v2Column2: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'CustomerNoName'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 82
end
object cxGridDBColumn2: TcxGridDBColumn
Caption = #20013#25991#21517#31216
DataBinding.FieldName = 'PRTCodeName'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 77
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'PRTColor'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 75
end
object v2Column1: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'SOrddefstr1'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object v1Column10: TcxGridDBColumn
Caption = #35746#21333#25968#37327
DataBinding.FieldName = 'PRTOrderQty'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 64
end
object v1Column14: TcxGridDBColumn
Caption = #35746#21333#21333#20301
DataBinding.FieldName = 'OrderUnit'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 75
end
object v1PRTMF: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'PRTMF'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 60
end
object v1PRTKZ: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'PRTKZ'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 66
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv2
end
end
object Button5: TButton
Left = 464
Top = 118
Width = 82
Height = 31
Caption = #25163#24037#20837#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = Button5Click
end
object CRTime: TDateTimePicker
Left = 388
Top = 164
Width = 107
Height = 24
Date = 41337.663190821760000000
Time = 41337.663190821760000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
end
object Button6: TButton
Left = 247
Top = 156
Width = 43
Height = 40
Caption = #33719#21462
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = Button6Click
end
object RKOrdID: TEdit
Left = 48
Top = 156
Width = 200
Height = 41
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
end
object RKPlace: TBtnEditA
Left = 594
Top = 119
Width = 177
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 9
OnBtnClick = RKPlaceBtnClick
end
object BaoNo: TEdit
Left = 1121
Top = 154
Width = 175
Height = 44
BiDiMode = bdLeftToRight
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentBiDiMode = False
ParentFont = False
TabOrder = 10
Visible = False
end
object RKOrdPS: TEdit
Left = 962
Top = 125
Width = 91
Height = 43
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -35
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 11
Visible = False
end
object Button7: TButton
Left = 994
Top = 158
Width = 41
Height = 40
Caption = #25171#21360
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 12
Visible = False
OnClick = Button7Click
end
object Button8: TButton
Left = 1022
Top = 134
Width = 96
Height = 40
Caption = #25171#21360#21253#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
Visible = False
OnClick = Button8Click
end
object ComboBox1: TComboBox
Left = 1007
Top = 124
Width = 67
Height = 24
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
ItemHeight = 16
ParentFont = False
TabOrder = 14
Visible = False
Items.Strings = (
#27491#21697
#27425#21697
#30041#26679
'')
end
object Edit3: TEdit
Left = 1020
Top = 105
Width = 31
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
ParentFont = False
ReadOnly = True
TabOrder = 15
Text = #8730
Visible = False
OnClick = Edit3Click
end
object MJID: TEdit
Left = 311
Top = 121
Width = 135
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 16
OnKeyPress = MJIDKeyPress
end
object MJType: TComboBox
Tag = 2
Left = 744
Top = 179
Width = 97
Height = 20
ItemHeight = 12
TabOrder = 17
OnChange = MJTypeChange
Items.Strings = (
#27491#21697
#27425#21697)
end
object Edit1: TEdit
Left = 743
Top = 152
Width = 97
Height = 20
TabOrder = 18
OnChange = Edit1Change
end
end
object cxGrid3: TcxGrid
Left = 516
Top = 209
Width = 846
Height = 460
Align = alClient
TabOrder = 2
object Tv3: TcxGridDBTableView
PopupMenu = PopupMenu2
NavigatorButtons.ConfirmDelete = False
OnCellClick = Tv3CellClick
DataController.DataSource = DS_MainSel
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
Column = cxGridDBColumn6
end
item
Format = #21367#25968#37327#65306'#'
Kind = skCount
Column = cxGridDBColumn1
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object v3Column5: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 44
end
object cxGridDBColumn1: TcxGridDBColumn
Caption = #35746#21333#21495
DataBinding.FieldName = 'orderNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 98
end
object v3Column3: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'PRTColor'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'MJXH'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 52
end
object v3MJID: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'MJID'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 65
end
object v3BaoNo: TcxGridDBColumn
Caption = #21253#21495
DataBinding.FieldName = 'BaoNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object v3Baoid: TcxGridDBColumn
Caption = #21253#26465#30721
DataBinding.FieldName = 'Baoid'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 90
end
object v3Column1: TcxGridDBColumn
Caption = #20844#26020#25968
DataBinding.FieldName = 'KgQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 59
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 69
end
object v3Column2: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'QtyUnit'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 57
end
object v3Column6: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'CPType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 59
end
object v3Column7: TcxGridDBColumn
Caption = #20837#24211#21333#21495
DataBinding.FieldName = 'RKOrdID'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 82
end
object v3Column4: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'SOrddefstr1'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 50
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv3
end
end
object MovePanel2: TMovePanel
Left = 536
Top = 272
Width = 289
Height = 49
BevelInner = bvLowered
Caption = #27491#22312#25191#34892#25968#25454#25805#20316#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 = 3
Visible = False
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 816
Top = 48
end
object CDS_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 132
Top = 240
end
object DataSource1: TDataSource
DataSet = CDS_Main
Left = 84
Top = 248
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 624
Top = 56
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 664
Top = 40
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 728
Top = 48
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 808
Top = 48
end
object DataSource2: TDataSource
DataSet = CDS_Sub
Left = 856
Top = 48
end
object ADOQuerySub: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 688
Top = 56
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 60
Top = 177
end
object cxGridPopupMenu3: TcxGridPopupMenu
PopupMenus = <>
Left = 776
Top = 48
end
object DS_MainSel: TDataSource
DataSet = CDS_MainSel
Left = 616
Top = 336
end
object CDS_MainSel: TClientDataSet
Aggregates = <>
Params = <>
Left = 648
Top = 336
end
object cxGridPopupMenu4: TcxGridPopupMenu
Grid = cxGrid3
PopupMenus = <>
Left = 832
Top = 312
end
object PopupMenu1: TPopupMenu
Left = 344
Top = 544
object N1: TMenuItem
Caption = #20840#36873
OnClick = N1Click
end
object N2: TMenuItem
Caption = #20840#24323
OnClick = N2Click
end
end
object PopupMenu2: TPopupMenu
Left = 936
Top = 480
object MenuItem1: TMenuItem
Caption = #20840#36873
OnClick = MenuItem1Click
end
object MenuItem2: TMenuItem
Caption = #20840#24323
OnClick = MenuItem2Click
end
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
DefaultCollate = 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 = 664
Top = 64
ReportData = {}
end
object ADOQueryPrt: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 952
Top = 72
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrt
Left = 776
Top = 384
end
end