D7myYunxiang/云翔基础资料(BaseInfoYX.dll)/U_MLManage_ZHLR.dfm

729 lines
18 KiB
Plaintext
Raw Normal View History

2025-01-20 13:04:03 +08:00
object frmMLManage_ZHLR: TfrmMLManage_ZHLR
Left = 190
Top = 135
Width = 1381
Height = 710
Caption = #32452#21512#38754#26009#20449#24687#30331#35760
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object TLabel
Left = 474
Top = 14
Width = 26
Height = 13
Caption = #21697#21517
end
object Label4: TLabel
Left = 254
Top = 14
Width = 52
Height = 13
Caption = #23458#25143#32534#21495
end
object TLabel
Left = 254
Top = 41
Width = 52
Height = 13
Caption = #24037#24207#21517#31216
end
object Label6: TLabel
Left = 34
Top = 41
Width = 52
Height = 13
Caption = #24037#24207#32534#21495
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1365
Height = 33
ButtonHeight = 30
ButtonWidth = 61
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_YPGLBOM.ThreeImgList
Flat = True
Images = DataLink_YPGLBOM.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 14
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 65
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 33
Width = 1365
Height = 38
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label1: TLabel
Left = 34
Top = 13
Width = 56
Height = 13
Caption = #24037#33402#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 1125
Top = 89
Width = 65
Height = 13
Caption = #22823#31867#33394#21495#24211
Visible = False
end
object Label3: TLabel
Left = 259
Top = 13
Width = 56
Height = 13
Caption = #20135#21697#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object GSNo: TEdit
Tag = 2
Left = 89
Top = 9
Width = 149
Height = 21
ReadOnly = True
TabOrder = 0
end
object MLDLNo: TBtnEditA
Tag = 2
Left = 1191
Top = 85
Width = 121
Height = 21
ReadOnly = True
TabOrder = 1
Visible = False
OnBtnClick = MLDLNoBtnClick
end
object MLNo: TEdit
Tag = 2
Left = 316
Top = 9
Width = 149
Height = 21
TabOrder = 2
end
end
object Panel3: TPanel
Left = 0
Top = 71
Width = 1365
Height = 599
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object Panel2: TPanel
Left = 2
Top = 2
Width = 654
Height = 595
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object TLabel
Left = 229
Top = 420
Width = 56
Height = 13
Caption = #24037#24207#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 29
Top = 420
Width = 56
Height = 13
Caption = #24037#24207#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 448
Top = 420
Width = 60
Height = 13
Caption = #21697' '#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 27
Top = 448
Width = 60
Height = 13
Caption = #38376' '#24133
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 27
Top = 477
Width = 60
Height = 13
Caption = #20811' '#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 437
Top = 448
Width = 70
Height = 13
Caption = #22823#31867#33457#22411#24211
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 229
Top = 477
Width = 56
Height = 13
Caption = #32483#32447#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 229
Top = 448
Width = 56
Height = 13
Caption = #32483#32447#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 437
Top = 477
Width = 70
Height = 13
Caption = #32483#32447#20379#24212#21830
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object cxGrid1: TcxGrid
Left = 2
Top = 35
Width = 650
Height = 371
Align = alTop
TabOrder = 0
object TV1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource2
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.GroupByBox = False
Styles.Header = DataLink_YPGLBOM.Default
object V1CengJi: TcxGridDBColumn
Tag = 3
Caption = #23618#32423
DataBinding.FieldName = 'CengJi'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1CengJiPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 103
end
object V1BPCode: TcxGridDBColumn
Tag = 3
Caption = #32534#21495
DataBinding.FieldName = 'BPCode'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 101
end
object V1BPName: TcxGridDBColumn
Tag = 3
Caption = #21517#31216
DataBinding.FieldName = 'BPName'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 92
end
object V1ZhengFan: TcxGridDBColumn
Tag = 3
Caption = #27491#21453
DataBinding.FieldName = 'ZhengFan'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1ZhengFanPropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 103
end
end
object cxGrid1Level1: TcxGridLevel
GridView = TV1
end
end
object GXName: TBtnEditA
Tag = 2
Left = 285
Top = 416
Width = 129
Height = 21
TabOrder = 1
OnBtnClick = GXNameBtnClick
end
object GXNo: TBtnEditA
Tag = 2
Left = 88
Top = 416
Width = 119
Height = 21
TabOrder = 2
OnBtnClick = GXNameBtnClick
end
object MLName: TEdit
Tag = 2
Left = 508
Top = 416
Width = 120
Height = 21
TabOrder = 3
end
object MLMF: TEdit
Tag = 2
Left = 88
Top = 444
Width = 118
Height = 21
TabOrder = 4
end
object MLKZ: TEdit
Tag = 2
Left = 88
Top = 473
Width = 118
Height = 21
TabOrder = 5
end
object DLHXK: TBtnEditA
Tag = 2
Left = 508
Top = 444
Width = 121
Height = 21
ReadOnly = True
TabOrder = 6
OnBtnClick = DLHXKBtnClick
end
object XHXName: TBtnEditA
Tag = 2
Left = 285
Top = 473
Width = 128
Height = 21
TabOrder = 7
OnBtnClick = XHXNameBtnClick
end
object XHXGYSName: TEdit
Tag = 2
Left = 508
Top = 473
Width = 120
Height = 21
TabOrder = 8
end
object XHXNo: TBtnEditA
Tag = 2
Left = 285
Top = 444
Width = 128
Height = 21
TabOrder = 9
OnBtnClick = XHXNameBtnClick
end
object ToolBar3: TToolBar
Left = 2
Top = 2
Width = 650
Height = 33
ButtonHeight = 30
ButtonWidth = 100
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_YPGLBOM.ThreeImgList
Flat = True
Images = DataLink_YPGLBOM.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 10
object ToolButton2: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22383#24067#22686#34892
ImageIndex = 103
OnClick = ToolButton2Click
end
object TMLAdd: TToolButton
Left = 91
Top = 0
AutoSize = True
Caption = #38754#26009#22686#34892
ImageIndex = 103
OnClick = TMLAddClick
end
object ToWFBADD: TToolButton
Left = 182
Top = 0
AutoSize = True
Caption = #26080#32442#24067#22686#34892
ImageIndex = 103
OnClick = ToWFBADDClick
end
object ToMHADD: TToolButton
Left = 286
Top = 0
AutoSize = True
Caption = #26825#33457#22686#34892
ImageIndex = 103
OnClick = ToMHADDClick
end
object ToolButton3: TToolButton
Left = 377
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 107
OnClick = ToolButton3Click
end
object Panel6: TPanel
Left = 442
Top = 0
Width = 115
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label8: TLabel
Left = 35
Top = 5
Width = 46
Height = 22
Caption = #38754#26009
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
end
end
end
object Panel4: TPanel
Left = 656
Top = 2
Width = 707
Height = 595
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object cxGrid4: TcxGrid
Left = 2
Top = 32
Width = 703
Height = 561
Align = alClient
TabOrder = 0
object TV4: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
NavigatorButtons.Delete.Enabled = False
NavigatorButtons.Delete.Visible = False
DataController.DataSource = DataSource4
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
Styles.Inactive = DataLink_YPGLBOM.SHuangSe
Styles.IncSearch = DataLink_YPGLBOM.SHuangSe
Styles.Selection = DataLink_YPGLBOM.SHuangSe
Styles.Header = DataLink_YPGLBOM.handBlack
object v2ZDYCode: TcxGridDBColumn
Caption = #33457#22411#32534#21495
DataBinding.FieldName = 'ZDYCode'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 83
end
object v2Column6: TcxGridDBColumn
Caption = #33457#22411#21517#31216
DataBinding.FieldName = 'ZdyName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
Width = 78
end
object v2Column12: TcxGridDBColumn
Caption = #33457#22411#25551#36848
DataBinding.FieldName = 'defNote1'
HeaderAlignmentHorz = taCenter
Width = 87
end
object v2Column1: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'defnote2'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 79
end
object v2Column5: TcxGridDBColumn
Caption = #22836#36317
DataBinding.FieldName = 'defstr2'
HeaderAlignmentHorz = taCenter
Width = 80
end
object v2defstr3: TcxGridDBColumn
Caption = #19994#21153#21592
DataBinding.FieldName = 'defstr3'
HeaderAlignmentHorz = taCenter
Width = 80
end
object v2Column3: TcxGridDBColumn
Caption = #20135#37327
DataBinding.FieldName = 'defstr1'
HeaderAlignmentHorz = taCenter
Width = 80
end
object v2Column4: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'note'
HeaderAlignmentHorz = taCenter
Width = 119
end
end
object cxGridLevel3: TcxGridLevel
GridView = TV4
end
end
object Panel5: TPanel
Left = 2
Top = 2
Width = 703
Height = 30
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label9: TLabel
Left = 345
Top = 5
Width = 46
Height = 22
Caption = #33457#22411
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
end
end
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 421
Top = 192
end
object ADOQueryMain: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 453
Top = 193
end
object DataSource2: TDataSource
DataSet = CDS_Sub
Left = 491
Top = 195
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 384
Top = 193
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 565
Top = 198
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 531
Top = 187
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid4
PopupMenus = <>
Left = 973
Top = 207
end
object Order_GX: TClientDataSet
Aggregates = <>
Params = <>
Left = 896
Top = 207
end
object DataSource1: TDataSource
DataSet = Order_GX
Left = 936
Top = 208
end
object ML_Col: TClientDataSet
Aggregates = <>
Params = <>
Left = 1201
Top = 247
end
object DataSource3: TDataSource
DataSet = ML_Col
Left = 1241
Top = 248
end
object cxGridPopupMenu3: TcxGridPopupMenu
PopupMenus = <>
Left = 1278
Top = 247
end
object Ord_HX: TClientDataSet
Aggregates = <>
Params = <>
Left = 1001
Top = 482
end
object DataSource4: TDataSource
DataSet = Ord_HX
Left = 1041
Top = 483
end
object cxGridPopupMenu4: TcxGridPopupMenu
PopupMenus = <>
Left = 1078
Top = 482
end
end