D7myYunxiang/云翔生产管理(MYSC.dll)/U_MLMangeYH.dfm
DESKTOP-E401PHE\Administrator 5bc2a25bce 更新产品管理等页面
2025-08-22 09:38:54 +08:00

744 lines
19 KiB
Plaintext

object frmMLMangeYH: TfrmMLMangeYH
Left = 190
Top = 134
Width = 1299
Height = 697
Caption = #21360#33457#26579#33394#20135#21697#36873#25321
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1291
AutoSize = True
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_MYSC.ThreeImgList
Flat = True
Images = DataLink_MYSC.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = TBRafreshClick
end
object ToolButton3: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #36873#25321
ImageIndex = 10
OnClick = ToolButton3Click
end
object ToolButton11: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #26032#22686
ImageIndex = 2
Visible = False
end
object TCK: TToolButton
Left = 189
Top = 0
AutoSize = True
Caption = #26597#30475
ImageIndex = 43
Visible = False
end
object ToolButton1: TToolButton
Left = 252
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 47
Visible = False
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 315
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
object ToolButton2: TToolButton
Left = 378
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 20
Visible = False
OnClick = ToolButton2Click
end
end
object Panel1: TPanel
Left = 0
Top = 32
Width = 1291
Height = 634
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Panel5: TPanel
Left = 2
Top = 2
Width = 1287
Height = 41
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label2: TLabel
Left = 164
Top = 12
Width = 64
Height = 15
Caption = #20135#21697#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 307
Top = 12
Width = 32
Height = 15
Caption = #21697#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 455
Top = 12
Width = 32
Height = 15
Caption = #25104#20221
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 741
Top = 12
Width = 32
Height = 15
Caption = #20811#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 613
Top = 12
Width = 32
Height = 15
Caption = #38376#24133
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 24
Top = 10
Width = 32
Height = 15
Caption = #31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 879
Top = 12
Width = 32
Height = 15
Caption = #24037#33402
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MLXXNO: TEdit
Tag = 2
Left = 229
Top = 7
Width = 57
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnChange = HXTypeChange
end
object MLName: TEdit
Tag = 2
Left = 341
Top = 8
Width = 99
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnChange = HXTypeChange
end
object MLCF: TEdit
Tag = 2
Left = 496
Top = 8
Width = 99
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnChange = HXTypeChange
end
object MLKZ: TEdit
Tag = 2
Left = 776
Top = 8
Width = 80
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnChange = HXTypeChange
end
object MLMF: TEdit
Tag = 2
Left = 648
Top = 8
Width = 80
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnChange = HXTypeChange
end
object LX: TComboBox
Tag = 2
Left = 60
Top = 7
Width = 100
Height = 23
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemHeight = 15
ItemIndex = 2
ParentFont = False
TabOrder = 5
Text = #26579#33394#38754#26009
OnChange = HXTypeChange
Items.Strings = (
''
#21360#33457#38754#26009
#26579#33394#38754#26009
#28907#37329#38754#26009)
end
object GYLXName: TEdit
Tag = 2
Left = 914
Top = 8
Width = 150
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnChange = HXTypeChange
end
end
object cxGrid1: TcxGrid
Left = 2
Top = 43
Width = 1287
Height = 589
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 1
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource2
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
Styles.Content = cxStyle1
Styles.Header = cxStyle1
object Tv1Column1: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'LX'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object v1MLXXNO: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'MLXXNO'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 78
end
object v1MLName: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'MLName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 222
end
object v1MLMF: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'MLMF'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object v1MLKZ: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'MLKZ'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object v1Column1: TcxGridDBColumn
Caption = #25104#20221
DataBinding.FieldName = 'MLCF'
HeaderAlignmentHorz = taCenter
Width = 195
end
object Tv1Column2: TcxGridDBColumn
Caption = #25104#26412#20215
DataBinding.FieldName = 'YPPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object Tv1Column3: TcxGridDBColumn
Caption = #24037#33402
DataBinding.FieldName = 'GYLXName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 200
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel2: TPanel
Left = 1030
Top = 96
Width = 133
Height = 253
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 2
Visible = False
object Label8: TLabel
Left = 33
Top = 11
Width = 64
Height = 15
Caption = #25171#21360#36873#25321
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Image1: TImage
Left = 111
Top = 4
Width = 18
Height = 19
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 = 17
Top = 37
Width = 101
Height = 43
Caption = #21697#21517#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = cxButton1Click
Colors.Default = clBtnFace
end
object cxButton2: TcxButton
Left = 17
Top = 91
Width = 101
Height = 44
Caption = #39068#33394#22823#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Colors.Default = clBtnFace
end
object cxButton3: TcxButton
Left = 17
Top = 147
Width = 101
Height = 42
Caption = #39068#33394#23567#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Colors.Default = clBtnFace
end
object cxButton4: TcxButton
Left = 17
Top = 200
Width = 101
Height = 40
Caption = #23458#25143#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
Colors.Default = clBtnFace
end
end
end
object DataSource1: TDataSource
DataSet = ADOQueryTree
Left = 660
Top = 386
end
object ADOQueryTree: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 626
Top = 387
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 906
Top = 187
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 935
Top = 187
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 652
Top = 193
end
object DataSource2: TDataSource
DataSet = CDS_Main
Left = 594
Top = 223
end
object ADOQueryMain: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 681
Top = 192
end
object CDS_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 652
Top = 223
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
ShowProgress = False
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 = 623
Top = 194
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Main
Left = 696
Top = 386
end
object ODPat: TOpenDialog
Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 965
Top = 186
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 996
Top = 186
end
object SaveDialog1: TSaveDialog
Left = 681
Top = 223
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 660
Top = 419
end
object DataSource3: TDataSource
DataSet = CDS_Sub
Left = 626
Top = 419
end
object cxGridPopupMenu2: TcxGridPopupMenu
PopupMenus = <>
Left = 592
Top = 419
end
object Order_GX: TClientDataSet
Aggregates = <>
Params = <>
Left = 593
Top = 387
end
object DataSource4: TDataSource
DataSet = Order_GX
Left = 695
Top = 418
end
object cxGridPopupMenu3: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 727
Top = 403
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
PixelsPerInch = 96
object cxStyle1: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
end
end
object cxGridPopupMenu5: TcxGridPopupMenu
PopupMenus = <>
Left = 996
Top = 217
end
object DataSource6: TDataSource
DataSet = Ord_HX
Left = 965
Top = 218
end
object Ord_HX: TClientDataSet
Aggregates = <>
Params = <>
Left = 936
Top = 219
end
object ADOQuery1: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 905
Top = 220
end
object PopupMenu1: TPopupMenu
Left = 593
Top = 193
object N1: TMenuItem
Caption = #20462#25913
end
object N2: TMenuItem
Caption = #21024#38500
OnClick = N2Click
end
object DY: TMenuItem
Caption = #25171#21360
OnClick = DYClick
end
object N5: TMenuItem
Caption = #22797#21046
end
object N3: TMenuItem
Caption = #22686#21152#33394#21495
end
object N4: TMenuItem
Caption = #22686#21152#24037#33402
end
end
object RM2: 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 = 623
Top = 223
ReportData = {}
end
end