D7FZaideng/坯布仓库/U_CPCKMXLR.dfm
DESKTOP-E401PHE\Administrator 82c6347dad ~
2025-04-30 16:21:22 +08:00

799 lines
20 KiB
Plaintext

object frmCPCKMXLR: TfrmCPCKMXLR
Left = 717
Top = 211
Width = 1000
Height = 602
BorderIcons = [biSystemMenu]
Caption = #25104#21697#26126#32454#21015#34920
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 984
Height = 30
ButtonHeight = 30
ButtonWidth = 83
Caption = 'ToolBar1'
Color = clSkyBlue
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = BPCK_DataLink.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 15
OnClick = TBSaveClick
end
object ToolButton1: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 57
Visible = False
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 113
OnClick = ToolButton2Click
end
object ToolButton4: TToolButton
Left = 189
Top = 0
AutoSize = True
Caption = #26631#31614#25171#21360
ImageIndex = 22
Visible = False
OnClick = ToolButton4Click
end
object ToolButton5: TToolButton
Left = 276
Top = 0
AutoSize = True
Caption = #26631#31614#39044#35272
ImageIndex = 22
Visible = False
OnClick = ToolButton5Click
end
object ToolButton3: TToolButton
Left = 363
Top = 0
AutoSize = True
Caption = #19968#38190#26367#25442
ImageIndex = 22
Visible = False
OnClick = ToolButton3Click
end
object TBClose: TToolButton
Left = 450
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel3: TPanel
Left = 0
Top = 30
Width = 984
Height = 533
Align = alClient
Caption = 'Panel3'
TabOrder = 1
object cxGrid2: TcxGrid
Left = 1
Top = 143
Width = 982
Height = 389
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 1
object TvMX: TcxGridDBTableView
OnKeyDown = TvMXKeyDown
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skCount
Position = spFooter
end
item
Kind = skSum
Position = spFooter
Column = cxGridDBColumn8
end
item
Kind = skCount
end
item
Kind = skSum
Column = cxGridDBColumn8
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skCount
end
item
Kind = skSum
Column = cxGridDBColumn8
end
item
Kind = skCount
Column = vMXColumn3
end
item
Kind = skSum
Column = vMXColumn2
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
OptionsView.IndicatorWidth = 33
OnCustomDrawIndicatorCell = TvMXCustomDrawIndicatorCell
object TvMXColumn1: TcxGridDBColumn
Tag = 9
Caption = #36873#25321
DataBinding.FieldName = 'SSEL'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Width = 52
end
object vMXColumn3: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'MXMJXH'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 51
end
object vMXColumn1: TcxGridDBColumn
Caption = #32568#21495
DataBinding.FieldName = 'MXGangHao'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 104
end
object cxGridDBColumn8: TcxGridDBColumn
Caption = #37325#37327
DataBinding.FieldName = 'MXQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = cxGridDBColumn8PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 79
end
object vMXColumn2: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'MXQTY2'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = cxGridDBColumn8PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 80
end
object vMXColumn4: TcxGridDBColumn
Caption = #38271#24230#21333#20301
DataBinding.FieldName = 'MXUnit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.Items.Strings = (
'M'
'Y')
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 65
end
object vMXColumn5: TcxGridDBColumn
Caption = #25918#30721
DataBinding.FieldName = 'MXFM'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 71
end
object TvMXColumn2: TcxGridDBColumn
Caption = #25260#22836
DataBinding.FieldName = 'mxtt'
HeaderAlignmentHorz = taCenter
Width = 67
end
object TvMXColumn3: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'mxkh'
HeaderAlignmentHorz = taCenter
Width = 68
end
object TvMXColumn4: TcxGridDBColumn
Caption = #27454#21495
DataBinding.FieldName = 'mxkuanno'
HeaderAlignmentHorz = taCenter
Width = 66
end
object TvMXColumn5: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'mxspec'
HeaderAlignmentHorz = taCenter
Width = 76
end
end
object cxGridLevel2: TcxGridLevel
GridView = TvMX
end
end
object Panel1: TPanel
Left = 1
Top = 1
Width = 982
Height = 142
Align = alTop
TabOrder = 0
object Label1: TLabel
Left = 896
Top = 46
Width = 48
Height = 12
Caption = #25442#31639#26041#24335
Visible = False
end
object Label2: TLabel
Left = 212
Top = 14
Width = 64
Height = 16
Caption = #25442#31639#31995#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 59
Top = 43
Width = 32
Height = 16
Caption = #38271#24230
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 374
Top = 13
Width = 64
Height = 16
Caption = #25968#37327#21333#20301
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 59
Top = 15
Width = 32
Height = 16
Caption = #32568#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 242
Top = 42
Width = 32
Height = 16
Caption = #37325#37327
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 27
Top = 75
Width = 64
Height = 16
Caption = #26126#32454#22791#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 525
Top = 34
Width = 32
Height = 16
Caption = #20221#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label9: TLabel
Left = 493
Top = 63
Width = 64
Height = 16
Caption = #26631#31614#26684#24335
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label10: TLabel
Left = 58
Top = 112
Width = 32
Height = 16
Caption = #25260#22836
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label11: TLabel
Left = 231
Top = 112
Width = 32
Height = 16
Caption = #23458#25143
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label12: TLabel
Left = 404
Top = 110
Width = 32
Height = 16
Caption = #27454#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label13: TLabel
Left = 573
Top = 110
Width = 32
Height = 16
Caption = #25104#20998
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object ComboBox1: TComboBox
Left = 884
Top = 41
Width = 145
Height = 20
ItemHeight = 12
TabOrder = 2
Visible = False
Items.Strings = (
#37325#37327#25442#31639#38271#24230
#38271#24230#25442#31639#37325#37327)
end
object XS: TEdit
Left = 281
Top = 9
Width = 64
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object Qty: TEdit
Left = 97
Top = 41
Width = 108
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnKeyPress = QtyKeyPress
end
object ComboBox2: TComboBox
Left = 443
Top = 10
Width = 64
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 16
ItemIndex = 2
ParentFont = False
TabOrder = 4
Text = 'KG'
Items.Strings = (
'M'
'Y'
'KG')
end
object gangno: TEdit
Left = 96
Top = 12
Width = 108
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object KGQTY: TEdit
Left = 278
Top = 41
Width = 108
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
OnKeyPress = KGQTYKeyPress
end
object Edit1: TEdit
Left = 862
Top = 100
Width = 108
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
Visible = False
OnKeyPress = QtyKeyPress
end
object Edit2: TEdit
Left = 906
Top = 37
Width = 108
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
Visible = False
OnKeyPress = QtyKeyPress
end
object Edit3: TEdit
Left = 755
Top = 39
Width = 108
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
Visible = False
OnKeyPress = QtyKeyPress
end
object CheckBox1: TCheckBox
Left = 400
Top = 43
Width = 97
Height = 17
Caption = #21333#37325#37327
TabOrder = 9
end
object MXNOTE: TEdit
Left = 96
Top = 70
Width = 344
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 10
OnKeyPress = QtyKeyPress
end
object CheckBox2: TCheckBox
Left = 541
Top = 11
Width = 97
Height = 17
Caption = #25171#21360#26631#31614
TabOrder = 11
Visible = False
end
object ComboBox3: TComboBox
Left = 561
Top = 30
Width = 64
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 16
ItemIndex = 0
ParentFont = False
TabOrder = 12
Text = '1'
Visible = False
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6')
end
object LABNAME: TcxButtonEdit
Left = 559
Top = 61
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = LABNAMEPropertiesButtonClick
TabOrder = 13
Visible = False
Width = 121
end
object TT: TEdit
Left = 94
Top = 107
Width = 125
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 14
Visible = False
end
object KH: TEdit
Left = 266
Top = 107
Width = 125
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 15
Visible = False
end
object KUANHAO: TEdit
Left = 437
Top = 105
Width = 125
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 16
Visible = False
end
object GUIGE: TEdit
Left = 610
Top = 105
Width = 125
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 17
Visible = False
end
end
end
object ADOQueryCmd: TADOQuery
Connection = BPCK_DataLink.ADOLink
Parameters = <>
Left = 372
Top = 234
end
object ADOQueryTmp: TADOQuery
Connection = BPCK_DataLink.ADOLink
Parameters = <>
Left = 411
Top = 234
end
object DataSource1: TDataSource
DataSet = CDS_Main
Left = 663
Top = 391
end
object CDS_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 592
Top = 393
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 188
Top = 229
end
object ADOQueryMain: TADOQuery
Connection = BPCK_DataLink.ADOLink
Parameters = <>
Left = 447
Top = 235
end
object PopupMenu1: TPopupMenu
Left = 158
Top = 229
object N1: TMenuItem
Caption = #20840#36873
OnClick = N1Click
end
object N2: TMenuItem
Caption = #20840#24323
OnClick = N2Click
end
end
object ADOQueryPrint: TADOQuery
Connection = BPCK_DataLink.ADOLink
Parameters = <>
Left = 401
Top = 279
end
object RM1: 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 = 475
Top = 278
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrint
Left = 439
Top = 278
end
object RMXLSExport1: TRMXLSExport
ShowAfterExport = True
ExportPrecision = 1
PagesOfSheet = 1
ExportImages = True
ExportFrames = True
ExportImageFormat = ifBMP
JPEGQuality = 0
ScaleX = 1.000000000000000000
ScaleY = 1.000000000000000000
CompressFile = False
Left = 508
Top = 277
end
object ADOQuery1: TADOQuery
Connection = BPCK_DataLink.ADOLink
Parameters = <>
Left = 227
Top = 294
end
object ADOQuery2: TADOQuery
Connection = BPCK_DataLink.ADOLink
Parameters = <>
Left = 227
Top = 294
end
end