D7wmguihua/桂华管理系统/U_OrderInPutZP.dfm
DESKTOP-E401PHE\Administrator b4b5840f18 1
2025-01-18 16:22:10 +08:00

1789 lines
46 KiB
Plaintext

object frmOrderInPutZP: TfrmOrderInPutZP
Left = 28
Top = 34
Width = 1192
Height = 705
Caption = #25351#31034#21333#24405#20837'('#21046#21697')'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1184
Height = 29
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_WFBOrder.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 14
OnClick = TBSaveClick
end
object TBClose: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
Width = 1184
Height = 320
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label1: TLabel
Left = 24
Top = 15
Width = 65
Height = 12
Caption = #35746#21333#32534#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 248
Top = 15
Width = 39
Height = 12
Caption = #20195#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 883
Top = 15
Width = 65
Height = 12
Caption = #19979#21333#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 919
Top = 184
Width = 52
Height = 12
Caption = #29983#20135#32447#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 919
Top = 248
Width = 52
Height = 12
Caption = #32593#32467#26500#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 24
Top = 172
Width = 15
Height = 98
Caption = #27880#13#10#13#10#24847#13#10#13#10#20107#13#10#13#10#39033
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 467
Top = 15
Width = 39
Height = 12
Caption = #23458#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 677
Top = 15
Width = 52
Height = 12
Caption = #21040#36798#28207#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 936
Top = 83
Width = 39
Height = 12
Caption = #33457#32441#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 461
Top = 43
Width = 53
Height = 12
Caption = #24133' '#23485#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label15: TLabel
Left = 609
Top = 39
Width = 18
Height = 15
Caption = 'cm'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label16: TLabel
Left = 24
Top = 43
Width = 65
Height = 12
Caption = #21512#35745#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 777
Top = 81
Width = 39
Height = 12
Caption = #21333#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Left = 24
Top = 100
Width = 1068
Height = 12
Caption =
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' +
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' +
'- - - - - - - - - - - - - - - - - - - - - - - - '
Font.Charset = GB2312_CHARSET
Font.Color = clFuchsia
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label20: TLabel
Left = 23
Top = 148
Width = 1068
Height = 12
Caption =
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' +
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' +
'- - - - - - - - - - - - - - - - - - - - - - - - '
Font.Charset = GB2312_CHARSET
Font.Color = clFuchsia
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label21: TLabel
Left = 25
Top = 120
Width = 34
Height = 12
Caption = 'ETA'#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Left = 257
Top = 122
Width = 34
Height = 12
Caption = 'ETD'#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 491
Top = 121
Width = 39
Height = 12
Caption = #35013#26588#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
Left = 679
Top = 120
Width = 53
Height = 12
Caption = #20837' '#24211#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label25: TLabel
Left = 934
Top = 121
Width = 39
Height = 12
Caption = #29983#20135#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label26: TLabel
Left = 221
Top = 120
Width = 13
Height = 15
Caption = #22825
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label27: TLabel
Left = 165
Top = 120
Width = 14
Height = 15
Caption = '>>'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label28: TLabel
Left = 238
Top = 120
Width = 14
Height = 15
Caption = '>>'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label29: TLabel
Left = 455
Top = 120
Width = 13
Height = 15
Caption = #22825
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label30: TLabel
Left = 400
Top = 120
Width = 14
Height = 15
Caption = '>>'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label31: TLabel
Left = 472
Top = 120
Width = 14
Height = 15
Caption = '>>'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 904
Top = 120
Width = 13
Height = 15
Caption = #22825
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label32: TLabel
Left = 849
Top = 120
Width = 14
Height = 15
Caption = '>>'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label33: TLabel
Left = 918
Top = 120
Width = 14
Height = 15
Caption = '>>'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label34: TLabel
Left = 679
Top = 185
Width = 91
Height = 12
Caption = #27597#21367#20811#37325#33539#22260#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label35: TLabel
Left = 866
Top = 184
Width = 23
Height = 15
Caption = 'g/'#13217
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label36: TLabel
Left = 810
Top = 184
Width = 14
Height = 12
Caption = '--'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label37: TLabel
Left = 679
Top = 249
Width = 91
Height = 12
Caption = #23567#21367#20811#37325#33539#22260#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label38: TLabel
Left = 866
Top = 248
Width = 23
Height = 15
Caption = 'g/'#13217
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label39: TLabel
Left = 810
Top = 248
Width = 14
Height = 12
Caption = '--'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 23
Top = 281
Width = 1068
Height = 12
Caption =
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' +
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' +
'- - - - - - - - - - - - - - - - - - - - - - - - '
Font.Charset = GB2312_CHARSET
Font.Color = clFuchsia
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 431
Top = 172
Width = 15
Height = 98
Caption = #25171#13#10#13#10#21253#13#10#13#10#35814#13#10#13#10#32454
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label40: TLabel
Left = 24
Top = 81
Width = 65
Height = 12
Caption = #35746#36135#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label41: TLabel
Left = 204
Top = 77
Width = 11
Height = 20
Caption = '*'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label42: TLabel
Left = 332
Top = 77
Width = 11
Height = 20
Caption = '*'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label43: TLabel
Left = 473
Top = 81
Width = 53
Height = 12
Caption = #24133' '#23485#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label44: TLabel
Left = 560
Top = 77
Width = 11
Height = 20
Caption = '*'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label45: TLabel
Left = 611
Top = 79
Width = 18
Height = 15
Caption = 'cm'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 642
Top = 81
Width = 39
Height = 12
Caption = #20811#37325#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 736
Top = 78
Width = 23
Height = 15
Caption = 'g/'#13217
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label46: TLabel
Left = 23
Top = 63
Width = 1068
Height = 12
Caption =
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' +
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' +
'- - - - - - - - - - - - - - - - - - - - - - - - '
Font.Charset = GB2312_CHARSET
Font.Color = clFuchsia
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object OrderNo: TEdit
Left = 86
Top = 13
Width = 115
Height = 18
TabOrder = 0
end
object OrderDate: TDateTimePicker
Left = 947
Top = 11
Width = 125
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 1
end
object WFBCodeName: TcxButtonEdit
Left = 292
Top = 11
ParentShowHint = False
Properties.BeepOnError = True
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = WFBCodeNamePropertiesButtonClick
Properties.OnChange = WFBCodeNamePropertiesChange
ShowHint = False
TabOrder = 2
OnKeyDown = WFBCodeNameKeyDown
Width = 132
end
object SCXName: TcxButtonEdit
Left = 972
Top = 180
Hint = 'FactoryNo1'
BeepOnEnter = False
ParentShowHint = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = SCXNamePropertiesButtonClick
Properties.OnChange = SCXNamePropertiesChange
ShowHint = False
TabOrder = 3
OnKeyDown = WFBCodeNameKeyDown
Width = 100
end
object WJGName: TcxButtonEdit
Left = 972
Top = 243
Hint = 'FactoryNo2'
BeepOnEnter = False
ParentShowHint = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = WJGNamePropertiesButtonClick
Properties.OnChange = WJGNamePropertiesChange
ShowHint = False
TabOrder = 4
OnKeyDown = WFBCodeNameKeyDown
Width = 100
end
object CustomNoName: TcxButtonEdit
Left = 505
Top = 11
Hint = 'CustomerNo'
BeepOnEnter = False
ParentShowHint = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = CustomNoNamePropertiesButtonClick
Properties.OnChange = CustomNoNamePropertiesChange
ShowHint = False
TabOrder = 5
OnKeyDown = WFBCodeNameKeyDown
Width = 129
end
object Note: TRichEdit
Left = 43
Top = 168
Width = 366
Height = 113
TabOrder = 6
end
object ArrivalPortName: TcxButtonEdit
Left = 726
Top = 11
BeepOnEnter = False
ParentShowHint = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = ArrivalPortNamePropertiesButtonClick
Properties.OnChange = ArrivalPortNamePropertiesChange
ShowHint = False
TabOrder = 7
OnKeyDown = WFBCodeNameKeyDown
Width = 117
end
object WFBHW: TEdit
Left = 972
Top = 80
Width = 98
Height = 18
TabOrder = 8
end
object WFBFK: TEdit
Left = 510
Top = 40
Width = 92
Height = 18
TabOrder = 9
Visible = False
OnKeyPress = OrdQtyKeyPress
end
object OrdQty: TEdit
Left = 86
Top = 40
Width = 62
Height = 18
Enabled = False
TabOrder = 10
OnChange = OrdQtyChange
OnKeyPress = OrdQtyKeyPress
end
object OrdUnit: TComboBox
Left = 149
Top = 40
Width = 53
Height = 20
Style = csDropDownList
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 11
OnChange = OrdQtyChange
Items.Strings = (
#13199
#13217)
end
object OrdPrice: TEdit
Left = 815
Top = 78
Width = 53
Height = 18
TabOrder = 12
OnKeyPress = OrdQtyKeyPress
end
object ETADate: TDateTimePicker
Left = 57
Top = 117
Width = 104
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 13
OnChange = ETADateChange
end
object ETDDate: TDateTimePicker
Left = 291
Top = 117
Width = 104
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
Enabled = False
TabOrder = 14
end
object ZGDate: TDateTimePicker
Left = 527
Top = 117
Width = 104
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
Enabled = False
TabOrder = 15
end
object BegRKDate: TDateTimePicker
Left = 730
Top = 117
Width = 115
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 16
OnChange = BegRKDateChange
end
object BegSCDate: TDateTimePicker
Left = 968
Top = 117
Width = 104
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
Enabled = False
TabOrder = 17
end
object Day1: TEdit
Left = 184
Top = 119
Width = 35
Height = 18
TabOrder = 18
OnChange = Day1Change
OnKeyPress = OrdQtyKeyPress
end
object Day2: TEdit
Left = 418
Top = 119
Width = 35
Height = 18
TabOrder = 19
OnChange = Day2Change
OnKeyPress = OrdQtyKeyPress
end
object Day3: TEdit
Left = 867
Top = 119
Width = 35
Height = 18
TabOrder = 20
OnChange = Day3Change
OnKeyPress = OrdQtyKeyPress
end
object MJKZX: TEdit
Left = 769
Top = 182
Width = 39
Height = 18
TabOrder = 21
OnKeyPress = OrdQtyKeyPress
end
object MJKZD: TEdit
Left = 825
Top = 182
Width = 39
Height = 18
TabOrder = 22
OnKeyPress = OrdQtyKeyPress
end
object XJKZX: TEdit
Left = 769
Top = 246
Width = 39
Height = 18
TabOrder = 23
OnKeyPress = OrdQtyKeyPress
end
object XJKZD: TEdit
Left = 825
Top = 246
Width = 39
Height = 18
TabOrder = 24
OnKeyPress = OrdQtyKeyPress
end
object cxGrid4: TcxGrid
Left = 454
Top = 168
Width = 213
Height = 113
PopupMenu = PopupMenu1
TabOrder = 25
object TVDB: TcxGridDBTableView
OnKeyPress = TVZDYKeyPress
NavigatorButtons.ConfirmDelete = False
OnCellDblClick = TVZDYCellDblClick
DataController.DataSource = DataSource3
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.GroupByBox = False
object cxGridDBColumn1: TcxGridDBColumn
Caption = #21253#25968#37327
DataBinding.FieldName = 'BSL'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WFBOrder.handBlack
Width = 61
end
object VDBColumn1: TcxGridDBColumn
Caption = #21367#25968#37327
DataBinding.FieldName = 'JSL'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WFBOrder.Default
Width = 65
end
object VDBColumn2: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'DBUnit'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_WFBOrder.Default
Width = 78
end
end
object cxGridLevel3: TcxGridLevel
GridView = TVDB
end
end
object WFBBZQty1: TEdit
Left = 86
Top = 78
Width = 62
Height = 18
TabOrder = 26
OnChange = WFBBZQty1Change
OnKeyPress = OrdQtyKeyPress
end
object WFBBZUnit1: TcxButtonEdit
Left = 150
Top = 77
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = WFBBZUnit1PropertiesButtonClick
Properties.OnChange = WFBBZUnit1PropertiesChange
TabOrder = 27
OnKeyDown = WFBCodeNameKeyDown
Width = 52
end
object WFBBZQty2: TEdit
Left = 217
Top = 78
Width = 62
Height = 18
TabOrder = 28
OnChange = WFBBZQty1Change
OnKeyPress = OrdQtyKeyPress
end
object WFBBZUnit2: TcxButtonEdit
Left = 281
Top = 77
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = WFBBZUnit2PropertiesButtonClick
Properties.OnChange = WFBBZUnit2PropertiesChange
TabOrder = 29
OnKeyDown = WFBCodeNameKeyDown
Width = 52
end
object WFBBZQty3: TEdit
Left = 345
Top = 78
Width = 62
Height = 18
TabOrder = 30
OnChange = WFBBZQty1Change
OnKeyPress = OrdQtyKeyPress
end
object WFBBZUnit3: TcxButtonEdit
Left = 409
Top = 77
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = WFBBZUnit3PropertiesButtonClick
Properties.OnChange = WFBBZUnit3PropertiesChange
TabOrder = 31
OnKeyDown = WFBCodeNameKeyDown
Width = 52
end
object WFBFK2: TEdit
Left = 573
Top = 78
Width = 36
Height = 18
TabOrder = 32
OnChange = WFBBZQty1Change
OnKeyPress = OrdQtyKeyPress
end
object WFBFK1: TEdit
Left = 525
Top = 78
Width = 36
Height = 18
TabOrder = 33
OnChange = WFBBZQty1Change
OnKeyPress = OrdQtyKeyPress
end
object WFBKZ: TEdit
Left = 680
Top = 78
Width = 55
Height = 18
TabOrder = 34
OnChange = WFBBZQty1Change
OnKeyPress = OrdQtyKeyPress
end
object BZ: TcxButtonEdit
Left = 869
Top = 77
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 0
Properties.OnButtonClick = BZPropertiesButtonClick
Properties.OnChange = BZPropertiesChange
TabOrder = 35
OnKeyDown = WFBCodeNameKeyDown
Width = 52
end
object PanZDY: TPanel
Left = 707
Top = 104
Width = 151
Height = 153
TabOrder = 36
Visible = False
object CXGridZDY: TcxGrid
Left = 3
Top = 4
Width = 142
Height = 113
TabOrder = 0
object TVZDY: TcxGridDBTableView
OnKeyPress = TVZDYKeyPress
NavigatorButtons.ConfirmDelete = False
OnCellDblClick = TVZDYCellDblClick
DataController.DataSource = DataSource2
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsSelection.CellSelect = False
OptionsView.GroupByBox = False
object VHelpZDYName: TcxGridDBColumn
DataBinding.FieldName = 'ZDYName'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_WFBOrder.handBlack
Width = 129
IsCaptionAssigned = True
end
end
object CXGridZDYLevel1: TcxGridLevel
GridView = TVZDY
end
end
object Button1: TButton
Left = 40
Top = 120
Width = 65
Height = 25
Caption = #20851#38381
TabOrder = 1
OnClick = Button1Click
end
end
end
object ScrollBox2: TScrollBox
Left = 0
Top = 349
Width = 1184
Height = 319
Align = alClient
BevelInner = bvNone
BevelOuter = bvNone
Ctl3D = False
ParentCtl3D = False
TabOrder = 2
object cxGrid3: TcxGrid
Left = 809
Top = 31
Width = 366
Height = 286
Align = alLeft
TabOrder = 0
object Tv3: TcxGridDBBandedTableView
OnMouseDown = Tv3MouseDown
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSourceQ
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'YCLCode'
Column = v3Column1
end>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.GroupByBox = False
Bands = <
item
Caption = #20854#23427
Styles.Header = DataLink_WFBOrder.TextSHuangSe
Width = 400
end>
object v3Column1: TcxGridDBBandedColumn
Caption = #29289#26009#21517#31216
DataBinding.FieldName = 'YCLName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v3Column1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 55
Position.BandIndex = 0
Position.ColIndex = 0
Position.RowIndex = 0
end
object v3Column2: TcxGridDBBandedColumn
Caption = #35268#26684
DataBinding.FieldName = 'YCLSpec'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 44
Position.BandIndex = 0
Position.ColIndex = 1
Position.RowIndex = 0
end
object v3Column3: TcxGridDBBandedColumn
Caption = #24211#23384
DataBinding.FieldName = 'YLKC'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 48
Position.BandIndex = 0
Position.ColIndex = 3
Position.RowIndex = 0
end
object v3Column4: TcxGridDBBandedColumn
Caption = #29992#37327
DataBinding.FieldName = 'YLQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v3Column4PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 53
Position.BandIndex = 0
Position.ColIndex = 2
Position.RowIndex = 0
end
object v3Column5: TcxGridDBBandedColumn
Caption = #21333#20301
DataBinding.FieldName = 'YLUnit'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 40
Position.BandIndex = 0
Position.ColIndex = 6
Position.RowIndex = 0
end
object v3Column6: TcxGridDBBandedColumn
Caption = #30003#36141#25968#37327
DataBinding.FieldName = 'SGQty'
HeaderAlignmentHorz = taCenter
Width = 66
Position.BandIndex = 0
Position.ColIndex = 7
Position.RowIndex = 0
end
object v3Column7: TcxGridDBBandedColumn
Caption = #21069#21333#24211#23384
DataBinding.FieldName = 'YCLYJKC'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 53
Position.BandIndex = 0
Position.ColIndex = 4
Position.RowIndex = 0
end
object v3Column8: TcxGridDBBandedColumn
Tag = 2
Caption = #19981#36275
DataBinding.FieldName = 'BZ'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 34
Position.BandIndex = 0
Position.ColIndex = 5
Position.RowIndex = 0
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv3
end
end
object cxGrid2: TcxGrid
Left = 425
Top = 31
Width = 384
Height = 286
Align = alLeft
TabOrder = 1
object Tv2: TcxGridDBBandedTableView
OnMouseDown = Tv2MouseDown
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSourceF
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'YCLCode'
Column = v2Column1
end>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.GroupByBox = False
Bands = <
item
Caption = #36741#21161#21407#26009
Styles.Header = DataLink_WFBOrder.FonePurple
Width = 428
end>
object v2Column1: TcxGridDBBandedColumn
Caption = #21407#26009#21517#31216
DataBinding.FieldName = 'YCLName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v2Column1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 68
Position.BandIndex = 0
Position.ColIndex = 0
Position.RowIndex = 0
end
object v2Column2: TcxGridDBBandedColumn
Caption = #32791#29575#8240
DataBinding.FieldName = 'YLSHQ'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 41
Position.BandIndex = 0
Position.ColIndex = 2
Position.RowIndex = 0
end
object v2Column3: TcxGridDBBandedColumn
Caption = #29992#37327'KG'
DataBinding.FieldName = 'YLQty'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 42
Position.BandIndex = 0
Position.ColIndex = 3
Position.RowIndex = 0
end
object v2Column4: TcxGridDBBandedColumn
Caption = #24211#23384
DataBinding.FieldName = 'YLKC'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 40
Position.BandIndex = 0
Position.ColIndex = 4
Position.RowIndex = 0
end
object v2Column5: TcxGridDBBandedColumn
Caption = #35268#26684
DataBinding.FieldName = 'YCLSpec'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 60
Position.BandIndex = 0
Position.ColIndex = 1
Position.RowIndex = 0
end
object v2Column6: TcxGridDBBandedColumn
Caption = #30003#36141#25968#37327
DataBinding.FieldName = 'SGQty'
HeaderAlignmentHorz = taCenter
Width = 74
Position.BandIndex = 0
Position.ColIndex = 7
Position.RowIndex = 0
end
object v2Column7: TcxGridDBBandedColumn
Caption = #21069#21333#24211#23384
DataBinding.FieldName = 'YCLYJKC'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 58
Position.BandIndex = 0
Position.ColIndex = 5
Position.RowIndex = 0
end
object v2Column8: TcxGridDBBandedColumn
Tag = 2
Caption = #19981#36275
DataBinding.FieldName = 'BZ'
HeaderAlignmentHorz = taCenter
Width = 34
Position.BandIndex = 0
Position.ColIndex = 6
Position.RowIndex = 0
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 31
Width = 425
Height = 286
Align = alLeft
TabOrder = 2
object Tv1: TcxGridDBBandedTableView
OnMouseDown = Tv1MouseDown
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSourceZ
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'YCLCode'
Column = v1Column1
end>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.GroupByBox = False
Bands = <
item
Caption = #20027#35201#21407#26009
Styles.Header = DataLink_WFBOrder.FontBlue
Width = 487
end>
object v1Column1: TcxGridDBBandedColumn
Caption = #21407#26009#21517#31216
DataBinding.FieldName = 'YCLName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v1Column1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 69
Position.BandIndex = 0
Position.ColIndex = 0
Position.RowIndex = 0
end
object v1Column2: TcxGridDBBandedColumn
Caption = #37197#27604'%'
DataBinding.FieldName = 'YLPB'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 37
Position.BandIndex = 0
Position.ColIndex = 2
Position.RowIndex = 0
end
object v1Column3: TcxGridDBBandedColumn
Caption = #25439#32791'%'
DataBinding.FieldName = 'YLSH'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 39
Position.BandIndex = 0
Position.ColIndex = 3
Position.RowIndex = 0
end
object v1Column4: TcxGridDBBandedColumn
Caption = #29992#37327'KG'
DataBinding.FieldName = 'YLQty'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 41
Position.BandIndex = 0
Position.ColIndex = 4
Position.RowIndex = 0
end
object v1Column5: TcxGridDBBandedColumn
Caption = #24211#23384
DataBinding.FieldName = 'YLKC'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 41
Position.BandIndex = 0
Position.ColIndex = 5
Position.RowIndex = 0
end
object v1Column6: TcxGridDBBandedColumn
Caption = #35268#26684
DataBinding.FieldName = 'YCLSpec'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 54
Position.BandIndex = 0
Position.ColIndex = 1
Position.RowIndex = 0
end
object v1Column7: TcxGridDBBandedColumn
Caption = #30003#36141#25968#37327
DataBinding.FieldName = 'SGQty'
HeaderAlignmentHorz = taCenter
Width = 64
Position.BandIndex = 0
Position.ColIndex = 8
Position.RowIndex = 0
end
object v1Column8: TcxGridDBBandedColumn
Caption = #21069#21333#24211#23384
DataBinding.FieldName = 'YCLYJKC'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 55
Position.BandIndex = 0
Position.ColIndex = 6
Position.RowIndex = 0
end
object v1Column9: TcxGridDBBandedColumn
Tag = 2
Caption = #19981#36275
DataBinding.FieldName = 'BZ'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Content = DataLink_WFBOrder.FoneRed
Width = 37
Position.BandIndex = 0
Position.ColIndex = 7
Position.RowIndex = 0
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ToolBar2: TToolBar
Left = 0
Top = 0
Width = 1182
Height = 31
ButtonHeight = 30
ButtonWidth = 95
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_WFBOrder.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 3
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 103
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 107
OnClick = ToolButton2Click
end
object TBPrint: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #25171#21360#35831#36141#21333
ImageIndex = 96
OnClick = TBPrintClick
end
end
end
object ADOTemp: TADOQuery
Connection = DataLink_WFBOrder.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 968
Top = 325
end
object ADOCmd: TADOQuery
Connection = DataLink_WFBOrder.ADOLink
Parameters = <>
Left = 744
Top = 309
end
object DataSourceZ: TDataSource
DataSet = Order_SubZ
Left = 296
Top = 440
end
object Order_SubZ: TClientDataSet
Aggregates = <>
Params = <>
Left = 256
Top = 440
end
object DataSource2: TDataSource
DataSet = ADOZDY
Left = 760
Top = 8
end
object ADOZDY: TADOQuery
Connection = DataLink_WFBOrder.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 728
Top = 5
end
object CDS_ZDY: TClientDataSet
Aggregates = <>
Params = <>
Left = 800
Top = 8
end
object ADOQuery1: TADOQuery
Connection = DataLink_WFBOrder.ADOLink
Parameters = <>
Left = 784
Top = 309
end
object PopupMenu1: TPopupMenu
Left = 328
Top = 229
object N1: TMenuItem
Caption = #22686#34892
OnClick = N1Click
end
object N2: TMenuItem
Caption = #21024#34892
OnClick = N2Click
end
end
object DataSource3: TDataSource
DataSet = CDS_DB
Left = 352
Top = 200
end
object CDS_DB: TClientDataSet
Aggregates = <>
Params = <>
Left = 304
Top = 240
end
object Order_SubF: TClientDataSet
Aggregates = <>
Params = <>
Left = 456
Top = 440
end
object DataSourceF: TDataSource
DataSet = Order_SubF
Left = 488
Top = 440
end
object Order_SubQ: TClientDataSet
Aggregates = <>
Params = <>
Left = 800
Top = 448
end
object DataSourceQ: TDataSource
DataSet = Order_SubQ
Left = 832
Top = 448
end
object ADOQueryQG: TADOQuery
Connection = DataLink_WFBOrder.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 224
Top = 309
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = ADOQueryQG
Left = 288
Top = 312
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 = 320
Top = 312
ReportData = {}
end
object RMXLSExport1: TRMXLSExport
ShowAfterExport = True
ExportPrecision = 1
PagesOfSheet = 1
ExportImages = True
ExportFrames = True
ExportImageFormat = ifBMP
JPEGQuality = 0
ScaleX = 1.000000000000000000
ScaleY = 1.000000000000000000
CompressFile = False
Left = 256
Top = 312
end
end