D10myBiaoqi/B01基础合同管理/U_SalesConInPut.dfm

1555 lines
39 KiB
Plaintext
Raw Normal View History

2024-07-04 16:01:24 +08:00
inherited frmSalesConInPut: TfrmSalesConInPut
Left = 219
Top = 76
Caption = #38144#21806#21512#21516#24405#20837
ClientHeight = 695
ClientWidth = 1517
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Height = -12
Font.Name = #23435#20307
OldCreateOrder = True
Position = poScreenCenter
WindowState = wsMaximized
ExplicitWidth = 1533
ExplicitHeight = 734
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1517
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Contract.ImageList_new32
Images = DataLink_Contract.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 ScrollBox1: TScrollBox [1]
Left = 0
Top = 38
Width = 1517
Height = 335
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 = 1
object Label3: TLabel
Left = 40
Top = 81
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 = 517
Top = 36
Width = 66
Height = 12
Caption = #19994' '#21153' '#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 = 39
Top = 10
Width = 66
Height = 12
Caption = #21512' '#21516' '#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 = 38
Top = 36
Width = 67
Height = 12
Caption = #23458' '#25143#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 = 517
Top = 10
Width = 65
Height = 12
Caption = #32463#33829#21333#20301#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 = 40
Top = 140
Width = 65
Height = 12
Caption = #25968#37327#28322#30701#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label34: TLabel
Left = 277
Top = 10
Width = 65
Height = 12
Caption = #23458#25143#21333#21495#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 = 277
Top = 36
Width = 66
Height = 12
Caption = #20013' '#38388' '#21830#65306
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label27: TLabel
Left = 517
Top = 188
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 = 518
Top = 110
Width = 66
Height = 12
Caption = #36215' '#36816' '#28207#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 = 759
Top = 110
Width = 66
Height = 12
Caption = #30446' '#30340' '#28207#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 = 759
Top = 81
Width = 65
Height = 12
Caption = #23454#26102#27719#29575#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 = 38
Top = 188
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 Label7: TLabel
Left = 791
Top = 266
Width = 65
Height = 12
Caption = #20323#37329#27604#20363#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label11: TLabel
Left = 40
Top = 219
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 = 110
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 Label4: TLabel
Left = 785
Top = 212
Width = 91
Height = 12
Caption = #20844#21496#33337#26679#35201#27714#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label13: TLabel
Left = 277
Top = 188
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 Label1: TLabel
Left = 785
Top = 241
Width = 91
Height = 12
Caption = #20179#24211#33337#26679#35201#27714#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label8: TLabel
Left = 759
Top = 140
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 = 278
Top = 81
Width = 65
Height = 12
Caption = #26102#38388#35201#27714#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 = 517
Top = 81
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 Label17: TLabel
Left = 1004
Top = 4
Width = 65
Height = 12
Caption = #33136#23553#22823#29260#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label23: TLabel
Left = 759
Top = 10
Width = 65
Height = 12
Caption = #20132#26131#31867#22411#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 = 759
Top = 36
Width = 67
Height = 12
Caption = #29702' '#21333#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 Label18: TLabel
Left = 38
Top = 247
Width = 67
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 Label19: TLabel
Left = 278
Top = 110
Width = 66
Height = 12
Caption = #35746' '#20179' '#20154#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 = 282
Top = 140
Width = 65
Height = 12
Caption = #37325#37327#28322#30701#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 = 518
Top = 140
Width = 65
Height = 12
Caption = #20307#31215#39044#20272#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label28: TLabel
Left = 461
Top = 81
Width = 13
Height = 12
Caption = #22825
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label31: TLabel
Left = 760
Top = 189
Width = 65
Height = 12
Caption = #31614#35746#22320#28857#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label32: TLabel
Left = 517
Top = 218
Width = 65
Height = 12
Caption = #26159#21542#21547#36816#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object ConDate: TDateTimePicker
Tag = 2
Left = 108
Top = 77
Width = 125
Height = 20
BevelInner = bvNone
Date = 40916.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.670856296288548000
TabOrder = 0
end
object ConNo: TEdit
Tag = 2
Left = 107
Top = 8
Width = 125
Height = 18
TabOrder = 1
Text = #33258#21160#29983#25104
end
object BuyName: TBtnEditC
Tag = 2
Left = 110
Top = 33
Width = 125
Height = 20
ReadOnly = True
TabOrder = 3
OnBtnUpClick = BuyNameBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object BuyConNo: TEdit
Tag = 2
Left = 353
Top = 7
Width = 125
Height = 18
TabOrder = 2
end
object QtyNote: TBtnEditC
Tag = 2
Left = 108
Top = 136
Width = 125
Height = 20
Hint = 'QtyNote/'#25968#37327#28322#30701
TabOrder = 4
OnBtnUpClick = SalesmanBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object Sellname: TBtnEditC
Tag = 2
Left = 594
Top = 6
Width = 125
Height = 20
Hint = 'SellName/'#32463#33829#21333#20301
TabOrder = 5
OnBtnUpClick = SellNameBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object MiddleName: TBtnEditC
Tag = 2
Left = 353
Top = 32
Width = 125
Height = 20
ReadOnly = True
TabOrder = 6
OnBtnUpClick = MiddleNameBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object IsTax: TComboBox
Tag = 2
Left = 594
Top = 184
Width = 125
Height = 20
TabOrder = 7
Items.Strings = (
#26159
#21542)
end
object QiYun: TBtnEditC
Tag = 2
Left = 596
Top = 106
Width = 125
Height = 20
Hint = 'QiYun/'#36215#36816#28207
TabOrder = 8
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object MuDi: TBtnEditC
Tag = 2
Left = 835
Top = 106
Width = 125
Height = 20
Hint = 'MuDi/'#30446#30340#28207
TabOrder = 9
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object ExchangeRate: TEdit
Tag = 2
Left = 835
Top = 78
Width = 125
Height = 18
TabOrder = 10
OnKeyPress = ExchangeRateKeyPress
end
object Currency: TComboBox
Tag = 2
Left = 108
Top = 185
Width = 125
Height = 20
TabOrder = 11
Text = 'USD'
Items.Strings = (
'USD'
'CNY')
end
object YongJin: TEdit
Tag = 2
Left = 862
Top = 263
Width = 125
Height = 18
TabOrder = 12
Visible = False
end
object YunShu: TBtnEditC
Tag = 2
Left = 109
Top = 107
Width = 125
Height = 20
Hint = 'YunShu/'#36816#36755#26041#24335
TabOrder = 13
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object Payment: TBtnEditC
Tag = 2
Left = 108
Top = 215
Width = 368
Height = 20
Hint = 'Payment/'#20184#27454#26041#24335
TabOrder = 14
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object GSChuanYangNote: TBtnEditC
Tag = 2
Left = 879
Top = 211
Width = 81
Height = 20
Hint = 'GSChuanYangNote/'#20844#21496#33337#26679#35201#27714
AutoSize = False
TabOrder = 15
Visible = False
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object JiaGeSY: TBtnEditC
Tag = 2
Left = 353
Top = 184
Width = 125
Height = 20
Hint = 'JiaGeSY/'#20215#26684#26415#35821
TabOrder = 16
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object CKChuanYangNote: TBtnEditC
Tag = 2
Left = 879
Top = 240
Width = 84
Height = 20
Hint = 'CKChuanYangNote/'#20179#24211#33337#26679#35201#27714
AutoSize = False
TabOrder = 17
Visible = False
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object MTieJing: TRichEdit
Tag = 2
Left = 992
Top = 181
Width = 217
Height = 103
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 18
Visible = False
Zoom = 100
OnDblClick = MTieJingDblClick
end
object cxDBImage1: TcxDBImage
Left = 1214
Top = 0
Hint = 'FileName'
DataBinding.DataField = 'FilesOther'
DataBinding.DataSource = DS_ImgHX
Properties.GraphicClassName = 'TdxSmartImage'
Properties.ReadOnly = True
Properties.ShowFocusRect = False
Style.BorderStyle = ebsSingle
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 19
Visible = False
OnDblClick = cxDBImage1DblClick
Height = 281
Width = 192
end
object Packing: TBtnEditC
Tag = 2
Left = 836
Top = 135
Width = 125
Height = 20
Hint = 'Packing/'#21253#35013#35201#27714
AutoSize = False
TabOrder = 20
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object DlyDate: TDateTimePicker
Tag = 2
Left = 595
Top = 77
Width = 125
Height = 20
BevelInner = bvNone
Date = 40916.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.670856296288548000
TabOrder = 21
end
object YFTPName: TBtnEditC
Tag = 2
Left = 1075
Top = 0
Width = 125
Height = 20
Hint = 'YFTPName/'#33136#23553#22823#29260
TabOrder = 22
Visible = False
OnBtnUpClick = YFTPNameBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object ShippMent: TEdit
Tag = 2
2024-08-21 14:03:11 +08:00
Left = 356
Top = 82
2024-07-04 16:01:24 +08:00
Width = 99
Height = 18
TabOrder = 23
OnChange = ShippMentChange
OnKeyPress = ShippMentKeyPress
end
object ConType: TComboBox
Tag = 2
Left = 835
Top = 6
Width = 125
Height = 20
Style = csDropDownList
ItemIndex = 0
TabOrder = 24
Text = #20869#38144
Items.Strings = (
#20869#38144
#22806#38144)
end
object Saleser: TEdit
Tag = 2
Left = 595
Top = 33
Width = 125
Height = 18
TabOrder = 25
end
object Tallyer: TEdit
Tag = 2
Left = 835
Top = 33
Width = 125
Height = 18
TabOrder = 26
end
object SalesId: TEdit
Tag = 2
Left = 1138
Top = 296
Width = 125
Height = 18
TabOrder = 27
Visible = False
end
object TallyId: TEdit
Tag = 2
Left = 1139
Top = 320
Width = 125
Height = 18
TabOrder = 28
Visible = False
end
object Booker: TComboBox
Tag = 2
Left = 353
Top = 106
Width = 127
Height = 20
TabOrder = 29
Items.Strings = (
'BUYER'
'SELLER')
end
object WeightNote: TBtnEditC
Tag = 2
Left = 353
Top = 136
Width = 130
Height = 20
Hint = 'WeightNote/'#37325#37327#28322#30701
TabOrder = 30
OnBtnUpClick = SalesmanBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object VolumeEstimation: TBtnEditC
Tag = 2
Left = 595
Top = 136
Width = 125
Height = 20
Hint = 'VolumeEstimation/'#20307#31215#39044#20272
AutoSize = False
TabOrder = 31
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object Note: TMemo
Tag = 2
Left = 108
Top = 246
Width = 369
Height = 68
TabOrder = 32
end
object QDAddress: TBtnEditC
Tag = 2
Left = 836
Top = 185
Width = 125
Height = 20
Hint = 'QDAddress/'#31614#35746#22320#28857
AutoSize = False
TabOrder = 33
OnBtnUpClick = QiYunBtnUpClick
OnBtnDnClick = BuyNameBtnDnClick
end
object IsYF: TComboBox
Tag = 2
Left = 595
Top = 214
Width = 125
Height = 20
TabOrder = 34
Items.Strings = (
#26159
#21542)
end
end
object Pic_Image1: TcxDBImage [2]
Left = 990
Top = 64
Hint = 'FileName'
DataBinding.DataField = 'FilesOther'
DataBinding.DataSource = DataSource1
Properties.GraphicClassName = 'TdxSmartImage'
Properties.GraphicTransparency = gtTransparent
Properties.ReadOnly = True
Properties.ShowFocusRect = False
Style.BorderStyle = ebsSingle
TabOrder = 2
Visible = False
OnDblClick = Pic_Image1DblClick
Height = 152
Width = 217
end
object Panel1: TPanel [3]
Left = 0
Top = 373
Width = 1172
Height = 322
Align = alClient
Caption = 'Panel1'
TabOrder = 3
object cxGrid1: TcxGrid
Left = 1
Top = 39
Width = 1170
Height = 282
Align = alClient
BorderStyle = cxcbsNone
PopupMenu = pm_sub
TabOrder = 0
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
2024-08-21 14:03:11 +08:00
ScrollbarAnnotations.CustomAnnotations = <>
2024-07-04 16:01:24 +08:00
OnFocusedRecordChanged = Tv1FocusedRecordChanged
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
end
item
Format = '0'
Position = spFooter
Column = v1PRTPrice
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = Tv1Column9
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsCustomize.ColumnSorting = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_Contract.Default
Styles.Header = DataLink_Contract.Default
Styles.Selection = DataLink_Contract.SHuangSe
object Tv1Column7: TcxGridDBColumn
Tag = 9
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Width = 41
end
object v1XHNo: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'SerialNo'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Sorting = False
SortIndex = 0
SortOrder = soAscending
Styles.Header = DataLink_Contract.Default
Width = 55
end
object VC_SCSCode: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'C_Code'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v1Column10PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 77
end
object v1Column4: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'C_Name'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 70
end
object Tv1Column3: TcxGridDBColumn
Caption = #20135#21697#33521#25991#21517
DataBinding.FieldName = 'C_EName'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 89
end
object v1Column5: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'C_Spec'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 60
end
object v1Column1: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'C_Composition'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 70
end
object Tv1Column5: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 70
end
object v1Column8: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'C_ColorNo'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 57
end
object Tv1Column1: TcxGridDBColumn
Caption = #27454#21495
DataBinding.FieldName = 'C_StyleNo'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 77
end
object Tv1Column8: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'C_Pattern'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 70
end
object v1Column6: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'C_Width'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1Column6PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 70
end
object v1Column7: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'C_GramWeight'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1Column7PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 70
end
object Tv1Column6: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'ConQty'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 77
end
object v1OrderUnit: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'ConUnit'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsEditFixedList
Properties.Items.Strings = (
'Kg'
'M'
'Y')
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Header = DataLink_Contract.Default
Width = 58
end
object v1PRTPrice: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'ConPrice'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Header = DataLink_Contract.handBlack
Width = 70
end
object Tv1Column9: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'ConTotalAmount'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 84
end
2024-09-06 17:24:10 +08:00
object Tv1Column10: TcxGridDBColumn
Caption = #23567#21333#36153
DataBinding.FieldName = 'XDPrice'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 58
end
2024-07-04 16:01:24 +08:00
object Tv1Column2: TcxGridDBColumn
Caption = #39044#20272#25104#26412
DataBinding.FieldName = 'Estimated'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
end
object Tv1Column4: TcxGridDBColumn
Caption = #21033#28070#29575
DataBinding.FieldName = 'ProfitRate'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
end
object v1Column2: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'ConSNote'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 70
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ToolBar3: TToolBar
Tag = 1
Left = 1
Top = 1
Width = 1170
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 75
Caption = 'ToolBar1'
Color = clBtnFace
DisabledImages = DataLink_Contract.ImageList_new32
EdgeInner = esNone
EdgeOuter = esNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_Contract.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 1
object ToolButton4: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 2
OnClick = ToolButton4Click
end
object ToolButton5: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 6
OnClick = ToolButton5Click
end
end
end
object Panel2: TPanel [4]
Left = 1180
Top = 373
Width = 337
Height = 322
Align = alRight
Caption = 'Panel2'
TabOrder = 4
Visible = False
object ToolBar2: TToolBar
Tag = 1
Left = 1
Top = 1
Width = 335
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 75
Caption = 'ToolBar1'
Color = clBtnFace
DisabledImages = DataLink_Contract.ImageList_new32
EdgeInner = esNone
EdgeOuter = esNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_Contract.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 16
Visible = False
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 71
Top = 0
Caption = #35745#31639
ImageIndex = 9
OnClick = ToolButton2Click
end
end
object cxGrid2: TcxGrid
Left = 1
Top = 39
Width = 335
Height = 282
Align = alClient
BorderStyle = cxcbsNone
PopupMenu = pm_sub
TabOrder = 1
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
2024-08-21 14:03:11 +08:00
ScrollbarAnnotations.CustomAnnotations = <>
2024-07-04 16:01:24 +08:00
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
end
item
Format = '0'
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsCustomize.ColumnSorting = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_Contract.Default
Styles.Header = DataLink_Contract.Default
Styles.Selection = DataLink_Contract.SHuangSe
object TV2Column2: TcxGridDBColumn
Caption = #21512#21516#23376#34920
DataBinding.FieldName = 'Consid'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
Visible = False
HeaderAlignmentHorz = taCenter
Width = 107
end
object TV2Column1: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'SerialNo'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 41
end
object TV2Column3: TcxGridDBColumn
Caption = #39033#30446
DataBinding.FieldName = 'CB_Name'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 86
end
object TV2Column4: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'CB_Price'
2024-08-21 14:03:11 +08:00
DataBinding.IsNullValueType = True
2024-07-04 16:01:24 +08:00
HeaderAlignmentHorz = taCenter
Width = 91
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV2
end
end
end
object cxSplitter1: TcxSplitter [5]
Left = 1172
Top = 373
Width = 8
Height = 322
HotZoneClassName = 'TcxMediaPlayer9Style'
AlignSplitter = salRight
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_Contract.ADOLink
Left = 529
Top = 0
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_Contract.ADOLink
Left = 441
Top = 1
end
inherited ImageList_new32: TImageList
Left = 904
Top = 248
end
object ADOTemp: TADOQuery
Connection = DataLink_Contract.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 728
Top = 65533
end
object ADOCmd: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 632
Top = 65533
end
object DS_1: TDataSource
DataSet = Order_Sub
Left = 716
Top = 518
end
object Order_Sub: TClientDataSet
Aggregates = <>
IndexFieldNames = 'SerialNo'
Params = <>
Left = 672
Top = 516
end
object cxgrdpmn1: TcxGridPopupMenu
PopupMenus = <>
Left = 605
Top = 475
end
object pm_sub: TPopupMenu
Left = 624
Top = 536
object N1: TMenuItem
Caption = #26222#36890#26367#25442
OnClick = N1Click
end
object N2: TMenuItem
Caption = #20135#21697#26367#25442
OnClick = N2Click
end
end
object DataSource1: TDataSource
DataSet = ADOQueryImage
Left = 1100
Top = 119
end
object ADOQueryImage: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 1032
Top = 123
end
object DS_ImgHX: TDataSource
DataSet = Qry_ImgHX
Left = 1268
Top = 119
end
object Qry_ImgHX: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 1272
Top = 59
end
object IdFTP1: TIdFTP
ConnectTimeout = 0
NATKeepAlive.UseKeepAlive = False
NATKeepAlive.IdleTimeMS = 0
NATKeepAlive.IntervalMS = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
ReadTimeout = 0
Left = 1256
Top = 186
end
object ADOQuery1: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 743
Top = 450
end
object ADOQuery2: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 813
Top = 507
end
object ADOQuery3: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 869
Top = 539
end
object DataSource2: TDataSource
DataSet = Sub_CB
Left = 1391
Top = 489
end
object Sub_CB: TClientDataSet
Aggregates = <>
IndexFieldNames = 'SerialNo'
Params = <>
Left = 1322
Top = 485
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 866
Top = 460
end
object ADOGY1: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 1026
Top = 487
end
object ADOGY2: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 1019
Top = 539
end
object ADOGY3: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 1025
Top = 587
end
end