D10myBiaoqi/T01贸易生产计划/U_TradePlanList.dfm
DESKTOP-E401PHE\Administrator b0ed23a9b9 1123
2024-11-23 16:57:33 +08:00

1746 lines
44 KiB
Plaintext

inherited frmTradePlanList: TfrmTradePlanList
Left = 165
Top = 13
Caption = #29983#20135#35745#21010#21333#31649#29702
ClientHeight = 760
ClientWidth = 1540
FormStyle = fsMDIChild
Position = poScreenCenter
Visible = True
ExplicitWidth = 1556
ExplicitHeight = 799
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1540
Height = 76
AutoSize = True
ButtonHeight = 38
ButtonWidth = 115
Caption = 'ToolBar1'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradePlan.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TBRafreshClick
end
object TBAdd: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #26032#22686
ImageIndex = 9
OnClick = TBAddClick
end
object btnCopy: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #22797#21046
ImageIndex = 13
OnClick = btnCopyClick
end
object TBEdit: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #20462#25913
ImageIndex = 3
OnClick = TBEditClick
end
object TBDel: TToolButton
Left = 284
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 5
OnClick = TBDelClick
end
object ToolButton1: TToolButton
Left = 355
Top = 0
AutoSize = True
Caption = #25171#21367#35774#32622
ImageIndex = 3
OnClick = ToolButton1Click
end
object TBPrint: TToolButton
Left = 450
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 21
OnClick = TBPrintClick
end
object TBCK: TToolButton
Left = 521
Top = 0
AutoSize = True
Caption = #26597#30475
ImageIndex = 8
OnClick = TBCKClick
end
object ToolButton3: TToolButton
Left = 592
Top = 0
AutoSize = True
Caption = #21253#35013#34917#24405
ImageIndex = 4
OnClick = ToolButton3Click
end
object ToolButton9: TToolButton
Left = 687
Top = 0
AutoSize = True
Caption = #25253#20851#36164#26009#34917#24405
ImageIndex = 4
OnClick = ToolButton9Click
end
object ToolButton4: TToolButton
Left = 806
Top = 0
AutoSize = True
Caption = #38468#20214
ImageIndex = 22
OnClick = ToolButton4Click
end
object TBTJ: TToolButton
Left = 877
Top = 0
AutoSize = True
Caption = #25552#20132
ImageIndex = 12
Wrap = True
OnClick = TBTJClick
end
object TBTJCX: TToolButton
Left = 0
Top = 38
AutoSize = True
Caption = #25552#20132#25764#38144
ImageIndex = 11
OnClick = TBTJCXClick
end
object Tchk: TToolButton
Left = 95
Top = 38
AutoSize = True
Caption = #23457#26680
ImageIndex = 12
OnClick = TchkClick
end
object Tnochk: TToolButton
Left = 166
Top = 38
AutoSize = True
Caption = #25764#38144#23457#26680
ImageIndex = 11
OnClick = TnochkClick
end
object ToolButton7: TToolButton
Left = 261
Top = 38
AutoSize = True
Caption = #26242#23384
ImageIndex = 8
OnClick = ToolButton7Click
end
object ToolButton8: TToolButton
Left = 332
Top = 38
AutoSize = True
Caption = #21462#28040#26242#23384
ImageIndex = 9
OnClick = ToolButton8Click
end
object ToolButton5: TToolButton
Left = 427
Top = 38
AutoSize = True
Caption = #29983#20135#23436#25104
ImageIndex = 12
OnClick = ToolButton5Click
end
object ToolButton6: TToolButton
Left = 522
Top = 38
AutoSize = True
Caption = #29983#20135#23436#25104#25764#38144
ImageIndex = 11
OnClick = ToolButton6Click
end
object TWC: TToolButton
Left = 641
Top = 38
AutoSize = True
Caption = #23436#25104
ImageIndex = 12
OnClick = TWCClick
end
object TNowc: TToolButton
Left = 712
Top = 38
AutoSize = True
Caption = #25764#38144#23436#25104
ImageIndex = 11
OnClick = TNowcClick
end
object ToolButton2: TToolButton
Left = 807
Top = 38
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 902
Top = 38
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object Panel1: TPanel [1]
Left = 0
Top = 76
Width = 1540
Height = 51
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = 16242829
ParentBackground = False
TabOrder = 1
object Label3: TLabel
Left = 345
Top = 20
Width = 52
Height = 12
Caption = #35745#21010#21333#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 613
Top = 119
Width = 26
Height = 12
Caption = #20811#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 665
Top = 20
Width = 26
Height = 12
Caption = #23458#25143
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 506
Top = 20
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 = 813
Top = 21
Width = 52
Height = 12
Caption = #23458#25143#21333#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 = 977
Top = 12
Width = 11
Height = 19
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BegDate: TDateTimePicker
Left = 128
Top = 16
Width = 85
Height = 20
Date = 40675.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.464742650459811600
TabOrder = 0
end
object EndDate: TDateTimePicker
Left = 219
Top = 16
Width = 86
Height = 20
Date = 40675.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.464761099538009100
TabOrder = 2
end
object OrderNo: TEdit
Tag = 2
Left = 403
Top = 16
Width = 77
Height = 20
TabOrder = 1
OnKeyPress = OrderNoKeyPress
end
object MPRTKZ: TEdit
Tag = 2
Left = 654
Top = 99
Width = 56
Height = 20
TabOrder = 3
OnChange = OrderNoMChange
end
object ComboBox1: TComboBox
Left = 49
Top = 16
Width = 71
Height = 20
TabOrder = 4
Text = #21046#21333#26085#26399
OnChange = ComboBox1Change
Items.Strings = (
#21046#21333#26085#26399
#20132#36135#26085#26399)
end
object CustName: TEdit
Tag = 2
Left = 697
Top = 16
Width = 80
Height = 20
TabOrder = 5
OnKeyPress = OrderNoKeyPress
end
object C_Name: TEdit
Tag = 2
Left = 561
Top = 16
Width = 77
Height = 20
TabOrder = 6
OnKeyPress = OrderNoKeyPress
end
object BuyConNo: TEdit
Tag = 2
Left = 869
Top = 17
Width = 80
Height = 20
TabOrder = 7
OnKeyPress = OrderNoKeyPress
end
object CheckBox1: TCheckBox
Left = 28
Top = 18
Width = 19
Height = 17
Checked = True
State = cbChecked
TabOrder = 8
end
end
object cxGrid1: TcxGrid [2]
Left = 0
Top = 145
Width = 1540
Height = 411
Align = alClient
PopupMenu = PM_1
TabOrder = 3
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
OnCellDblClick = Tv1CellDblClick
OnFocusedRecordChanged = Tv1FocusedRecordChanged
DataController.DataSource = DataSource1
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = Tv1Column11
end
item
Kind = skSum
Column = Tv1Column10
end
item
Kind = skSum
Column = Tv1Column20
end
item
Kind = skSum
Column = Tv1Column21
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.IndicatorWidth = 30
Styles.Content = DataLink_TradePlan.Default
Styles.IncSearch = DataLink_TradePlan.SHuangSe
Styles.Footer = DataLink_TradePlan.Default
Styles.Header = DataLink_TradePlan.Default
Styles.Inactive = DataLink_TradePlan.SHuangSe
Styles.Selection = DataLink_TradePlan.SHuangSe
object v1Column16: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
HeaderAlignmentHorz = taCenter
Width = 38
end
object v1OrdDate: TcxGridDBColumn
Caption = #21046#21333#26085#26399
DataBinding.FieldName = 'OrdDate'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxDateEditProperties'
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.Default
Width = 80
end
object Tv1Column2: TcxGridDBColumn
Caption = #32463#33829#21333#20301
DataBinding.FieldName = 'OurCoName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.FontBlue
Width = 151
end
object Tv1Column17: TcxGridDBColumn
Caption = #38468#20214
DataBinding.FieldName = 'ISFJ'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 40
end
object Tv1Column4: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'CustName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.FoneClMaroon
Width = 88
end
object v1OrderNo: TcxGridDBColumn
Caption = #35745#21010#21333#21495
DataBinding.FieldName = 'OrderNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.Default
Width = 80
end
object v1DeliveryDate: TcxGridDBColumn
Caption = #20132#36135#26085#26399
DataBinding.FieldName = 'DlyDate'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxDateEditProperties'
Properties.ShowTime = False
OnCustomDrawCell = v1DeliveryDateCustomDrawCell
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.Default
Width = 80
end
object Tv1Column3: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
end
object Tv1Column22: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 89
end
object Tv1Column12: TcxGridDBColumn
Caption = #21512#21516#21495
DataBinding.FieldName = 'ConNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 72
end
object Tv1Column18: TcxGridDBColumn
Caption = #23458#25143#21333#21495
DataBinding.FieldName = 'BuyConNo'
DataBinding.IsNullValueType = True
end
object Tv1Column13: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'C_Width'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 68
end
object Tv1Column14: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'C_GramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
end
object Tv1Column15: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'C_Spec'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 72
end
object Tv1Column16: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'C_Composition'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
end
object Tv1Column11: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'HZPiQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 54
end
object Tv1Column10: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'OrdQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1Column11: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'OrdUnit'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column6: TcxGridDBColumn
Caption = #21046#21333#20154
DataBinding.FieldName = 'FILLER'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 72
end
object Tv1Column1: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 99
end
object Tv1Column5: TcxGridDBColumn
Caption = #24037#33402
DataBinding.FieldName = 'Technics'
DataBinding.IsNullValueType = True
end
object Tv1Column7: TcxGridDBColumn
Caption = #24037#21378#32534#21495
DataBinding.FieldName = 'FtyNo'
DataBinding.IsNullValueType = True
end
object Tv1Column8: TcxGridDBColumn
Caption = #24037#21378#21517#31216
DataBinding.FieldName = 'FtyName'
DataBinding.IsNullValueType = True
end
object Tv1Column20: TcxGridDBColumn
Caption = #31859#25968
DataBinding.FieldName = 'Length'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column21: TcxGridDBColumn
Caption = #37325#37327
DataBinding.FieldName = 'Weight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv1Column9: TcxGridDBColumn
Caption = #36319#21333#21592
DataBinding.FieldName = 'FollowMan'
DataBinding.IsNullValueType = True
end
object Tv1Column19: TcxGridDBColumn
Caption = #20135#21697#22797#21333#21495
DataBinding.FieldName = 'FOrdNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 87
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object cxSplitter1: TcxSplitter [3]
Left = 0
Top = 556
Width = 1540
Height = 8
HotZoneClassName = 'TcxMediaPlayer9Style'
AlignSplitter = salBottom
end
object cxTabControl1: TcxTabControl [4]
Left = 0
Top = 127
Width = 1540
Height = 18
Align = alTop
TabOrder = 2
Properties.CustomButtons.Buttons = <>
Properties.Style = 9
Properties.TabIndex = 0
Properties.Tabs.Strings = (
' '#24453#25552#20132' '
' '#24453#23457#26680' '
' '#24050#23457#26680' '
' '#26242#23384#21306' '
' '#29983#20135#23436#25104' '
' '#24050#23436#25104' '
' '#20840#37096' ')
OnChange = cxTabControl1Change
ClientRectRight = 0
ClientRectTop = 0
end
object Panel2: TPanel [5]
Left = 0
Top = 564
Width = 1540
Height = 196
Align = alBottom
BevelOuter = bvNone
Caption = 'Panel2'
TabOrder = 5
object cxGrid2: TcxGrid
Left = 0
Top = 0
Width = 1540
Height = 196
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PopupMenu2
TabOrder = 0
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DataSource2
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = '0'
Position = spFooter
end
item
Format = '0'
Position = spFooter
Column = v1PRTOrderQty
end
item
Format = '0'
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1PRTOrderQty
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = VC_PRTPs
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.IncSearch = DataLink_TradePlan.SHuangSe
Styles.Footer = DataLink_TradePlan.Default
Styles.Header = DataLink_TradePlan.Default
Styles.Inactive = DataLink_TradePlan.SHuangSe
Styles.Selection = DataLink_TradePlan.SHuangSe
object cxGridDBColumn1: TcxGridDBColumn
Tag = 99
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 66
end
object v1PRTColor: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.handBlack
Width = 66
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'C_ColorNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1Column5: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'C_Pattern'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object VC_PRTPs: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'OrdPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v1PRTOrderQty: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'OrdQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.Default
Width = 66
end
object v1OrderUnit: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'OrdUnit'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxComboBoxProperties'
Properties.Items.Strings = (
'M'
'Y'
'Kg')
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.Default
Width = 66
end
object cxGridDBColumn7: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'OrdSNote'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV2Column1: TcxGridDBColumn
Caption = #27454#21495
DataBinding.FieldName = 'C_StyleNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 66
end
object TV2Column2: TcxGridDBColumn
Caption = #33457#33394#21495
DataBinding.FieldName = 'DSH'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 77
end
object TV2Column3: TcxGridDBColumn
Caption = #36873#21495
DataBinding.FieldName = 'XH'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 66
end
object TV2Column4: TcxGridDBColumn
Caption = #24320#21305
DataBinding.FieldName = 'KP'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 66
end
object TV2Column5: TcxGridDBColumn
Caption = #24320#21305#21333#20301
DataBinding.FieldName = 'KPUnit'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 71
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV2
end
end
end
object Panel3: TPanel [6]
Left = -216
Top = 353
Width = 1177
Height = 634
Color = clBtnHighlight
ParentBackground = False
TabOrder = 6
Visible = False
object Label23: TLabel
Left = 344
Top = 25
Width = 52
Height = 15
Caption = #21697#36136#35201#27714
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label47: TLabel
Left = 344
Top = 50
Width = 52
Height = 15
Caption = #24320#21367#35201#27714
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label48: TLabel
Left = 344
Top = 75
Width = 52
Height = 15
Caption = #25171#21253#35201#27714
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label36: TLabel
Left = 383
Top = 124
Width = 13
Height = 75
Caption = #25346#13#10#38057#13#10#12289#13#10#23553#13#10#26465
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label37: TLabel
Tag = 2
Left = 383
Top = 214
Width = 13
Height = 60
Caption = #36148#13#10#12289#13#10#28907#13#10#37329
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label40: TLabel
Left = 383
Top = 359
Width = 13
Height = 30
Caption = #33337#13#10#21787
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label41: TLabel
Tag = 2
Left = 383
Top = 499
Width = 13
Height = 30
Caption = #21367#13#10#21787
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 344
Top = 100
Width = 52
Height = 15
Caption = #25171#21253#26041#24335
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object MainId: TEdit
Left = 679
Top = 599
Width = 121
Height = 20
TabOrder = 0
Visible = False
end
object PZNote: TBtnEditC
Tag = 2
Left = 408
Top = 23
Width = 440
Height = 20
Hint = 'PZNote/'#21697#36136#35201#27714
TabOrder = 1
OnBtnUpClick = PZNoteBtnUpClick
OnBtnDnClick = PZNoteBtnDnClick
end
object KJNote: TBtnEditC
Tag = 2
Left = 408
Top = 48
Width = 440
Height = 20
Hint = 'KJNote/'#24320#21367#35201#27714
TabOrder = 2
OnBtnUpClick = PZNoteBtnUpClick
OnBtnDnClick = PZNoteBtnDnClick
end
object DBNote: TBtnEditC
Tag = 2
Left = 408
Top = 72
Width = 440
Height = 20
Hint = 'DBNote/'#25171#21253#35201#27714
TabOrder = 3
OnBtnUpClick = PZNoteBtnUpClick
OnBtnDnClick = PZNoteBtnDnClick
end
object ggft: TMemo
Tag = 2
Left = 408
Top = 126
Width = 440
Height = 80
Hint = 'ggft/'#25346#38057#23553#26465
ScrollBars = ssVertical
TabOrder = 4
OnDblClick = ggftDblClick
end
object tj: TMemo
Tag = 2
Left = 408
Top = 217
Width = 440
Height = 130
ScrollBars = ssVertical
TabOrder = 5
end
object cm: TMemo
Tag = 2
Left = 408
Top = 360
Width = 440
Height = 130
ScrollBars = ssVertical
TabOrder = 6
end
object jm: TMemo
Tag = 2
Left = 408
Top = 501
Width = 440
Height = 80
ScrollBars = ssVertical
TabOrder = 7
end
object Button1: TButton
Left = 412
Top = 598
Width = 92
Height = 25
Caption = #20445#23384
TabOrder = 8
OnClick = Button1Click
end
object Button2: TButton
Left = 531
Top = 597
Width = 92
Height = 25
Caption = #20851#38381
TabOrder = 9
OnClick = Button2Click
end
object ADO_BL: TRichEdit
Left = 1
Top = 1
Width = 326
Height = 632
Align = alLeft
Color = clInfoBk
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
Lines.Strings = (
'ADO_BL')
ParentFont = False
ReadOnly = True
TabOrder = 10
Zoom = 100
end
object cxGrid3: TcxGrid
Left = 879
Top = 1
Width = 297
Height = 632
Align = alRight
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PopupMenu2
TabOrder = 11
object TV3: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DataSource3
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = '0'
Position = spFooter
end
item
Format = '0'
Position = spFooter
Column = cxGridDBColumn9
end
item
Format = '0'
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxGridDBColumn9
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = cxGridDBColumn8
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.IncSearch = DataLink_TradePlan.SHuangSe
Styles.Footer = DataLink_TradePlan.Default
Styles.Header = DataLink_TradePlan.Default
Styles.Inactive = DataLink_TradePlan.SHuangSe
Styles.Selection = DataLink_TradePlan.SHuangSe
object cxGridDBColumn2: TcxGridDBColumn
Tag = 99
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 66
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'C_ColorNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'C_Pattern'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 68
end
object cxGridDBColumn8: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'OrdPiece'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = cxGridDBColumn8PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn9: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'OrdQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradePlan.Default
Width = 68
end
end
object cxGridLevel2: TcxGridLevel
GridView = TV3
end
end
object DBFS: TBtnEditC
Tag = 2
Left = 408
Top = 98
Width = 440
Height = 20
Hint = 'DBFS/'#25171#21253#26041#24335
TabOrder = 12
OnBtnUpClick = PZNoteBtnUpClick
OnBtnDnClick = PZNoteBtnDnClick
end
end
object Panel4: TPanel [7]
Left = 869
Top = 363
Width = 663
Height = 634
Hint = 'BGName/'#25253#20851#21697#21517
TabOrder = 7
Visible = False
object Label7: TLabel
Left = 385
Top = 12
Width = 52
Height = 12
Caption = #25253#20851#21697#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 385
Top = 46
Width = 52
Height = 12
Caption = #25253#20851#25104#20998
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 385
Top = 79
Width = 39
Height = 12
Caption = #25253#20851#20215
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 385
Top = 110
Width = 40
Height = 12
Caption = #23454' '#20215
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 385
Top = 142
Width = 52
Height = 12
Caption = #25253#20851#38376#24133
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 385
Top = 172
Width = 52
Height = 12
Caption = #25253#20851#20811#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 385
Top = 302
Width = 52
Height = 12
Caption = #25253#20851#31859#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 385
Top = 203
Width = 52
Height = 12
Caption = #25253#20851#31435#26041
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 385
Top = 235
Width = 52
Height = 12
Caption = #25253#20851#27611#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 385
Top = 266
Width = 52
Height = 12
Caption = #25253#20851#20928#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 385
Top = 336
Width = 39
Height = 12
Caption = #25910#36135#20154
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Left = 391
Top = 367
Width = 13
Height = 30
Caption = #33337#13#10#21787
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Tag = 2
Left = 391
Top = 507
Width = 13
Height = 30
Caption = #21367#13#10#21787
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object ADO_BG: TRichEdit
Left = 1
Top = 1
Width = 356
Height = 632
Align = alLeft
Color = clInfoBk
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
Lines.Strings = (
'ADO_BG')
ParentFont = False
TabOrder = 0
Zoom = 100
ExplicitHeight = 607
end
object BGComposition: TEdit
Tag = 2
Left = 447
Top = 42
Width = 188
Height = 20
TabOrder = 1
end
object BGPrice: TEdit
Tag = 2
Left = 447
Top = 75
Width = 188
Height = 20
TabOrder = 2
end
object SJPrice: TEdit
Tag = 2
Left = 447
Top = 107
Width = 188
Height = 20
TabOrder = 3
end
object BGWidth: TEdit
Tag = 2
Left = 447
Top = 138
Width = 188
Height = 20
TabOrder = 4
end
object BGGramWeight: TEdit
Tag = 2
Left = 447
Top = 169
Width = 188
Height = 20
TabOrder = 5
end
object BGMeter: TEdit
Tag = 2
Left = 447
Top = 298
Width = 188
Height = 20
TabOrder = 6
end
object BGLF: TEdit
Tag = 2
Left = 447
Top = 200
Width = 188
Height = 20
TabOrder = 7
end
object BGGrossWeight: TEdit
Tag = 2
Left = 447
Top = 231
Width = 188
Height = 20
TabOrder = 8
end
object BGNetWeight: TEdit
Tag = 2
Left = 447
Top = 263
Width = 188
Height = 20
TabOrder = 9
end
object consignee: TEdit
Tag = 2
Left = 447
Top = 333
Width = 188
Height = 20
TabOrder = 10
end
object Button3: TButton
Left = 395
Top = 600
Width = 97
Height = 25
Caption = #20445#23384
TabOrder = 11
OnClick = Button3Click
end
object Button4: TButton
Left = 530
Top = 600
Width = 97
Height = 25
Caption = #20851#38381
TabOrder = 12
OnClick = Button4Click
end
object BGMainID: TEdit
Tag = 1
Left = 203
Top = 490
Width = 102
Height = 20
TabOrder = 13
Visible = False
OnKeyPress = OrderNoKeyPress
end
object BGName: TBtnEditC
Left = 447
Top = 9
Width = 188
Height = 20
Hint = 'BGName/'#25253#20851#21697#21517
TabOrder = 14
OnBtnUpClick = BGNameBtnUpClick
end
object BGCM: TMemo
Tag = 1
Left = 447
Top = 366
Width = 188
Height = 130
ScrollBars = ssVertical
TabOrder = 15
end
object BGJM: TMemo
Tag = 1
Left = 447
Top = 507
Width = 188
Height = 80
ScrollBars = ssVertical
TabOrder = 16
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Left = 257
Top = 152
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Left = 121
Top = 153
end
object cxgrdpmn1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 606
Top = 316
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Parameters = <>
Left = 593
Top = 243
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradePlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 396
Top = 160
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_TradePlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 320
Top = 224
end
object DataSource1: TDataSource
DataSet = Order_Main
Left = 1265
Top = 443
end
object Order_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 542
Top = 243
end
object ADOQuerySub: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Parameters = <>
Left = 312
Top = 600
end
object DataSource2: TDataSource
DataSet = ORDER_SUB
Left = 408
Top = 604
end
object ADOQueryImage: TADOQuery
Connection = DataLink_TradePlan.ADOLink
EnableBCD = False
Parameters = <>
Left = 316
Top = 283
end
object DSImage: TDataSource
DataSet = ADOQueryImage
Left = 416
Top = 288
end
object IdFTP1: TIdFTP
ConnectTimeout = 0
NATKeepAlive.UseKeepAlive = False
NATKeepAlive.IdleTimeMS = 0
NATKeepAlive.IntervalMS = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
ReadTimeout = 0
Left = 92
Top = 258
end
object ORDER_SUB: TClientDataSet
Aggregates = <>
Params = <>
Left = 212
Top = 608
end
object PopupMenu2: TPopupMenu
Left = 532
Top = 636
object N3: TMenuItem
Caption = #20840#36873
OnClick = N3Click
end
object N4: TMenuItem
Caption = #20840#24323
OnClick = N4Click
end
object N2: TMenuItem
Caption = #22797#21046
OnClick = N2Click
end
end
object cxgrdpmn2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 660
Top = 636
end
object CDS_WXTS: TClientDataSet
Aggregates = <>
Params = <>
Left = 412
Top = 424
end
object PM_1: TPopupMenu
Left = 548
Top = 297
object N1: TMenuItem
Caption = #22797#21046
OnClick = N1Click
end
end
object GPM_3: TcxGridPopupMenu
PopupMenus = <>
Left = 647
Top = 390
end
object CDS_3: TClientDataSet
Aggregates = <>
Params = <>
Left = 1096
Top = 347
end
object DataSource3: TDataSource
DataSet = CDS_3
Left = 1105
Top = 399
end
object ADOCmd: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Parameters = <>
Left = 955
Top = 300
end
object ADOQuery1: TADOQuery
Connection = DataLink_TradePlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 551
Top = 380
end
object ADOQuery2: TADOQuery
Connection = DataLink_TradePlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 672
Top = 251
end
end