Group_99/D10myBiaoqi
7
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
d4c4fd0a31
D10myBiaoqi/B04采购计划管理/U_ClothRSPlanPut.dfm

1166 lines
29 KiB
Plaintext
Raw Normal View History

0704
2024-07-04 16:01:24 +08:00
inherited frmClothRSPlanPut: TfrmClothRSPlanPut
Left = 219
Top = 76
Caption = #24067#21305#26579#33394#35745#21010#24405#20837
ClientHeight = 691
ClientWidth = 1506
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Height = -12
Font.Name = #23435#20307
OldCreateOrder = True
Position = poScreenCenter
WindowState = wsMaximized
ExplicitWidth = 1522
ExplicitHeight = 730
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1506
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_PurchasePlan.ImageList_new32
Images = DataLink_PurchasePlan.ImageList_new32
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 16
OnClick = TBSaveClick
end
object ToolButton3: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton3Click
end
object TBClose: TToolButton
Left = 166
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object ToolBar2: TToolBar [1]
Tag = 1
Left = 0
Top = 365
Width = 1506
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 103
Caption = 'ToolBar1'
Color = clBtnFace
DisabledImages = DataLink_PurchasePlan.ImageList_new32
EdgeInner = esNone
EdgeOuter = esNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_PurchasePlan.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 1
object ToolButton4: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #29983#20135#35745#21010#21333
ImageIndex = 12
OnClick = ToolButton4Click
end
object ToolButton1: TToolButton
Left = 107
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 2
Visible = False
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 178
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 6
OnClick = ToolButton2Click
end
object ToolButton5: TToolButton
Left = 249
Top = 0
AutoSize = True
Caption = #19968#38190#26367#25442
ImageIndex = 1
OnClick = ToolButton5Click
end
end
object ScrollBox1: TScrollBox [2]
Left = 0
Top = 38
Width = 1506
Height = 327
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
Color = clWhite
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentCtl3D = False
ParentFont = False
TabOrder = 2
object Label3: TLabel
Left = 289
Top = 44
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 Label9: TLabel
Left = 770
Top = 16
Width = 66
Height = 12
Caption = #29983' '#20135' '#21592#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 = 40
Top = 17
Width = 65
Height = 12
Caption = #26579#33394#21333#21495#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 = 527
Top = 17
Width = 65
Height = 12
Caption = #25105#26041#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 288
Top = 17
Width = 66
Height = 12
Caption = #20379' '#24212' '#21830#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 770
Top = 69
Width = 66
Height = 12
Caption = #28322' '#30701' '#35013#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label27: TLabel
Left = 40
Top = 98
Width = 65
Height = 12
Caption = #26159#21542#21547#31246#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label29: TLabel
Left = 276
Top = 69
Width = 78
Height = 12
Caption = #20379#24212#21830#22320#22336#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label30: TLabel
Left = 527
Top = 69
Width = 65
Height = 12
Caption = #25910#36135#21333#20301#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 = 525
Top = 98
Width = 67
Height = 12
Caption = #24065' '#31181#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 = 40
Top = 44
Width = 65
Height = 12
Caption = #20184#27454#26041#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 40
Top = 69
Width = 65
Height = 12
Caption = #36816#36755#26041#24335#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 = 289
Top = 98
Width = 65
Height = 12
Caption = #20215#26684#26415#35821#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 = 40
Top = 177
Width = 65
Height = 12
Caption = #21253#35013#35201#27714#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 771
Top = 44
Width = 65
Height = 12
Caption = #20132#26399#35828#26126#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 527
Top = 44
Width = 65
Height = 12
Caption = #20132#36135#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object lblSalesId: TLabel
Left = 1067
Top = 302
Width = 65
Height = 12
Caption = #19994#21153#32534#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label25: TLabel
Left = 1075
Top = 323
Width = 65
Height = 12
Caption = #29702#21333#32534#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label1: TLabel
Left = 769
Top = 100
Width = 67
Height = 12
Caption = #32553' '#29575#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 = 940
Top = 95
Width = 8
Height = 16
Caption = '%'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 997
Top = 206
Width = 66
Height = 12
Caption = #22797' '#21512' '#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label7: TLabel
Left = 14
Top = 122
Width = 91
Height = 12
Caption = #20379#24212#21830#32852#31995#20154#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 = 289
Top = 119
Width = 65
Height = 12
Caption = #25910#36135#22320#22336#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 40
Top = 206
Width = 65
Height = 12
Caption = #36136#37327#26631#20934#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 = 40
Top = 235
Width = 65
Height = 12
Caption = #39564#25910#26631#20934#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 40
Top = 261
Width = 65
Height = 12
Caption = #36829#32422#36131#20219#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 = 527
Top = 121
Width = 65
Height = 12
Caption = #29983#20135#38376#24133#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 = 771
Top = 121
Width = 65
Height = 12
Caption = #29983#20135#20811#37325#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 = 767
Top = 172
Width = 39
Height = 12
Caption = #22791#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object PurDate: TDateTimePicker
Tag = 2
Left = 357
Top = 40
Width = 125
Height = 20
BevelInner = bvNone
Date = 40916.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.670856296288548000
TabOrder = 0
end
object PurNo: TEdit
Tag = 2
Left = 109
Top = 17
Width = 125
Height = 18
TabOrder = 1
Text = #33258#21160#29983#25104
end
object BuyName: TBtnEditC
Tag = 2
Left = 597
Top = 13
Width = 125
Height = 20
ReadOnly = True
TabOrder = 2
OnBtnUpClick = BuyNameBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object QtyNote: TBtnEditC
Tag = 2
Left = 834
Top = 65
Width = 125
Height = 20
Hint = 'QtyNoteZW/'#28322#30701#35013
TabOrder = 3
OnBtnUpClick = SalesmanBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object Sellname: TBtnEditC
Tag = 2
Left = 357
Top = 16
Width = 125
Height = 20
Hint = 'SellName/'#20379#24212#21830
TabOrder = 4
OnBtnUpClick = SellNameBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object IsTax: TComboBox
Tag = 2
Left = 109
Top = 94
Width = 125
Height = 20
TabOrder = 5
Items.Strings = (
#26159
#21542)
end
object QiYun: TBtnEditC
Tag = 2
Left = 357
Top = 67
Width = 125
Height = 20
Hint = 'QiYun/'#20379#24212#21830#22320#22336
TabOrder = 6
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object MuDi: TBtnEditC
Tag = 2
Left = 597
Top = 67
Width = 125
Height = 20
Hint = 'MuDi/'#25910#36135#21333#20301
TabOrder = 7
OnBtnUpClick = MuDiBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object Currency: TComboBox
Tag = 2
Left = 597
Top = 94
Width = 125
Height = 20
ItemIndex = 0
TabOrder = 8
Text = 'CNY'
Items.Strings = (
'CNY'
'USD')
end
object YunShu: TBtnEditC
Tag = 2
Left = 110
Top = 66
Width = 125
Height = 20
Hint = 'YunShu/'#36816#36755#26041#24335
TabOrder = 9
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object Payment: TBtnEditC
Tag = 2
Left = 109
Top = 40
Width = 125
Height = 20
Hint = 'Payment/'#20184#27454#26041#24335
TabOrder = 10
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object JiaGeSY: TBtnEditC
Tag = 2
Left = 357
Top = 94
Width = 125
Height = 20
Hint = 'JiaGeSY/'#20215#26684#26415#35821
TabOrder = 11
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object Packing: TBtnEditC
Tag = 2
Left = 109
Top = 175
Width = 611
Height = 20
Hint = 'Packing/'#21253#35013#35201#27714
AutoSize = False
TabOrder = 12
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object DlyDate: TDateTimePicker
Tag = 2
Left = 597
Top = 40
Width = 125
Height = 20
BevelInner = bvNone
Date = 40916.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.670856296288548000
TabOrder = 13
end
object ShippMent: TEdit
Tag = 2
Left = 834
Top = 41
Width = 125
Height = 18
TabOrder = 14
OnKeyPress = ShippMentKeyPress
end
object SalesId: TEdit
Tag = 2
Left = 1138
Top = 296
Width = 125
Height = 18
TabOrder = 15
Visible = False
end
object TallyId: TEdit
Tag = 2
Left = 1139
Top = 320
Width = 125
Height = 18
TabOrder = 16
Visible = False
end
object SL: TEdit
Tag = 2
Left = 834
Top = 95
Width = 100
Height = 18
TabOrder = 17
OnKeyPress = SLKeyPress
end
object FHS: TEdit
Tag = 2
Left = 1067
Top = 204
Width = 122
Height = 18
TabOrder = 18
Visible = False
OnKeyPress = SLKeyPress
end
object DlyPlace: TBtnEditC
Tag = 2
Left = 109
Top = 118
Width = 125
Height = 20
Hint = 'DlyPlace/'#20379#24212#21830#32852#31995#20154
TabOrder = 19
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object SHAddress: TBtnEditC
Tag = 2
Left = 357
Top = 118
Width = 125
Height = 20
Hint = 'SHAddress/'#25910#36135#22320#22336
TabOrder = 20
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object Purer: TBtnEditC
Tag = 2
Left = 834
Top = 13
Width = 125
Height = 20
Hint = 'SellName/'#20379#24212#21830
TabOrder = 21
OnBtnUpClick = PurerBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object ZLNote: TBtnEditC
Tag = 2
Left = 109
Top = 201
Width = 611
Height = 20
Hint = 'ZLNote/'#36136#37327#26631#20934
AutoSize = False
TabOrder = 22
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object YSNote: TBtnEditC
Tag = 2
Left = 109
Top = 230
Width = 611
Height = 20
Hint = 'YSNote/'#39564#25910#26631#20934
AutoSize = False
TabOrder = 23
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object WYNote: TBtnEditC
Tag = 2
Left = 109
Top = 255
Width = 611
Height = 20
Hint = 'WYNote/'#36829#32422#36131#20219
AutoSize = False
TabOrder = 24
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object MainID: TEdit
Left = 1038
Top = 173
Width = 121
Height = 18
TabOrder = 25
Visible = False
end
object SCMF: TEdit
Tag = 7
Left = 597
Top = 119
Width = 122
Height = 18
TabOrder = 26
end
object SCKZ: TEdit
Tag = 7
Left = 834
Top = 118
Width = 127
Height = 18
TabOrder = 27
end
object Note: TMemo
Tag = 2
Left = 769
Top = 195
Width = 197
Height = 80
Hint = 'ggft/'#25346#38057#23553#26465
ScrollBars = ssVertical
TabOrder = 28
end
end
object cxGrid1: TcxGrid [3]
Left = 0
Top = 403
Width = 1506
Height = 288
Align = alClient
BorderStyle = cxcbsNone
PopupMenu = pm_sub
TabOrder = 3
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
0920
2024-09-20 16:26:35 +08:00
ScrollbarAnnotations.CustomAnnotations = <>
0704
2024-07-04 16:01:24 +08:00
DataController.DataSource = DS_1
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 = cxGridDBColumn20
end
item
Format = '0'
Position = spFooter
Column = cxGridDBColumn22
end
item
Kind = skSum
Position = spFooter
Column = TV1Column3
end
item
Kind = skSum
Column = TV1Column3
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxGridDBColumn20
end
item
Kind = skSum
end
item
Kind = skSum
Column = cxGridDBColumn23
end
item
Kind = skSum
Column = TV1Column3
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_PurchasePlan.Default
Styles.Header = DataLink_PurchasePlan.Default
Styles.Selection = DataLink_PurchasePlan.SHuangSe
object cxGridDBColumn13: TcxGridDBColumn
Tag = 9
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Width = 41
end
object cxGridDBColumn14: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'SerialNo'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
SortIndex = 0
SortOrder = soAscending
Styles.Header = DataLink_PurchasePlan.Default
Width = 55
end
object TV1Column8: TcxGridDBColumn
Caption = #36873#21495
DataBinding.FieldName = 'XH'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = ButtonEdit
HeaderAlignmentHorz = taCenter
Width = 53
end
object TV1Column9: TcxGridDBColumn
Caption = #33457#33394#21495
DataBinding.FieldName = 'HSNO'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 60
end
object cxGridDBColumn15: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'C_Code'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
Properties.OnButtonClick = v1Column10PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 77
end
object cxGridDBColumn16: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'C_Name'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 70
end
object cxGridDBColumn17: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'C_Spec'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 60
end
object cxGridDBColumn18: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'C_Composition'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 70
end
object cxGridDBColumn19: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 70
end
object TV1Column11: TcxGridDBColumn
Caption = #23454#38469#26579#33394#25968#37327
DataBinding.FieldName = 'SCGQty'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 104
end
object TV1Column7: TcxGridDBColumn
Caption = #23433#25490#26579#33394#25968#37327
DataBinding.FieldName = 'CGQty'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 67
end
object cxGridDBColumn20: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_PurchasePlan.Default
Width = 70
end
object cxGridDBColumn21: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'QtyUnit'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsEditFixedList
Properties.Items.Strings = (
'Kg'
'M'
'Y')
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_PurchasePlan.Default
Width = 58
end
object cxGridDBColumn22: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'Price'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Header = DataLink_PurchasePlan.handBlack
Width = 70
end
object cxGridDBColumn23: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'Amount'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 84
end
object cxGridDBColumn24: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'SNote'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 70
end
object TV1Column1: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'C_Pattern'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 54
end
object TV1Column2: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'C_ColorNo'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 57
end
object TV1Column3: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'Piece'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
end
object TV1Column4: TcxGridDBColumn
DataBinding.FieldName = 'SubId'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
Visible = False
end
object TV1Column5: TcxGridDBColumn
Caption = #24320#21305
DataBinding.FieldName = 'KP'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 50
end
object TV1Column6: TcxGridDBColumn
Caption = #24320#21305#21333#20301
DataBinding.FieldName = 'KPUnit'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = TV1Column6PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 63
end
object TV1Column10: TcxGridDBColumn
DataBinding.FieldName = 'MainID'
0920
2024-09-20 16:26:35 +08:00
DataBinding.IsNullValueType = True
0704
2024-07-04 16:01:24 +08:00
Visible = False
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV1
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_PurchasePlan.ADOLink
Left = 1177
Top = 104
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_PurchasePlan.ADOLink
Left = 1081
Top = 97
end
inherited ImageList_new32: TImageList
Left = 768
Top = 560
end
object ADOTemp: TADOQuery
Connection = DataLink_PurchasePlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 728
Top = 65533
end
object ADOCmd: TADOQuery
Connection = DataLink_PurchasePlan.ADOLink
Parameters = <>
Left = 968
Top = 133
end
object DS_1: TDataSource
DataSet = Order_Sub
Left = 789
Top = 443
end
object Order_Sub: TClientDataSet
Aggregates = <>
IndexFieldNames = 'SerialNo'
Params = <>
Left = 727
Top = 438
end
object cxgrdpmn1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 802
Top = 500
end
object pm_sub: TPopupMenu
Left = 738
Top = 524
object N1: TMenuItem
Caption = #20840#36873
OnClick = N1Click
end
object N2: TMenuItem
Caption = #20840#24323
OnClick = N2Click
end
end
object ADOQuery1: TADOQuery
Connection = DataLink_PurchasePlan.ADOLink
Parameters = <>
Left = 976
Top = 141
end
end
Reference in New Issue Copy Permalink