D7snShanfengT/山峰贸易管理/U_ConInPutXF.dfm

721 lines
17 KiB
Plaintext
Raw Normal View History

2026-02-26 09:41:35 +08:00
object frmConInPutXF: TfrmConInPutXF
Left = 218
Top = 105
Width = 1410
Height = 810
Caption = #21512#21516#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
WindowState = wsMaximized
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1394
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_TradeManage.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 = 1394
Height = 180
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label3: TLabel
Left = 252
Top = 38
Width = 65
Height = 12
Caption = #21046#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 = 252
Top = 66
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 = 31
Top = 12
Width = 66
Height = 12
Caption = #21512' '#21516' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 252
Top = 12
Width = 65
Height = 12
Caption = #24314#35774#21333#20301#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 = 671
Top = 12
Width = 65
Height = 12
Caption = #24037#31243#21517#31216#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 = 31
Top = 92
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 Label1: TLabel
Left = 463
Top = 38
Width = 65
Height = 12
Caption = #21512#21516#26085#26399#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 = 671
Top = 38
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 Label2: TLabel
Left = 563
Top = 66
Width = 52
Height = 12
Caption = #20844#37324#25968#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 = 671
Top = 66
Width = 78
Height = 12
Caption = #23458#25143#22996#25176#20154#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 = 31
Top = 38
Width = 65
Height = 12
Caption = #21512#21516#31867#22411#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 = 408
Top = 66
Width = 65
Height = 12
Caption = #21512#21516#31561#32423#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 = 904
Top = 66
Width = 78
Height = 12
Caption = #22996#25176#20154#30005#35805#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 = 31
Top = 66
Width = 65
Height = 12
Caption = #20215#26684#31867#22411#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 = 1016
Top = 106
Width = 65
Height = 12
Caption = #24320#31080#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object OrdDate: TDateTimePicker
Tag = 2
Left = 314
Top = 34
Width = 137
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 0
end
object YWY: TEdit
Tag = 2
Left = 314
Top = 62
Width = 84
Height = 18
TabOrder = 1
end
object ConNo: TEdit
Tag = 2
Left = 94
Top = 10
Width = 136
Height = 18
Enabled = False
TabOrder = 2
Text = #33258#21160#29983#25104
end
object CustomerNoName: TBtnEditC
Tag = 2
Left = 314
Top = 8
Width = 347
Height = 20
Hint = 'CustomerNo'
ReadOnly = True
TabOrder = 3
OnBtnUpClick = CustomerNoNameBtnUpClick
OnBtnDnClick = CustomerNoNameBtnDnClick
end
object GCName: TBtnEditC
Tag = 2
Left = 734
Top = 8
Width = 371
Height = 20
Hint = 'GCName/'#24037#31243#21517#31216
TabOrder = 4
OnDblClick = SYRNameBtnUpClick
OnBtnUpClick = SYRNameBtnUpClick
OnBtnDnClick = CustomerNoNameBtnDnClick
end
object Note: TMemo
Tag = 2
Left = 94
Top = 90
Width = 891
Height = 72
Hint = 'Note/'#22791#27880
ScrollBars = ssVertical
TabOrder = 5
OnDblClick = NoteDblClick
end
object CustomerNo: TEdit
Tag = 2
Left = 1150
Top = 161
Width = 64
Height = 18
TabOrder = 6
Visible = False
end
object QDDate: TDateTimePicker
Tag = 2
Left = 526
Top = 34
Width = 136
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 7
end
object KHWTName: TEdit
Tag = 2
Left = 745
Top = 62
Width = 136
Height = 18
TabOrder = 8
end
object HTDJ: TBtnEditC
Tag = 2
Left = 470
Top = 62
Width = 80
Height = 20
Hint = 'HTDJ/'#21512#21516#31561#32423
TabOrder = 9
OnBtnUpClick = SYRNameBtnUpClick
OnBtnDnClick = CustomerNoNameBtnDnClick
end
object WTRTel: TEdit
Tag = 2
Left = 980
Top = 62
Width = 125
Height = 18
TabOrder = 10
end
object ConType: TComboBox
Tag = 2
Left = 94
Top = 35
Width = 136
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 11
OnChange = ConTypeChange
Items.Strings = (
#27491#24335#21512#21516
#26410#31614#27491#24335#21512#21516
#20020#26102#21512#21516
#20020#26102#21512#21516'BKP')
end
object FKType: TComboBox
Tag = 2
Left = 734
Top = 34
Width = 371
Height = 20
ItemHeight = 12
TabOrder = 12
Items.Strings = (
#20808#20184#27454
#20808#21457#36135)
end
object PriceType: TComboBox
Tag = 2
Left = 94
Top = 62
Width = 136
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 13
OnChange = ConTypeChange
Items.Strings = (
#20449#24687#20215
#22266#23450#20215)
end
object GLQty: TEdit
Tag = 2
Left = 610
Top = 62
Width = 52
Height = 18
TabOrder = 14
end
object KPType: TComboBox
Tag = 2
Left = 1006
Top = 134
Width = 84
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 15
OnChange = ConTypeChange
Items.Strings = (
#38656#24320
#19981#24320)
end
end
object ToolBar2: TToolBar
Left = 0
Top = 209
Width = 1394
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_TradeManage.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 2
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
end
object cxGrid1: TcxGrid
Left = 0
Top = 238
Width = 1394
Height = 533
Align = alClient
TabOrder = 3
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Column = v1XFBFB
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1FLQty
end
item
Kind = skSum
end
item
Kind = skSum
Position = spFooter
Column = v1XFBFB
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
Column = v1FLQty
end
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1XFBFB
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1FLQty
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
Styles.Inactive = DataLink_TradeManage.SHuangSe
Styles.IncSearch = DataLink_TradeManage.SHuangSe
Styles.Selection = DataLink_TradeManage.SHuangSe
Styles.Header = DataLink_TradeManage.Default
object v1BNo: TcxGridDBColumn
Caption = #26631#21495
DataBinding.FieldName = 'BNo'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownRows = 20
Properties.Items.Strings = (
'C15'
'C20'
'C25'
'C30'
'C35'
'C40'
'C45'
'C50'
'C55'
'C60')
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1XFBFB: TcxGridDBColumn
Caption = #19979#28014'%'
DataBinding.FieldName = 'XFBFB'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1FLQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column1: TcxGridDBColumn
Caption = #22266#23450#20215
DataBinding.FieldName = 'GuDingPrice'
HeaderAlignmentHorz = taCenter
Width = 59
end
object v1KSFee: TcxGridDBColumn
Caption = 'P6'
DataBinding.FieldName = 'KSFee'
HeaderAlignmentHorz = taCenter
Width = 60
end
object v1Column4: TcxGridDBColumn
Caption = 'P8'
DataBinding.FieldName = 'KSFeeP8'
HeaderAlignmentHorz = taCenter
Width = 58
end
object v1Column2: TcxGridDBColumn
Caption = #20854#20182#21152#20215
DataBinding.FieldName = 'OtherPrice'
HeaderAlignmentHorz = taCenter
Width = 74
end
object v1Column5: TcxGridDBColumn
Caption = #39044#20272#21333#20215
DataBinding.FieldName = 'YuGuPrice'
HeaderAlignmentHorz = taCenter
Width = 67
end
object v1FLQty: TcxGridDBColumn
Caption = #26041#37327
DataBinding.FieldName = 'FLQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1FLQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 73
end
object v1Column3: TcxGridDBColumn
Caption = #27893#36865#36153
DataBinding.FieldName = 'BengSongFee'
HeaderAlignmentHorz = taCenter
Width = 67
end
object v1Note: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1NotePropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 144
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ADOTemp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1182
Top = 178
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 1016
Top = 368
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 975
Top = 372
end
object ADOQuery1: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 1153
Top = 176
end
object CDS_Type: TClientDataSet
Aggregates = <>
Params = <>
Left = 1172
Top = 176
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 936
Top = 372
end
object ADOCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 1164
Top = 155
end
end