D7myYunxiang/样品新云翔(YPGLBOM.dll)/U_MLMangeRS.dfm
DESKTOP-E401PHE\Administrator 1011cb7292 1
2025-01-20 13:04:03 +08:00

651 lines
16 KiB
Plaintext

object frmMLMangeRS: TfrmMLMangeRS
Left = 189
Top = 136
Width = 1244
Height = 690
Caption = #26579#33394#38754#26009#31649#29702
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1228
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 TColAdd: TToolButton
Left = 65
Top = 0
AutoSize = True
Caption = #39068#33394#26032#22686
ImageIndex = 60
OnClick = TColAddClick
end
object Panel2: TPanel
Left = 156
Top = 0
Width = 271
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
Visible = False
object Label5: TLabel
Left = 114
Top = 8
Width = 26
Height = 13
Caption = #20811#37325
end
object Label6: TLabel
Left = 10
Top = 8
Width = 26
Height = 13
Caption = #38376#24133
end
object DMLMF: TEdit
Tag = 2
Left = 38
Top = 4
Width = 65
Height = 21
TabOrder = 0
end
object DMLKZ: TEdit
Tag = 2
Left = 141
Top = 4
Width = 65
Height = 21
TabOrder = 1
end
object Button1: TButton
Left = 209
Top = 2
Width = 58
Height = 25
Caption = #30830#23450#20462#25913
TabOrder = 2
OnClick = Button1Click
end
end
object ToolButton11: TToolButton
Left = 427
Top = 0
AutoSize = True
Caption = #26032#22686
ImageIndex = 3
OnClick = ToolButton11Click
end
object TCK: TToolButton
Left = 492
Top = 0
AutoSize = True
Caption = #26597#30475
ImageIndex = 57
Visible = False
OnClick = TCKClick
end
object ToolButton1: TToolButton
Left = 557
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 53
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 622
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
object ToolButton2: TToolButton
Left = 687
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 59
Visible = False
OnClick = ToolButton2Click
end
end
object Panel1: TPanel
Left = 0
Top = 32
Width = 1228
Height = 618
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Panel5: TPanel
Left = 2
Top = 2
Width = 1224
Height = 45
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label2: TLabel
Left = 323
Top = 16
Width = 52
Height = 13
Caption = #20135#21697#32534#21495
end
object Label1: TLabel
Left = 509
Top = 16
Width = 26
Height = 13
Caption = #21697#21517
end
object Label4: TLabel
Left = 664
Top = 16
Width = 52
Height = 13
Caption = #24037#33402#21517#31216
end
object Label3: TLabel
Left = 20
Top = 7
Width = 88
Height = 30
Caption = #26579#33394#38754#26009
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -22
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 117
Top = 14
Width = 76
Height = 18
Caption = #25195#25551#20837#21475
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MLNo: TEdit
Tag = 2
Left = 377
Top = 12
Width = 107
Height = 21
TabOrder = 0
OnChange = MLNoChange
end
object MLName: TEdit
Tag = 2
Left = 538
Top = 12
Width = 107
Height = 21
TabOrder = 1
OnChange = MLNoChange
end
object GYLXName: TEdit
Tag = 2
Left = 718
Top = 12
Width = 107
Height = 21
TabOrder = 2
OnChange = MLNoChange
end
object DYID: TEdit
Left = 195
Top = 12
Width = 107
Height = 21
TabOrder = 3
OnKeyPress = DYIDKeyPress
end
end
object cxGrid1: TcxGrid
Left = 2
Top = 47
Width = 1224
Height = 569
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 1
object tv1: TcxGridDBTableView
OnDblClick = tv1DblClick
OnMouseDown = tv1MouseDown
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 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 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
end
object cxGrid1Level1: TcxGridLevel
GridView = tv1
end
end
object Panel3: TPanel
Left = 942
Top = 86
Width = 144
Height = 221
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 2
Visible = False
object Label8: TLabel
Left = 32
Top = 12
Width = 68
Height = 16
Caption = #25171#21360#36873#25321
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Image1: TImage
Left = 120
Top = 4
Width = 20
Height = 21
Picture.Data = {
0A544A504547496D616765E2020000FFD8FFE000104A46494600010101006000
600000FFDB004300080606070605080707070909080A0C140D0C0B0B0C191213
0F141D1A1F1E1D1A1C1C20242E2720222C231C1C2837292C30313434341F2739
3D38323C2E333432FFDB0043010909090C0B0C180D0D1832211C213232323232
3232323232323232323232323232323232323232323232323232323232323232
32323232323232323232323232FFC20011080015001503012200021101031101
FFC4001800010003010000000000000000000000000001040607FFC400140101
00000000000000000000000000000000FFDA000C03010002100310000001D728
E50E8491541641FFC4001A100101000301010000000000000000000003040002
140512FFDA00080101000105025A08767A0A63CF4B9B8A2FAECC59C9B679CA93
CFFFC40014110100000000000000000000000000000020FFDA0008010301013F
011FFFC400161100030000000000000000000000000000012021FFDA00080102
01013F01153FFFC4002310000103030207000000000000000000000201031200
10111432152331415161F1FFDA0008010100063F020170E2A6B81A9BC711B16A
B676F39F54CF119EDE44FA7DB013812505C8D41E090DBFFFC400201000010401
040300000000000000000000110001217131104161D15181B1FFDA0008010100
013F2163D491BBDA068605E4BD2CAF9A3D165E7E1E773DBAD18F5246CF481A18
8780F6B0BFFFDA000C03010002000300000010F70F3CFFC40019110001050000
000000000000000000000001112021F0F1FFDA0008010301013F103016E33FFF
C400181100020300000000000000000000000000112021F0F1FFDA0008010201
013F10985D4FFFC4002010010002020201050000000000000000000111310021
4171106191B1C1D1FFDA0008010100013F1052BE32C171A4165A5E6B36882928
00ABD142E0804A779F5775BF2BD2267539ED182EFC22D53BF052BE76C373B434
58E6B378A28290223D34A60000A359FFD9}
OnClick = Image1Click
end
object cxButton1: TcxButton
Left = 18
Top = 40
Width = 110
Height = 47
Caption = #39068#33394#25171#21360
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 = 18
Top = 101
Width = 110
Height = 47
Caption = #38754#26009#25171#21360
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
object cxButton4: TcxButton
Left = 18
Top = 163
Width = 109
Height = 45
Caption = #23458#25143#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = cxButton4Click
Colors.Default = clBtnFace
end
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 = 1135
Top = 248
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 1108
Top = 173
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 = 621
Top = 195
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Print
Left = 690
Top = 386
end
object ODPat: TOpenDialog
Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 1105
Top = 145
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 1137
Top = 145
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 = 864
Top = 190
end
object DataSource6: TDataSource
DataSet = Ord_HX
Left = 834
Top = 190
end
object Ord_HX: TClientDataSet
Aggregates = <>
Params = <>
Left = 803
Top = 191
end
object ADOQuery1: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1121
Top = 212
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 833
Top = 135
end
object CDS_Print: TClientDataSet
Aggregates = <>
Params = <>
Left = 1148
Top = 234
end
object PopupMenu1: TPopupMenu
Left = 590
Top = 196
object N1: TMenuItem
Caption = #20462#25913
OnClick = N1Click
end
object N2: TMenuItem
Caption = #21024#38500
OnClick = N2Click
end
object N3: TMenuItem
Caption = #22686#21152#24037#33402
OnClick = N3Click
end
object N4: TMenuItem
Caption = #25171#21360
OnClick = N4Click
end
end
object ML_GX: TClientDataSet
Aggregates = <>
Params = <>
Left = 877
Top = 293
end
end