D7myGuhang/产品报价(ProductQuotation)/U_YpBaoJiaInput.dfm

623 lines
15 KiB
Plaintext
Raw Normal View History

2025-08-13 10:59:27 +08:00
object frmYpBaoJiaInput: TfrmYpBaoJiaInput
Left = 443
Top = 87
Width = 800
Height = 724
Caption = #25253#20215#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 = 784
Height = 29
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_ProductQuotation.ThreeImgList
List = True
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object TBClose: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
Width = 784
Height = 116
Align = alTop
BevelInner = bvLowered
BevelOuter = bvRaised
Ctl3D = True
ParentCtl3D = False
TabOrder = 1
OnClick = ScrollBox1Click
object Label1: TLabel
Left = 20
Top = 16
Width = 60
Height = 12
Caption = #25253#20215#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 584
Top = 64
Width = 60
Height = 12
Caption = #20132#36135#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label2: TLabel
Left = 272
Top = 16
Width = 60
Height = 12
Caption = #25253#20215#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 584
Top = 88
Width = 60
Height = 12
Caption = #23458' '#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label6: TLabel
Left = 20
Top = 40
Width = 60
Height = 12
Caption = #32534' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label20: TLabel
Left = 272
Top = 40
Width = 60
Height = 12
Caption = #21697' '#21517#65306
end
object Label22: TLabel
Left = 20
Top = 64
Width = 60
Height = 12
Caption = #38376' '#24133#65306
end
object Label23: TLabel
Left = 272
Top = 64
Width = 60
Height = 12
Caption = #20811' '#37325#65306
end
object Label27: TLabel
Left = 584
Top = 40
Width = 60
Height = 12
Caption = #22995' '#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label28: TLabel
Left = 584
Top = 16
Width = 60
Height = 12
Caption = #32852#31995#30005#35805#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Visible = False
end
object Label5: TLabel
Left = 20
Top = 88
Width = 60
Height = 12
Caption = #38024' '#22411#65306
end
object Label7: TLabel
Left = 272
Top = 88
Width = 60
Height = 12
Caption = #36135' '#21495#65306
end
object BjNo: TEdit
Left = 76
Top = 12
Width = 144
Height = 20
Enabled = False
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 0
Text = #33258#21160#29983#25104
end
object Jhtime: TDateTimePicker
Left = 644
Top = 60
Width = 144
Height = 20
BevelInner = bvNone
Date = 40916.000000000000000000
Format = 'yyyy-MM-dd'
Time = 40916.000000000000000000
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 8
Visible = False
end
object Bjtime: TDateTimePicker
Left = 328
Top = 12
Width = 144
Height = 20
BevelInner = bvNone
Date = 40916.000000000000000000
Format = 'yyyy-MM-dd'
Time = 40916.000000000000000000
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 1
end
object CustomerName: TcxButtonEdit
Left = 644
Top = 84
Hint = #35746#36135#21333#20301
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = CustomerNamePropertiesButtonClick
TabOrder = 11
Visible = False
Width = 144
end
object BjCode: TcxButtonEdit
Left = 76
Top = 36
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = cxButtonEdit1PropertiesButtonClick
TabOrder = 3
Width = 144
end
object BjName: TEdit
Left = 328
Top = 36
Width = 144
Height = 20
Enabled = False
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 4
end
object BjMF: TEdit
Left = 76
Top = 60
Width = 144
Height = 20
Enabled = False
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 6
end
object BjKZ: TEdit
Left = 328
Top = 60
Width = 144
Height = 20
Enabled = False
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 7
end
object BJer: TcxButtonEdit
Left = 644
Top = 36
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = cxButtonEdit3PropertiesButtonClick
TabOrder = 5
Visible = False
Width = 144
end
object BJPhone: TEdit
Left = 644
Top = 12
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 2
Visible = False
end
object zhenxing: TEdit
Left = 76
Top = 84
Width = 144
Height = 20
Enabled = False
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 9
end
object huohao: TEdit
Left = 328
Top = 84
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 10
end
end
object ScrollBox2: TScrollBox
Left = 0
Top = 467
Width = 784
Height = 219
Align = alBottom
BevelInner = bvLowered
BevelOuter = bvRaised
Ctl3D = True
ParentCtl3D = False
TabOrder = 3
OnClick = ScrollBox2Click
object Label37: TLabel
Left = 421
Top = 80
Width = 60
Height = 12
Caption = #36816' '#36153#65306
end
object Label39: TLabel
Left = 421
Top = 32
Width = 60
Height = 12
Caption = #26426' '#21488' '#36153#65306
end
object Label40: TLabel
Left = 409
Top = 56
Width = 72
Height = 12
Caption = #30333#22383#21152#24037#36153#65306
end
object Label51: TLabel
Left = 421
Top = 104
Width = 60
Height = 12
Caption = #25104#26412#21512#35745#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label52: TLabel
Left = 421
Top = 128
Width = 60
Height = 12
Caption = #21334' '#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label53: TLabel
Left = 421
Top = 152
Width = 60
Height = 12
Caption = #21033' '#28070#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label54: TLabel
Left = 421
Top = 176
Width = 60
Height = 12
Caption = #21033' '#28070' '#28857#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 421
Top = 8
Width = 60
Height = 12
Caption = #20135' '#37327#65306
end
object YfCost: TEdit
Left = 477
Top = 77
Width = 129
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 4
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object DjBzCost: TEdit
Left = 477
Top = 29
Width = 129
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 2
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object Price: TEdit
Left = 477
Top = 125
Width = 129
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 6
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object CbPrice: TEdit
Left = 477
Top = 101
Width = 129
Height = 20
Enabled = False
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 5
end
object Lr: TEdit
Left = 477
Top = 149
Width = 129
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ReadOnly = True
TabOrder = 7
end
object Lrd: TEdit
Left = 477
Top = 173
Width = 129
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ReadOnly = True
TabOrder = 8
end
object ZzCost: TEdit
Left = 477
Top = 53
Width = 129
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 3
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object BjNote: TMemo
Left = 12
Top = 9
Width = 385
Height = 173
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ScrollBars = ssVertical
TabOrder = 1
end
object Qty: TEdit
Left = 477
Top = 5
Width = 129
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 0
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 145
Width = 784
Height = 322
Align = alClient
TabOrder = 2
object Tv1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'C_Code'
Column = v1Column1
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1Column7
end
item
Kind = skSum
Column = v1Column1
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_ProductQuotation.Default
object v1Column10: TcxGridDBColumn
Caption = #21407#26009
DataBinding.FieldName = 'WLName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 301
end
object v1Column1: TcxGridDBColumn
Caption = #27604#20363'%'
DataBinding.FieldName = 'BiLi'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column1PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_ProductQuotation.Default
Width = 55
end
object v1Column3: TcxGridDBColumn
Caption = #21407#26009#21333#20215
DataBinding.FieldName = 'WlPrice'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column1PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 69
end
object v1Column5: TcxGridDBColumn
Caption = #25439#32791
DataBinding.FieldName = 'YlShb'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column1PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 52
end
object v1Column7: TcxGridDBColumn
Caption = #25104#26412#21333#20215
DataBinding.FieldName = 'WlMoney'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 133
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ADOTemp: TADOQuery
Connection = DataLink_ProductQuotation.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 452
Top = 248
end
object ADOCmd: TADOQuery
Connection = DataLink_ProductQuotation.ADOLink
Parameters = <>
Left = 409
Top = 245
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 479
Top = 298
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 412
Top = 285
end
object ADOQuery1: TADOQuery
Connection = DataLink_ProductQuotation.ADOLink
Parameters = <>
Left = 512
Top = 241
end
end