D7myChuangpin/创品基础资料维护/U_CP_YDang_BJ_Sub.dfm

842 lines
22 KiB
Plaintext
Raw Normal View History

2024-07-23 20:18:14 +08:00
object frmCP_YDang_BJ_Sub: TfrmCP_YDang_BJ_Sub
Left = 192
Top = 136
Width = 1395
Height = 669
Caption = #25253#20215#20449#24687#30331#35760
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1379
AutoSize = True
ButtonHeight = 30
ButtonWidth = 61
Caption = 'ToolBar1'
Flat = True
Images = DataLink_BaseInfo.ThreeImgList
List = True
ShowCaptions = True
TabOrder = 0
object Tsave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 14
OnClick = TsaveClick
end
object TClose: TToolButton
Left = 65
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 32
Width = 1379
Height = 148
Align = alTop
BevelOuter = bvLowered
TabOrder = 1
object Label4: TLabel
Left = 683
Top = 25
Width = 56
Height = 13
Caption = #30003#35831#26085#26399
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 52
Top = 440
Width = 56
Height = 13
Caption = #30003#35831#21333#21495
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
Visible = False
end
object Label8: TLabel
Left = 273
Top = 25
Width = 58
Height = 13
Caption = #19994' '#21153' '#21592
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 36
Top = 25
Width = 60
Height = 13
Caption = #23458' '#25143
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 36
Top = 51
Width = 60
Height = 13
Caption = #22791' '#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 903
Top = 25
Width = 56
Height = 13
Caption = #25253#20215#26085#26399
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 496
Top = 25
Width = 28
Height = 13
Caption = #25163#26426
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object SQdate: TDateTimePicker
Tag = 2
Left = 745
Top = 21
Width = 130
Height = 21
Date = 41932.938628287040000000
Time = 41932.938628287040000000
TabOrder = 0
end
object SQ: TBtnEditA
Left = -92
Top = 436
Width = 135
Height = 21
TabOrder = 1
Visible = False
end
object ConPerson1: TBtnEditA
Tag = 2
Left = 335
Top = 21
Width = 135
Height = 21
TabOrder = 2
OnBtnClick = ConPerson1BtnClick
end
object JGprice: TEdit
Left = 152
Top = 499
Width = 131
Height = 21
TabOrder = 3
Visible = False
end
object afterprice: TEdit
Left = 152
Top = 456
Width = 131
Height = 21
TabOrder = 4
Visible = False
end
object JGafter: TEdit
Left = 152
Top = 417
Width = 131
Height = 21
TabOrder = 5
Visible = False
end
object CustomerNoName: TBtnEditA
Tag = 2
Left = 160
Top = 21
Width = 88
Height = 21
TabOrder = 6
OnBtnClick = CustomerNoNameBtnClick
end
object BJNote: TMemo
Tag = 2
Left = 100
Top = 51
Width = 990
Height = 80
ScrollBars = ssVertical
TabOrder = 7
end
object BJtime: TDateTimePicker
Tag = 2
Left = 961
Top = 21
Width = 130
Height = 21
Date = 41932.000000000000000000
Time = 41932.000000000000000000
TabOrder = 8
end
object CustomerNo: TEdit
Tag = 2
Left = 100
Top = 21
Width = 60
Height = 21
TabOrder = 9
end
object YWTel: TBtnEditA
Tag = 2
Left = 525
Top = 21
Width = 135
Height = 21
TabOrder = 10
OnBtnClick = YWTelBtnClick
end
end
object ToolBar2: TToolBar
Left = 0
Top = 180
Width = 1379
Height = 31
ButtonHeight = 30
ButtonWidth = 61
Caption = 'ToolBar2'
Flat = True
Images = DataLink_BaseInfo.ThreeImgList
List = True
ShowCaptions = True
TabOrder = 2
object TAdd: TToolButton
Left = 0
Top = 0
Caption = #22686#34892
ImageIndex = 103
OnClick = TAddClick
end
object TDel: TToolButton
Left = 61
Top = 0
Caption = #21024#34892
ImageIndex = 107
OnClick = TDelClick
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 211
Width = 1379
Height = 335
Align = alTop
TabOrder = 3
object TV1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource1
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Column = V1BJPrice
end
item
Kind = skSum
Column = V1BJEPrice
end
item
Kind = skSum
Column = V1HuiLv
end
item
Kind = skSum
Column = V1CBPrice
end
item
Kind = skSum
Column = V1SOrdQty2
end
item
Kind = skSum
Column = V1SOrdQty5
end
item
Kind = skSum
Column = V1SOrdQty6
end
item
Kind = skSum
Column = V1SOrdQty7
end
item
Kind = skSum
Column = V1SOrdQty8
end
item
Kind = skSum
Column = V1SOrdQty9
end
item
Kind = skSum
Column = V1SOrdQty10
end
item
Kind = skSum
Column = V1SOrdQty11
end
item
Kind = skSum
Column = V1SOrdQty12
end
item
Kind = skSum
Column = V1SOrdQty13
end
item
Kind = skSum
Position = spFooter
Column = V1BJPrice
end
item
Kind = skSum
Position = spFooter
Column = V1BJEPrice
end
item
Kind = skSum
Position = spFooter
Column = V1HuiLv
end
item
Kind = skSum
Position = spFooter
Column = V1CBPrice
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty2
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty5
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty6
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty7
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty8
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty9
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty10
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty11
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty12
end
item
Kind = skSum
Position = spFooter
Column = V1SOrdQty13
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = V1PRTOrderQty
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = V1BJPrice
end
item
Kind = skSum
Column = V1BJEPrice
end
item
Kind = skSum
Column = V1HuiLv
end
item
Kind = skSum
Column = V1CBPrice
end
item
Kind = skSum
Column = V1SOrdQty2
end
item
Kind = skSum
Column = V1SOrdQty5
end
item
Kind = skSum
Column = V1SOrdQty6
end
item
Kind = skSum
Column = V1SOrdQty7
end
item
Kind = skSum
Column = V1SOrdQty8
end
item
Kind = skSum
Column = V1SOrdQty9
end
item
Kind = skSum
Column = V1SOrdQty10
end
item
Kind = skSum
Column = V1SOrdQty11
end
item
Kind = skSum
Column = V1SOrdQty12
end
item
Kind = skSum
Column = V1SOrdQty13
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
Styles.Header = DataLink_BaseInfo.Default
object V1PRTCode: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'PRTCode'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1PRTCodeNamePropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1PRTCodeName: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'PRTCodeName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1PRTCodeNamePropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 80
end
object V1PRTCF: TcxGridDBColumn
Caption = #25104#20221
DataBinding.FieldName = 'PRTCF'
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1PRTOrderQty: TcxGridDBColumn
Caption = #35746#21333#25968#37327
DataBinding.FieldName = 'PRTOrderQty'
HeaderAlignmentHorz = taCenter
Styles.Content = DataLink_BaseInfo.FontBlue
Styles.Footer = DataLink_BaseInfo.FontBlue
Styles.Header = DataLink_BaseInfo.FontBlue
Width = 80
end
object V1OrderUnit: TcxGridDBColumn
Caption = #25968#37327#21333#20301
DataBinding.FieldName = 'OrderUnit'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1OrderUnitPropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 80
end
object V1MFQty: TcxGridDBColumn
Caption = #38376#24133'(cm)'
DataBinding.FieldName = 'PRTMF'
HeaderAlignmentHorz = taCenter
Width = 80
end
object V1PRTSpec: TcxGridDBColumn
Caption = #23610#23544
DataBinding.FieldName = 'PRTSpec'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1PRTSpecPropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 80
end
object V1KZQty: TcxGridDBColumn
Caption = #20811#37325'(g/'#13217')'
DataBinding.FieldName = 'PRTKZ'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object V1JQDate: TcxGridDBColumn
Caption = #20132#26399
DataBinding.FieldName = 'JQDate'
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1QDLQty: TcxGridDBColumn
Caption = #36215#35746#37327
DataBinding.FieldName = 'QDLQty'
HeaderAlignmentHorz = taCenter
Styles.Content = DataLink_BaseInfo.FontBlue
Styles.Footer = DataLink_BaseInfo.FontBlue
Styles.Header = DataLink_BaseInfo.FontBlue
Width = 65
end
object V1PBSPEC: TcxGridDBColumn
Caption = #22383#24067#35268#26684
DataBinding.FieldName = 'PBSPEC'
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1PBMF: TcxGridDBColumn
Caption = #22383#24067#24133#38271'(cm)'
DataBinding.FieldName = 'PBMF'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1PBKZPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 86
end
object V1PBFK: TcxGridDBColumn
Caption = #22383#24067#24133#23485'(cm)'
DataBinding.FieldName = 'PBFK'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1PBKZPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 86
end
object V1PBKZ: TcxGridDBColumn
Caption = #22383#24067#20811#37325'(g/'#13217')'
DataBinding.FieldName = 'PBKZ'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1PBKZPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 92
end
object V1SOrdQty2: TcxGridDBColumn
Caption = #22383#24067#20215#26684
DataBinding.FieldName = 'SOrdQty2'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 65
end
object V1SOrdQty1: TcxGridDBColumn
Caption = #32553#29575
DataBinding.FieldName = 'SOrdQty1'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty5: TcxGridDBColumn
Caption = #26579#33394#21333#20215
DataBinding.FieldName = 'SOrdQty5'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty6: TcxGridDBColumn
Caption = #21360#33457#21333#20215
DataBinding.FieldName = 'SOrdQty6'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty7: TcxGridDBColumn
Caption = #32483#33457#36153
DataBinding.FieldName = 'SOrdQty7'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty8: TcxGridDBColumn
Caption = #26679#36153
DataBinding.FieldName = 'SOrdQty8'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty9: TcxGridDBColumn
Caption = #28907#37329#36153
DataBinding.FieldName = 'SOrdQty9'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty10: TcxGridDBColumn
Caption = #21253#35013#36153
DataBinding.FieldName = 'SOrdQty10'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty11: TcxGridDBColumn
Caption = #20869#36816#36153
DataBinding.FieldName = 'SOrdQty11'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty12: TcxGridDBColumn
Caption = #28023#36816#36153
DataBinding.FieldName = 'SOrdQty12'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty13: TcxGridDBColumn
Caption = #20854#20182#36153
DataBinding.FieldName = 'SOrdQty13'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1CBPrice: TcxGridDBColumn
Caption = #25104#26412#20215
DataBinding.FieldName = 'CBPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = DataLink_BaseInfo.FontBlue
Styles.Footer = DataLink_BaseInfo.FontBlue
Styles.Header = DataLink_BaseInfo.FontBlue
Width = 70
end
object V1PriceUnit: TcxGridDBColumn
Caption = #24065#31181
DataBinding.FieldName = 'PriceUnit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.Items.Strings = (
'$'
#65509)
Properties.OnEditValueChanged = V1PriceUnitPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1HuiLv: TcxGridDBColumn
Caption = #27719#29575
DataBinding.FieldName = 'HuiLv'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Styles.Content = DataLink_BaseInfo.FontBlue
Styles.Footer = DataLink_BaseInfo.FontBlue
Styles.Header = DataLink_BaseInfo.FontBlue
Width = 70
end
object V1BJXS: TcxGridDBColumn
Caption = #25253#20215#31995#25968
DataBinding.FieldName = 'BJXS'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Styles.Content = DataLink_BaseInfo.FontBlue
Styles.Footer = DataLink_BaseInfo.FontBlue
Styles.Header = DataLink_BaseInfo.FontBlue
Width = 68
end
object V1BJPrice: TcxGridDBColumn
Caption = #25253#20215#20215#26684
DataBinding.FieldName = 'BJPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = DataLink_BaseInfo.FoneRed
Styles.Footer = DataLink_BaseInfo.FoneRed
Styles.Header = DataLink_BaseInfo.FoneRed
Width = 70
end
object V1BJEPrice: TcxGridDBColumn
Caption = #32654#37329#25253#20215
DataBinding.FieldName = 'BJEPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = DataLink_BaseInfo.FoneRed
Styles.Footer = DataLink_BaseInfo.FoneRed
Styles.Header = DataLink_BaseInfo.FoneRed
Width = 70
end
object V1SOrddefstr1: TcxGridDBColumn
Caption = #22270#29255
DataBinding.FieldName = 'SOrddefstr1'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1SOrddefstr1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1Note: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
HeaderAlignmentHorz = taCenter
Width = 100
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV1
end
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
Parameters = <>
Left = 564
Top = 255
end
object ADOQueryCMD: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
Parameters = <>
Left = 527
Top = 254
end
object DataSource1: TDataSource
DataSet = contract_Sub
Left = 604
Top = 256
end
object contract_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 646
Top = 256
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 488
Top = 255
end
end