D7myChengxie/生产指示单&跟单(OrderandGD.dll)/U_BPDHList.dfm
DESKTOP-E401PHE\Administrator e4d35a6883 1234
2025-08-25 10:39:41 +08:00

742 lines
18 KiB
Plaintext

object frmBPDHList: TfrmBPDHList
Left = 250
Top = 131
Width = 1214
Height = 577
Caption = #24067#21305#21040#36135
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1198
AutoSize = True
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_OrderAndGD.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = TBRafreshClick
end
object TBFind: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 20
OnClick = TBFindClick
end
object ToolButton1: TToolButton
Left = 126
Top = 0
Caption = #23548#20986
ImageIndex = 6
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 185
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 32
Width = 1198
Height = 33
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label1: TLabel
Left = 23
Top = 11
Width = 52
Height = 12
Caption = #35745#21010#26085#26399
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 161
Top = 11
Width = 18
Height = 12
Caption = '---'
end
object Label3: TLabel
Left = 334
Top = 11
Width = 52
Height = 12
Caption = #20135#21697#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 479
Top = 11
Width = 52
Height = 12
Caption = #20135#21697#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 627
Top = 11
Width = 26
Height = 12
Caption = #35268#26684
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 750
Top = 11
Width = 26
Height = 12
Caption = #25260#22836
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 873
Top = 11
Width = 39
Height = 12
Caption = #20379#24212#21830
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 1009
Top = 11
Width = 26
Height = 12
Caption = #25209#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BegDate: TDateTimePicker
Left = 76
Top = 7
Width = 85
Height = 20
Date = 40675.464742650460000000
Format = 'yyyy-MM-dd'
Time = 40675.464742650460000000
TabOrder = 0
end
object EndDate: TDateTimePicker
Left = 179
Top = 7
Width = 86
Height = 20
Date = 40675.464761099540000000
Format = 'yyyy-MM-dd'
Time = 40675.464761099540000000
TabOrder = 1
end
object BPCode: TEdit
Tag = 2
Left = 388
Top = 7
Width = 81
Height = 20
TabOrder = 2
OnChange = BPCodeChange
OnKeyPress = BPCodeKeyPress
end
object BPName: TEdit
Tag = 2
Left = 532
Top = 7
Width = 83
Height = 20
TabOrder = 3
OnChange = BPCodeChange
end
object BPSpec: TEdit
Tag = 2
Left = 655
Top = 7
Width = 83
Height = 20
TabOrder = 4
OnChange = BPCodeChange
end
object CheckBox1: TCheckBox
Left = 268
Top = 8
Width = 57
Height = 17
Caption = #25353#26085#26399
Checked = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
State = cbChecked
TabOrder = 8
end
object TaiTouCX: TEdit
Tag = 2
Left = 778
Top = 7
Width = 83
Height = 20
TabOrder = 5
OnChange = BPCodeChange
end
object FactoryName: TEdit
Tag = 2
Left = 914
Top = 7
Width = 83
Height = 20
TabOrder = 6
OnChange = BPCodeChange
end
object JHBatchNo: TEdit
Tag = 2
Left = 1036
Top = 7
Width = 83
Height = 20
TabOrder = 7
OnChange = BPCodeChange
end
end
object Panel2: TPanel
Left = 0
Top = 252
Width = 1198
Height = 287
Align = alBottom
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
object cxGrid2: TcxGrid
Left = 2
Top = 34
Width = 1194
Height = 251
Align = alClient
TabOrder = 1
object Tv2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
Column = v2Column1
end
item
Kind = skSum
Column = v2Column1
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v2MxQty
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v2Column1
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_OrderAndGD.Default
object v2ComeDate: TcxGridDBColumn
Tag = 2
Caption = #26085#26399
DataBinding.FieldName = 'DHDate'
PropertiesClassName = 'TcxDateEditProperties'
HeaderAlignmentHorz = taCenter
Width = 117
end
object v2Column3: TcxGridDBColumn
Tag = 2
Caption = #31867#22411
DataBinding.FieldName = 'DHType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#25910#36135
#36864#36135)
HeaderAlignmentHorz = taCenter
Width = 89
end
object v2Column1: TcxGridDBColumn
Tag = 2
Caption = #21305#25968
DataBinding.FieldName = 'DHPS'
HeaderAlignmentHorz = taCenter
Width = 72
end
object v2MxQty: TcxGridDBColumn
Tag = 2
Caption = #25968#37327
DataBinding.FieldName = 'DHQty'
HeaderAlignmentHorz = taCenter
Width = 87
end
object v2Column2: TcxGridDBColumn
Tag = 2
Caption = #21333#20301
DataBinding.FieldName = 'DHUnit'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 63
end
object v2MxNote: TcxGridDBColumn
Tag = 2
Caption = #22791#27880
DataBinding.FieldName = 'DHNote'
HeaderAlignmentHorz = taCenter
Width = 145
end
end
object cxGrid2Level1: TcxGridLevel
GridView = Tv2
end
end
object ToolBar2: TToolBar
Left = 2
Top = 2
Width = 1194
AutoSize = True
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_OrderAndGD.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object ToolButton8: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 12
OnClick = ToolButton8Click
end
object ToolButton9: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 13
OnClick = ToolButton9Click
end
object ToolButton10: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #30830#23450
ImageIndex = 10
OnClick = ToolButton10Click
end
object Panel3: TPanel
Left = 189
Top = 0
Width = 228
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label6: TLabel
Left = 8
Top = 8
Width = 24
Height = 12
Caption = #25260#22836
end
object TaiTou: TBtnEditA
Left = 35
Top = 4
Width = 184
Height = 20
ReadOnly = True
TabOrder = 0
OnBtnClick = TaiTouBtnClick
end
end
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 65
Width = 1198
Height = 187
Align = alClient
TabOrder = 2
object Tv1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnFocusedRecordChanged = Tv1FocusedRecordChanged
DataController.DataSource = DataSource1
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
Column = v1Column5
end
item
Kind = skSum
Position = spFooter
Column = v1Column9
end
item
Kind = skSum
Column = v1Column5
end
item
Kind = skSum
Column = v1Column9
end
item
Kind = skSum
Position = spFooter
Column = v1Column10
end
item
Kind = skSum
Position = spFooter
Column = v1Column11
end
item
Kind = skSum
Column = v1Column10
end
item
Kind = skSum
Column = v1Column11
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1Column5
end
item
Kind = skSum
Column = v1Column9
end
item
Kind = skSum
Column = v1Column10
end
item
Kind = skSum
Column = v1Column11
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_OrderAndGD.SHuangSeCu
Styles.IncSearch = DataLink_OrderAndGD.SHuangSeCu
Styles.Selection = DataLink_OrderAndGD.SHuangSeCu
Styles.Header = DataLink_OrderAndGD.Default
object v1Column1: TcxGridDBColumn
Caption = #35745#21010#26085#26399
DataBinding.FieldName = 'JHDate'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Width = 84
end
object v1Column6: TcxGridDBColumn
Caption = #25209#21495
DataBinding.FieldName = 'JHBatchNo'
HeaderAlignmentHorz = taCenter
Width = 79
end
object v1OrderNo: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'BPCode'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_OrderAndGD.Default
Width = 79
end
object v1PSName: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'BPName'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column20: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'BPMF'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 71
end
object v1Column8: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'BPKZ'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 74
end
object v1Column2: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'BPSpec'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 72
end
object v1Column3: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'BPCF'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 64
end
object v1GDPerson: TcxGridDBColumn
Caption = #36319#21333#21592
DataBinding.FieldName = 'GDName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Width = 85
end
object v1FactoryName: TcxGridDBColumn
Caption = #20379#24212#21830
DataBinding.FieldName = 'FactoryName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1ToFactoryName: TcxGridDBColumn
Caption = #23384#25918#24037#21378
DataBinding.FieldName = 'ToFactoryName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Width = 77
end
object v1Column4: TcxGridDBColumn
Caption = #35745#21010#20132#26399
DataBinding.FieldName = 'DlyDate'
HeaderAlignmentHorz = taCenter
Width = 73
end
object v1Column5: TcxGridDBColumn
Caption = #35745#21010#21305#25968
DataBinding.FieldName = 'JHPS'
HeaderAlignmentHorz = taCenter
Width = 73
end
object v1Column9: TcxGridDBColumn
Caption = #35745#21010#25968#37327
DataBinding.FieldName = 'JHQty'
HeaderAlignmentHorz = taCenter
Width = 68
end
object v1Column10: TcxGridDBColumn
Caption = #21040#36135#21305#25968
DataBinding.FieldName = 'DHPSHZ'
HeaderAlignmentHorz = taCenter
Width = 75
end
object v1Column11: TcxGridDBColumn
Caption = #21040#36135#25968#37327
DataBinding.FieldName = 'DHQtyHZ'
HeaderAlignmentHorz = taCenter
Width = 71
end
object v1Column12: TcxGridDBColumn
Caption = #21305#37325
DataBinding.FieldName = 'QtyAvg'
HeaderAlignmentHorz = taCenter
Width = 62
end
object v1QtyUnit: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'JHUnit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
'KG'
'M')
HeaderAlignmentHorz = taCenter
Width = 55
end
object v1Column7: TcxGridDBColumn
Caption = #25260#22836
DataBinding.FieldName = 'TaiTou'
HeaderAlignmentHorz = taCenter
Width = 82
end
object v1Column21: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Alignment.Vert = taVCenter
HeaderAlignmentHorz = taCenter
Width = 152
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 568
Top = 224
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_OrderAndGD.ADOLink
Parameters = <>
Left = 352
Top = 8
end
object ADOQueryMain: TADOQuery
Connection = DataLink_OrderAndGD.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 392
Top = 8
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_OrderAndGD.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 424
Top = 8
end
object DataSource1: TDataSource
DataSet = Order_Main
Left = 600
Top = 224
end
object Order_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 536
Top = 224
end
object DataSource2: TDataSource
DataSet = ClientDataSet2
Left = 512
Top = 336
end
object ClientDataSet2: TClientDataSet
Aggregates = <>
Params = <>
Left = 480
Top = 336
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 448
Top = 336
end
end