D7myYunxiang/样品新云翔(YPGLBOM.dll)/U_MLMange.dfm

773 lines
18 KiB
Plaintext
Raw Normal View History

2025-01-20 13:04:03 +08:00
object frmMLMange: TfrmMLMange
Left = 182
Top = 124
Width = 1347
Height = 696
Caption = #38754#26009#31649#29702
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1331
AutoSize = True
ButtonHeight = 30
ButtonWidth = 87
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_YPGLBOM.ThreeImgList
Flat = True
Images = DataLink_YPGLBOM.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 9
OnClick = TBRafreshClick
end
object ToolButton2: TToolButton
Left = 65
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 59
OnClick = ToolButton2Click
end
object TJS: TToolButton
Left = 130
Top = 0
AutoSize = True
Caption = #20803#32032#24211
ImageIndex = 68
OnClick = TJSClick
end
object ToolButton11: TToolButton
Left = 208
Top = 0
AutoSize = True
Caption = #21333#38754#26009
ImageIndex = 3
OnClick = ToolButton11Click
end
object TFH: TToolButton
Left = 286
Top = 0
AutoSize = True
Caption = #22797#21512#38754#26009
ImageIndex = 3
OnClick = TFHClick
end
object ToZHADD: TToolButton
Left = 377
Top = 0
AutoSize = True
Caption = #32452#21512#25104#21697
ImageIndex = 3
OnClick = ToZHADDClick
end
object ToolButton3: TToolButton
Left = 468
Top = 0
AutoSize = True
Caption = #20462#25913
ImageIndex = 54
OnClick = ToolButton3Click
end
object TBDel: TToolButton
Left = 533
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 17
OnClick = TBDelClick
end
object TPrint: TToolButton
Left = 598
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 12
OnClick = TPrintClick
end
object TCK: TToolButton
Left = 663
Top = 0
AutoSize = True
Caption = #26597#30475
ImageIndex = 57
OnClick = TCKClick
end
object ToolButton1: TToolButton
Left = 728
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 53
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 793
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 221
Width = 1331
Height = 435
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Panel5: TPanel
Left = 2
Top = 2
Width = 1327
Height = 45
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label2: TLabel
Left = 46
Top = 15
Width = 52
Height = 13
Caption = #20135#21697#32534#21495
end
object Label1: TLabel
Left = 233
Top = 15
Width = 26
Height = 13
Caption = #21697#21517
end
object Label3: TLabel
Left = 395
Top = 15
Width = 52
Height = 13
Caption = #24037#33402#32534#21495
end
object Label4: TLabel
Left = 579
Top = 15
Width = 52
Height = 13
Caption = #24037#33402#21517#31216
end
object MLNo: TEdit
Tag = 2
Left = 99
Top = 11
Width = 106
Height = 21
TabOrder = 0
OnChange = MLNoChange
end
object MLName: TEdit
Tag = 2
Left = 261
Top = 11
Width = 107
Height = 21
TabOrder = 1
OnChange = MLNoChange
end
object GSNo: TEdit
Tag = 2
Left = 449
Top = 11
Width = 106
Height = 21
TabOrder = 2
OnChange = MLNoChange
end
object GYName: TEdit
Tag = 2
Left = 631
Top = 11
Width = 107
Height = 21
TabOrder = 3
OnChange = MLNoChange
end
end
object cxGrid1: TcxGrid
Left = 2
Top = 47
Width = 1327
Height = 386
Align = alClient
TabOrder = 1
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource2
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
Styles.Content = cxStyle1
Styles.Header = cxStyle1
object v1MLType: TcxGridDBColumn
Caption = #38754#26009#31867#22411
DataBinding.FieldName = 'MLType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = cxStyle1
Width = 70
end
object v1MLNo: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'MLNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_YPGLBOM.Default
Width = 87
end
object v1MLName: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'MLName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_YPGLBOM.Default
Width = 196
end
object v1MLMF: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'MLMF'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_YPGLBOM.Default
Width = 55
end
object v1MLKZ: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'MLKZ'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_YPGLBOM.Default
Width = 53
end
object v1Column1: TcxGridDBColumn
Caption = #25104#20221
DataBinding.FieldName = 'MLCF'
HeaderAlignmentHorz = taCenter
Width = 91
end
object v1GYName: TcxGridDBColumn
Caption = #24037#33402#21517#31216
DataBinding.FieldName = 'GYName'
Visible = False
HeaderAlignmentHorz = taCenter
Hidden = True
Options.Editing = False
Width = 200
end
object v1Column2: TcxGridDBColumn
Caption = #32463#32428#23494#24230
DataBinding.FieldName = 'MLJWMD'
HeaderAlignmentHorz = taCenter
Width = 96
end
object v1GYLXName: TcxGridDBColumn
Caption = #24037#33402#26126#32454
DataBinding.FieldName = 'GYLXName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 241
end
object v1SKID: TcxGridDBColumn
Caption = #33394#21345#32534#21495
DataBinding.FieldName = 'SKID'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_YPGLBOM.Default
Width = 84
end
object v1DLHXK: TcxGridDBColumn
Caption = #22823#31867#33457#22411#24211
DataBinding.FieldName = 'DLHXK'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 92
end
object v1GYLX: TcxGridDBColumn
Caption = #24037#33402#36335#32447
DataBinding.FieldName = 'GYLX'
Visible = False
HeaderAlignmentHorz = taCenter
Hidden = True
Options.Editing = False
Width = 72
end
object v1GSNo: TcxGridDBColumn
Caption = #24037#33402#32534#21495
DataBinding.FieldName = 'GSNo'
Visible = False
HeaderAlignmentHorz = taCenter
Hidden = True
Options.Editing = False
Width = 75
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
end
object Panel2: TPanel
Left = 0
Top = 32
Width = 1331
Height = 46
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 2
Visible = False
object cxButton1: TcxButton
Left = 26
Top = 9
Width = 113
Height = 33
Caption = #26579#33394#38754#26009
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = cxButton1Click
Colors.Default = clBtnFace
end
object cxButton2: TcxButton
Left = 165
Top = 9
Width = 112
Height = 33
Caption = #21360#33457#38754#26009
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = cxButton2Click
Colors.Default = clBtnFace
end
end
object Panel3: TPanel
Left = 0
Top = 126
Width = 1331
Height = 49
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 3
Visible = False
object cxButton3: TcxButton
Left = 26
Top = 9
Width = 113
Height = 33
Caption = #26579#33394#24037#33402
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = cxButton3Click
Colors.Default = clBtnFace
end
object cxButton4: TcxButton
Left = 165
Top = 9
Width = 112
Height = 33
Caption = #21360#33457#24037#33402
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = cxButton4Click
Colors.Default = clBtnFace
end
end
object Panel4: TPanel
Left = 0
Top = 78
Width = 1331
Height = 48
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 4
Visible = False
object cxButton5: TcxButton
Left = 26
Top = 9
Width = 113
Height = 33
Caption = #22383#24067#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = cxButton5Click
Colors.Default = clBtnFace
end
object cxButton6: TcxButton
Left = 165
Top = 9
Width = 112
Height = 33
Caption = #24037#33402#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = cxButton6Click
Colors.Default = clBtnFace
end
object cxButton10: TcxButton
Left = 298
Top = 9
Width = 113
Height = 33
Caption = #33394#21495#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = cxButton10Click
Colors.Default = clBtnFace
end
object cxButton11: TcxButton
Left = 436
Top = 9
Width = 112
Height = 33
Caption = #33457#22411#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = cxButton11Click
Colors.Default = clBtnFace
end
object cxButton13: TcxButton
Left = 574
Top = 9
Width = 113
Height = 33
Caption = #36741#26009#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = cxButton13Click
Colors.Default = clBtnFace
end
end
object Panel6: TPanel
Left = 0
Top = 175
Width = 1331
Height = 46
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 5
Visible = False
object cxButton7: TcxButton
Left = 26
Top = 8
Width = 113
Height = 33
Caption = #26825#33457#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = cxButton7Click
Colors.Default = clBtnFace
end
object cxButton8: TcxButton
Left = 165
Top = 8
Width = 112
Height = 33
Caption = #26080#32442#24067#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = cxButton8Click
Colors.Default = clBtnFace
end
object cxButton9: TcxButton
Left = 299
Top = 8
Width = 113
Height = 33
Caption = #32483#32447#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = cxButton9Click
Colors.Default = clBtnFace
end
object cxButton12: TcxButton
Left = 436
Top = 8
Width = 112
Height = 33
Caption = #33014#27700#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = cxButton12Click
Colors.Default = clBtnFace
end
end
object DataSource1: TDataSource
DataSet = ADOQueryTree
Left = 660
Top = 386
end
object ADOQueryTree: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 630
Top = 386
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1020
Top = 134
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 1074
Top = 142
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 654
Top = 195
end
object DataSource2: TDataSource
DataSet = CDS_Main
Left = 715
Top = 192
end
object ADOQueryMain: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 685
Top = 193
end
object CDS_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 773
Top = 191
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 = 624
Top = 195
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Main
Left = 690
Top = 386
end
object ODPat: TOpenDialog
Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 1090
Top = 124
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 1105
Top = 123
end
object SaveDialog1: TSaveDialog
Left = 744
Top = 191
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 391
Top = 498
end
object DataSource3: TDataSource
DataSet = CDS_Sub
Left = 426
Top = 496
end
object cxGridPopupMenu2: TcxGridPopupMenu
PopupMenus = <>
Left = 463
Top = 496
end
object Order_GX: TClientDataSet
Aggregates = <>
Params = <>
Left = 681
Top = 538
end
object DataSource4: TDataSource
DataSet = Order_GX
Left = 681
Top = 506
end
object cxGridPopupMenu3: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 683
Top = 476
end
object ML_Col: TClientDataSet
Aggregates = <>
Params = <>
Left = 1126
Top = 503
end
object DataSource5: TDataSource
DataSet = ML_Col
Left = 1161
Top = 501
end
object cxGridPopupMenu4: TcxGridPopupMenu
PopupMenus = <>
Left = 1193
Top = 501
end
object cxStyleRepository1: TcxStyleRepository
object cxStyle1: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
end
end
object cxGridPopupMenu5: TcxGridPopupMenu
PopupMenus = <>
Left = 1178
Top = 222
end
object DataSource6: TDataSource
DataSet = Ord_HX
Left = 1141
Top = 223
end
object Ord_HX: TClientDataSet
Aggregates = <>
Params = <>
Left = 1101
Top = 222
end
object ADOQuery1: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1058
Top = 224
end
end