D7myYunxiang/合同管理(Contract.dll)/U_YpBaoJiaMx.dfm

968 lines
23 KiB
Plaintext
Raw Normal View History

2025-01-20 13:04:03 +08:00
object frmYpBaoJiaMx: TfrmYpBaoJiaMx
Left = 354
Top = 74
Width = 1021
Height = 704
Caption = #25253#20215#26597#30475
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 = 1005
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_Contract.ThreeImgList
List = True
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBClose: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
Width = 1005
Height = 179
Align = alTop
BevelInner = bvLowered
BevelOuter = bvRaised
Enabled = False
Ctl3D = True
ParentCtl3D = False
TabOrder = 1
OnClick = ScrollBox1Click
object Label1: TLabel
Left = 20
Top = 40
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 = 272
Top = 112
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
end
object Label2: TLabel
Left = 272
Top = 40
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 = 20
Top = 63
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
end
object Label13: TLabel
Left = 20
Top = 132
Width = 60
Height = 12
Caption = #24037' '#33402#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 272
Top = 63
Width = 60
Height = 12
Caption = #26679#21697#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 = 20
Top = 86
Width = 60
Height = 12
Caption = #22411' '#21495#65306
end
object Label22: TLabel
Left = 272
Top = 86
Width = 60
Height = 12
Caption = #38376' '#24133#65306
end
object Label23: TLabel
Left = 496
Top = 86
Width = 60
Height = 12
Caption = #20811' '#37325#65306
end
object Label24: TLabel
Left = 20
Top = 108
Width = 60
Height = 12
Caption = #25968' '#37327#65306
end
object Label26: TLabel
Left = 719
Top = 86
Width = 60
Height = 12
Caption = #24635' '#20811' '#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 496
Top = 38
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
end
object Label28: TLabel
Left = 721
Top = 38
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
end
object Label12: TLabel
Left = 21
Top = 11
Width = 60
Height = 12
Caption = #23457' '#26680' '#20154#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 271
Top = 12
Width = 60
Height = 12
Caption = #23457#26680#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object BjNo: TEdit
Left = 76
Top = 36
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 = 332
Top = 105
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 Bjtime: TDateTimePicker
Left = 332
Top = 36
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 = 2
end
object CustomerName: TcxButtonEdit
Left = 76
Top = 59
Hint = #35746#36135#21333#20301
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = CustomerNamePropertiesButtonClick
TabOrder = 3
Width = 144
end
object GyNote: TEdit
Left = 76
Top = 128
Width = 850
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 4
end
object BjCode: TcxButtonEdit
Left = 332
Top = 59
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
TabOrder = 5
Width = 144
end
object BjName: TEdit
Left = 76
Top = 82
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 6
end
object BjMF: TEdit
Left = 332
Top = 82
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 7
end
object BjKZ: TEdit
Left = 552
Top = 82
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 8
end
object Qty: TEdit
Left = 76
Top = 105
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 9
end
object BjZKS: TEdit
Left = 779
Top = 82
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 10
OnExit = BjZKSExit
OnKeyPress = ZzCostKeyPress
end
object BJer: TcxButtonEdit
Left = 552
Top = 34
BeepOnEnter = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
TabOrder = 11
Width = 144
end
object BJPhone: TEdit
Left = 780
Top = 34
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 12
end
object CustomerLevel: TEdit
Left = 220
Top = 59
Width = 33
Height = 20
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 13
end
object Chker: TEdit
Left = 80
Top = 7
Width = 144
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 14
end
object Chktime: TDateTimePicker
Left = 331
Top = 8
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 = 15
end
end
object ScrollBox2: TScrollBox
Left = 0
Top = 398
Width = 1005
Height = 268
Align = alBottom
BevelInner = bvLowered
BevelOuter = bvRaised
Enabled = False
Ctl3D = True
ParentCtl3D = False
TabOrder = 2
OnClick = ScrollBox2Click
object Label34: TLabel
Left = 421
Top = 53
Width = 60
Height = 12
Caption = #21518' '#22788' '#29702#65306
end
object Label35: TLabel
Left = 421
Top = 141
Width = 60
Height = 12
Caption = #21033' '#24687#65306
end
object Label36: TLabel
Left = 421
Top = 163
Width = 60
Height = 12
Caption = #19994' '#21153' '#36153#65306
end
object Label37: TLabel
Left = 421
Top = 119
Width = 60
Height = 12
Caption = #36816' '#36153#65306
end
object Label38: TLabel
Left = 421
Top = 97
Width = 60
Height = 12
Caption = #24320' '#21457#65306
end
object Label39: TLabel
Left = 421
Top = 75
Width = 60
Height = 12
Caption = #25171#21367#21253#35013#65306
end
object Label40: TLabel
Left = 421
Top = 31
Width = 60
Height = 12
Caption = #32455' '#36896#65306
end
object Label50: TLabel
Left = 421
Top = 185
Width = 60
Height = 12
Caption = #31246' '#28857#65306
end
object Label51: TLabel
Left = 687
Top = 109
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 = 687
Top = 133
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 = 687
Top = 161
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 = 687
Top = 186
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 Label5: TLabel
Left = 612
Top = 97
Width = 24
Height = 12
Caption = '(1%)'
end
object Label7: TLabel
Left = 612
Top = 141
Width = 24
Height = 12
Caption = '(1%)'
end
object Label8: TLabel
Left = 612
Top = 163
Width = 24
Height = 12
Caption = '(1%)'
end
object Label9: TLabel
Left = 612
Top = 185
Width = 24
Height = 12
Caption = '(6%)'
end
object Label10: TLabel
Left = 612
Top = 53
Width = 78
Height = 12
Caption = '('#24635#20811#37325'*'#26579#36153')'
end
object Label11: TLabel
Left = 612
Top = 31
Width = 228
Height = 12
Caption = '('#26222#65306'1.5'#20803'/'#31859#65307#27491#65306'4'#20803'/'#31859#65292#21452#65306'7'#20803'/'#31859')'
end
object Label15: TLabel
Left = 421
Top = 206
Width = 60
Height = 12
Caption = #25439' '#32791#65306
end
object Label16: TLabel
Left = 612
Top = 206
Width = 30
Height = 12
Caption = '(10%)'
end
object Label17: TLabel
Left = 421
Top = 10
Width = 60
Height = 12
Caption = #22383#24067#25439#32791#65306
end
object Label18: TLabel
Left = 409
Top = 227
Width = 72
Height = 12
Caption = #25104#21697#25253#24223#29575#65306
end
object HclCost: TEdit
Left = 542
Top = 49
Width = 65
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
ReadOnly = True
TabOrder = 0
end
object YfCost: TEdit
Left = 477
Top = 115
Width = 129
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 1
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object KfCost: TEdit
Left = 542
Top = 93
Width = 65
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 2
end
object YwCost: TEdit
Left = 542
Top = 159
Width = 65
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 3
end
object LxCost: TEdit
Left = 542
Top = 137
Width = 65
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 4
end
object DjBzCost: TEdit
Left = 477
Top = 71
Width = 130
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 5
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object Price: TEdit
Left = 743
Top = 129
Width = 130
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 6
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object CbPrice: TEdit
Left = 742
Top = 104
Width = 130
Height = 20
Enabled = False
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
TabOrder = 7
end
object SdCost: TEdit
Left = 542
Top = 181
Width = 65
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 8
end
object Lr: TEdit
Left = 743
Top = 158
Width = 130
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ReadOnly = True
TabOrder = 9
end
object Lrd: TEdit
Left = 743
Top = 184
Width = 130
Height = 20
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ReadOnly = True
TabOrder = 10
end
object ZzCost: TEdit
Left = 477
Top = 27
Width = 130
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 11
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object BjNote: TMemo
Left = 12
Top = 9
Width = 385
Height = 230
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ScrollBars = ssVertical
TabOrder = 12
end
object HclPrice: TEdit
Left = 477
Top = 49
Width = 64
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 13
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object BlKfCost: TEdit
Left = 477
Top = 93
Width = 64
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 14
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object BlLxCost: TEdit
Left = 477
Top = 137
Width = 64
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 15
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object BlYwCost: TEdit
Left = 477
Top = 159
Width = 64
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 16
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object BlSdCost: TEdit
Left = 477
Top = 181
Width = 64
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 17
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object ZshCost: TEdit
Left = 542
Top = 202
Width = 65
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
ReadOnly = True
TabOrder = 18
end
object BlZshCost: TEdit
Left = 477
Top = 202
Width = 64
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 19
Text = '0'
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object PpShCost: TEdit
Left = 542
Top = 6
Width = 65
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 20
end
object BlPpShCost: TEdit
Left = 477
Top = 6
Width = 64
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 21
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
object CpBfCost: TEdit
Left = 543
Top = 223
Width = 65
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 22
end
object BLCpBfCost: TEdit
Left = 478
Top = 223
Width = 64
Height = 20
BiDiMode = bdLeftToRight
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentBiDiMode = False
TabOrder = 23
OnExit = HclCostExit
OnKeyPress = ZzCostKeyPress
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 208
Width = 1005
Height = 190
Align = alClient
Enabled = False
TabOrder = 3
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_Contract.Default
object v1Column10: TcxGridDBColumn
Caption = #21407#26009
DataBinding.FieldName = 'WLName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 238
end
object v1Column1: TcxGridDBColumn
Caption = #27604#20363
DataBinding.FieldName = 'BiLi'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column1PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_Contract.Default
Width = 118
end
object v1Column2: TcxGridDBColumn
Caption = #27599#31859#20811#37325
DataBinding.FieldName = 'Mmkz'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 95
end
object v1Column5: TcxGridDBColumn
Caption = #21407#26009#25439#32791#27604
DataBinding.FieldName = 'YlShb'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 105
end
object v1Column3: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'WlPrice'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column1PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 69
end
object v1Column7: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'WlMoney'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 114
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ADOTemp: TADOQuery
Connection = DataLink_Contract.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 654
Top = 220
end
object ADOCmd: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 691
Top = 218
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 743
Top = 314
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 692
Top = 317
end
object ADOQuery1: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 616
Top = 214
end
end