D7gmYongjin/BI(BIView.dll)/U_OrderHSInPutTS.dfm

1110 lines
27 KiB
Plaintext
Raw Permalink Normal View History

2026-03-04 09:51:44 +08:00
object frmOrderHSInPutTS: TfrmOrderHSInPutTS
Left = 143
Top = 59
Width = 1393
Height = 833
Anchors = []
Caption = #35746#21333#26680#31639#24405#20837'('#32479#31639')'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 15
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1375
Height = 33
ButtonHeight = 30
ButtonWidth = 110
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_BIView.ThreeImgList
Flat = True
Images = DataLink_BIView.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 15
OnClick = TBSaveClick
end
object TBSel: TToolButton
Left = 69
Top = 0
Caption = #36873#25321#35746#21333#21495
ImageIndex = 10
OnClick = TBSelClick
end
object TBClose: TToolButton
Left = 179
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 33
Width = 1375
Height = 753
Align = alClient
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label23: TLabel
Left = 755
Top = 254
Width = 95
Height = 18
Caption = #19979#21333#26102#38388#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label29: TLabel
Left = 25
Top = 255
Width = 57
Height = 18
Caption = #25104#21697#8594
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 30
Top = 342
Width = 38
Height = 18
Caption = #22791#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 22
Top = 640
Width = 95
Height = 18
Caption = #38144#21806#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Left = 312
Top = 640
Width = 57
Height = 18
Caption = #21333#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label32: TLabel
Left = 872
Top = 640
Width = 57
Height = 18
Caption = #27719#29575#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 22
Top = 608
Width = 95
Height = 18
Caption = #38144#21806#8595#8595#8595
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 22
Top = 676
Width = 95
Height = 18
Caption = #20184#27454#26041#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 650
Top = 640
Width = 95
Height = 18
Caption = #38144#21806#37329#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 1062
Top = 640
Width = 95
Height = 18
Caption = #38144#21806#37329#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 1270
Top = 640
Width = 30
Height = 18
Caption = 'RMB'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
Left = 872
Top = 676
Width = 57
Height = 18
Caption = #21033#28070#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label26: TLabel
Left = 1062
Top = 676
Width = 96
Height = 18
Caption = #21033' '#28070' '#29575#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label47: TLabel
Left = 1270
Top = 676
Width = 10
Height = 18
Caption = '%'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label48: TLabel
Left = 485
Top = 676
Width = 57
Height = 18
Caption = #20844#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label49: TLabel
Left = 860
Top = 347
Width = 38
Height = 18
Caption = #38468#20214
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label43: TLabel
Left = 107
Top = 228
Width = 38
Height = 18
Caption = #21305#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label44: TLabel
Left = 224
Top = 228
Width = 38
Height = 18
Caption = #25968#37327
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label45: TLabel
Left = 411
Top = 228
Width = 76
Height = 18
Caption = #39044#31639#25104#26412
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label46: TLabel
Left = 577
Top = 228
Width = 76
Height = 18
Caption = #24179#22343#21333#20215
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label38: TLabel
Left = 25
Top = 294
Width = 67
Height = 18
Caption = #36864' '#31246#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 264
Top = 294
Width = 153
Height = 18
Caption = #28023#36816#36153'('#21253#28165#20851')'#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label52: TLabel
Left = 585
Top = 294
Width = 57
Height = 18
Caption = #20323#37329#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 933
Top = 294
Width = 57
Height = 18
Caption = #31246#29575#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label54: TLabel
Left = 753
Top = 295
Width = 76
Height = 18
Caption = #25163#32493#36153#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object XDDate: TDateTimePicker
Tag = 2
Left = 847
Top = 250
Width = 141
Height = 26
BevelInner = bvNone
Date = 40916.000000000000000000
Format = 'yyyy-MM-dd'
Time = 40916.000000000000000000
Checked = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object cxGrid1: TcxGrid
Left = 0
Top = 0
Width = 1373
Height = 224
Align = alTop
TabOrder = 1
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = Tv1Column3
end
item
Kind = skSum
Column = Tv1Column4
end
item
Kind = skSum
Column = Tv1Column9
end
item
Kind = skSum
Column = Tv1Column6
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_BIView.handBlack
object v2Column12: TcxGridDBColumn
Tag = 2
Caption = #35746#21333#21495
DataBinding.FieldName = 'OrderNo'
PropertiesClassName = 'TcxTextEditProperties'
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 99
end
object v2Column15: TcxGridDBColumn
Tag = 2
Caption = #23458#25143
DataBinding.FieldName = 'KHName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 126
end
object v2Column7: TcxGridDBColumn
Tag = 2
Caption = #19994#21153#21592
DataBinding.FieldName = 'YWY'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 71
end
object Tv1Column2: TcxGridDBColumn
Tag = 2
Caption = #29702#21333
DataBinding.FieldName = 'LiDan'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column1: TcxGridDBColumn
Tag = 2
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'SPName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 262
end
object Tv1Column3: TcxGridDBColumn
Tag = 2
Caption = #25104#21697#21305#25968
DataBinding.FieldName = 'CPPS'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = Tv1Column3PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 65
end
object Tv1Column4: TcxGridDBColumn
Tag = 2
Caption = #25104#21697#25968#37327
DataBinding.FieldName = 'CPQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = Tv1Column3PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 65
end
object Tv1Column5: TcxGridDBColumn
Tag = 2
Caption = #26680#31639#25968#37327#21333#20301
DataBinding.FieldName = 'CPUnit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.Items.Strings = (
'Kg'
'M')
HeaderAlignmentHorz = taCenter
Width = 89
end
object Tv1Column9: TcxGridDBColumn
Tag = 2
Caption = #38144#21806#25968#37327
DataBinding.FieldName = 'XSQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = Tv1Column3PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 68
end
object Tv1Column10: TcxGridDBColumn
Tag = 2
Caption = #38144#21806#25968#37327#21333#20301
DataBinding.FieldName = 'XSUnit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
'Kg'
'M'
'Y')
Properties.OnEditValueChanged = Tv1Column10PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 87
end
object Tv1Column6: TcxGridDBColumn
Tag = 2
Caption = #38144#21806#37329#39069
DataBinding.FieldName = 'XSMoney'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = Tv1Column6PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 63
end
object Tv1Column7: TcxGridDBColumn
Tag = 2
Caption = #24065#31181
DataBinding.FieldName = 'BZType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#65284
#65509
#8364)
Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 42
end
object Tv1Column8: TcxGridDBColumn
Tag = 2
Caption = #21333#20215
DataBinding.FieldName = 'XSPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 54
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv1
end
end
object CPPS: TEdit
Tag = 2
Left = 87
Top = 251
Width = 78
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object CPQty: TEdit
Tag = 2
Left = 201
Top = 251
Width = 139
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
end
object HGYNote: TMemo
Tag = 2
Left = 24
Top = 368
Width = 671
Height = 213
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ScrollBars = ssVertical
TabOrder = 4
end
object XSQty: TEdit
Tag = 2
Left = 114
Top = 637
Width = 118
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 5
end
object XSPrice: TEdit
Tag = 2
Left = 361
Top = 637
Width = 118
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 6
end
object PriceType: TComboBox
Tag = 2
Left = 557
Top = 636
Width = 78
Height = 26
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemHeight = 18
ItemIndex = 0
ParentFont = False
TabOrder = 7
Text = 'CIF'
OnChange = PBQtyChange
Items.Strings = (
'CIF'
'FOB'
'')
end
object HuiLv: TEdit
Tag = 2
Left = 920
Top = 637
Width = 130
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnChange = PBQtyChange
end
object CPMoney: TEdit
Tag = 2
Left = 375
Top = 251
Width = 147
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnChange = PBQtyChange
end
object CPPriceAvg: TEdit
Tag = 2
Left = 570
Top = 251
Width = 90
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 10
end
object FKType: TBtnEditC
Tag = 2
Left = 114
Top = 672
Width = 363
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 11
OnBtnUpClick = FKTypeBtnUpClick
OnBtnDnClick = FKTypeBtnDnClick
end
object XSMoney: TEdit
Tag = 2
Left = 737
Top = 637
Width = 124
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 12
end
object XSMoneyRMB: TEdit
Tag = 2
Left = 1149
Top = 637
Width = 118
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 13
end
object LiRun: TEdit
Tag = 2
Left = 920
Top = 673
Width = 131
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 14
end
object LiRunLv: TEdit
Tag = 2
Left = 1149
Top = 673
Width = 116
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 15
end
object HSGongShi: TEdit
Tag = 2
Left = 533
Top = 673
Width = 327
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 16
end
object ListView1: TListView
Left = 716
Top = 368
Width = 324
Height = 213
Columns = <>
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 17
OnDblClick = ListView1DblClick
end
object Panel2: TPanel
Left = 764
Top = 457
Width = 242
Height = 51
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel2'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 18
Visible = False
end
object cxButton1: TcxButton
Left = 1041
Top = 446
Width = 75
Height = 25
Caption = #19978#20256
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 19
OnClick = cxButton1Click
end
object BZType: TEdit
Tag = 2
Left = 481
Top = 637
Width = 74
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 20
OnChange = PBQtyChange
end
object XSUnit: TEdit
Tag = 2
Left = 233
Top = 637
Width = 61
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 21
OnChange = PBQtyChange
end
object PBUnit: TComboBox
Tag = 2
Left = 262
Top = 224
Width = 64
Height = 26
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemHeight = 18
ParentFont = False
TabOrder = 22
Items.Strings = (
'Kg'
'M'
'Y'
'')
end
object TuiShui: TEdit
Tag = 2
Left = 87
Top = 291
Width = 113
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 23
end
object TuiShuiFlag: TCheckBox
Tag = 2
Left = 202
Top = 295
Width = 46
Height = 17
Caption = #26377
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 24
OnClick = TuiShuiFlagClick
end
object HYFee: TEdit
Tag = 2
Left = 408
Top = 291
Width = 103
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 25
OnChange = PBQtyChange
end
object HYFeeUnit: TComboBox
Tag = 2
Left = 514
Top = 290
Width = 57
Height = 26
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemHeight = 18
ItemIndex = 0
ParentFont = False
TabOrder = 26
Text = #65284
OnChange = PBQtyChange
Items.Strings = (
#65284
#65509
#8364)
end
object YongJin: TEdit
Tag = 2
Left = 637
Top = 291
Width = 109
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 27
OnChange = PBQtyChange
end
object ShuiLv: TComboBox
Tag = 2
Left = 985
Top = 290
Width = 79
Height = 26
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemHeight = 18
ParentFont = False
TabOrder = 28
Text = '0.01'
OnChange = PBQtyChange
Items.Strings = (
'0'
'0.01'
'0.025')
end
object ShuiFee: TEdit
Tag = 2
Left = 1065
Top = 291
Width = 116
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 29
end
object SXFee: TEdit
Tag = 2
Left = 818
Top = 292
Width = 102
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 30
OnChange = PBQtyChange
end
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 424
end
object ADOQueryMain: TADOQuery
Connection = DataLink_BIView.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 477
Top = 1
end
object DataSource1: TDataSource
DataSet = CDS_Sub
Left = 539
Top = 3
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_BIView.ADOLink
Parameters = <>
Left = 309
Top = 1
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_BIView.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 373
Top = 1
end
object ImageList1: TImageList
Height = 32
ShareImages = True
Width = 32
Left = 1028
Top = 568
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 1088
Top = 562
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_BIView.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1129
Top = 561
end
end