D7snShanfengT/山峰基础资料维护/U_CP_YDang_BJ_Sub.dfm
DESKTOP-E401PHE\Administrator c363cb75a7 调整之后的山凤水泥厂
2026-02-26 09:41:35 +08:00

616 lines
17 KiB
Plaintext

object frmCP_YDang_BJ_Sub: TfrmCP_YDang_BJ_Sub
Left = 192
Top = 137
Width = 1297
Height = 618
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 = 1281
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 = 1281
Height = 157
Align = alTop
BevelOuter = bvLowered
TabOrder = 1
object Label4: TLabel
Left = 541
Top = 27
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 = 296
Top = 27
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 = 27
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 = 56
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 = 771
Top = 26
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 SQdate: TDateTimePicker
Tag = 2
Left = 603
Top = 23
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 = 360
Top = 23
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 = 23
Width = 88
Height = 21
TabOrder = 6
OnBtnClick = CustomerNoNameBtnClick
end
object BJNote: TMemo
Tag = 2
Left = 99
Top = 55
Width = 865
Height = 80
ScrollBars = ssVertical
TabOrder = 7
end
object BJtime: TDateTimePicker
Tag = 2
Left = 834
Top = 22
Width = 130
Height = 21
Date = 41932.000000000000000000
Time = 41932.000000000000000000
TabOrder = 8
end
object CustomerNo: TEdit
Tag = 2
Left = 100
Top = 23
Width = 60
Height = 21
TabOrder = 9
end
end
object ToolBar2: TToolBar
Left = 0
Top = 189
Width = 1281
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 = 220
Width = 1281
Height = 335
Align = alTop
TabOrder = 3
object TV1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource1
DataController.Summary.DefaultGroupSummaryItems = <>
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>
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 V1PRTSpec: TcxGridDBColumn
Caption = #35268#26684#22411#21495
DataBinding.FieldName = 'PRTSpec'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1PRTSpecPropertiesButtonClick
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 V1KZQty: TcxGridDBColumn
Caption = #20811#37325'(g/'#13217')'
DataBinding.FieldName = 'PRTKZ'
HeaderAlignmentHorz = taCenter
Width = 80
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#38376#24133'(cm)'
DataBinding.FieldName = 'PBMF'
HeaderAlignmentHorz = taCenter
Width = 79
end
object V1PBKZ: TcxGridDBColumn
Caption = #22383#24067#20811#37325'(g/'#13217')'
DataBinding.FieldName = 'PBKZ'
HeaderAlignmentHorz = taCenter
Width = 92
end
object V1SOrdQty1: TcxGridDBColumn
Caption = #32553#29575
DataBinding.FieldName = 'SOrdQty1'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
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'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = DataLink_BaseInfo.FoneRed
Styles.Footer = DataLink_BaseInfo.FoneRed
Styles.Header = DataLink_BaseInfo.FoneRed
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 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 V1SOrdQty2: TcxGridDBColumn
Caption = #22383#24067#20215#26684
DataBinding.FieldName = 'SOrdQty2'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 65
end
object V1SOrdQty5: TcxGridDBColumn
Caption = #26579#33394#36153
DataBinding.FieldName = 'SOrdQty5'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = V1SOrdQty2PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object V1SOrdQty6: TcxGridDBColumn
Caption = #21360#33457#36153
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 = #26893#32466#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 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 = 528
Top = 250
end
object DataSource1: TDataSource
DataSet = contract_Sub
Left = 604
Top = 262
end
object contract_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 649
Top = 260
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 488
Top = 252
end
end