D10xhGemei/A09财务通用管理/U_ReceivableInput.dfm

592 lines
15 KiB
Plaintext
Raw Normal View History

2024-12-14 17:23:12 +08:00
object frmReceivableInput: TfrmReceivableInput
Left = 261
Top = 149
Caption = #24212#25910#27454#30331#35760
2025-09-08 10:53:41 +08:00
ClientHeight = 757
ClientWidth = 1353
2025-07-17 14:27:41 +08:00
Color = clWhite
2024-12-14 17:23:12 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #24494#36719#38597#40657
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 21
object ToolBar1: TToolBar
Tag = 1
Left = 0
Top = 0
2025-09-08 10:53:41 +08:00
Width = 1353
2024-12-14 17:23:12 +08:00
Height = 30
AutoSize = True
ButtonHeight = 30
ButtonWidth = 67
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Financial.ImageList_new32
Images = DataLink_Financial.cxImageList_bar
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object ToolButton3: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 16
OnClick = ToolButton3Click
end
object TBClose: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
2025-09-08 10:53:41 +08:00
object cxGroupBox1: TcxGroupBox
Left = 0
Top = 310
Align = alBottom
Caption = #20986#20179#26126#32454
TabOrder = 1
Height = 447
Width = 1353
object cxGrid1: TcxGrid
2025-09-18 10:18:16 +08:00
Left = 2
Top = 26
Width = 1349
Height = 419
2025-09-08 10:53:41 +08:00
Align = alClient
TabOrder = 0
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_1
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsView.GroupByBox = False
OptionsView.Indicator = True
OptionsView.IndicatorWidth = 50
OnCustomDrawIndicatorCell = Tv1CustomDrawIndicatorCell
object Tv1Column1: TcxGridDBColumn
Caption = #33394#24067#21517#31216
DataBinding.FieldName = 'F_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 94
end
object Tv1Column2: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'F_ColorNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column3: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'F_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column6: TcxGridDBColumn
Caption = #35745#20215#21333#20301
DataBinding.FieldName = 'Currency'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxComboBoxProperties'
Properties.Items.Strings = (
'CNY'
'USD'
'EUR')
HeaderAlignmentHorz = taCenter
Width = 105
end
object v1Qty: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column16: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'QtyUnit'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxComboBoxProperties'
Properties.Items.Strings = (
'Kg'
'M'
'Y'
#20010
#20214)
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column11: TcxGridDBColumn
Caption = #20214#25968
DataBinding.FieldName = 'TMSQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column12: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'Price'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column13: TcxGridDBColumn
Caption = #21442#32771#23450#20215
DataBinding.FieldName = 'referencePrice'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 106
end
object Tv1Column15: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'Amount'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column17: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column21: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'F_Width'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column22: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'F_GramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column23: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'F_Pattern'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column24: TcxGridDBColumn
Caption = #27454#21495
DataBinding.FieldName = 'F_StyleNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 70
end
object Tv1Column25: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'Piece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 70
end
object Tv1Column26: TcxGridDBColumn
Caption = #20943#20813
DataBinding.FieldName = 'Deduction'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 70
end
object Tv1Column27: TcxGridDBColumn
Caption = #23567#32568#36153
DataBinding.FieldName = 'OtherFee1'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 70
end
object Tv1Column28: TcxGridDBColumn
Caption = #20854#20182#36153
DataBinding.FieldName = 'OtherFee'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 70
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
end
object ToolBar2: TToolBar
Tag = 1
Left = 0
Top = 280
Width = 1353
Height = 30
Align = alBottom
AutoSize = True
ButtonHeight = 30
ButtonWidth = 67
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Financial.ImageList_new32
Images = DataLink_Financial.cxImageList_bar
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 2
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 2
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 6
OnClick = ToolButton2Click
end
end
2024-12-14 17:23:12 +08:00
object ScrollBox1: TScrollBox
Left = 0
Top = 30
2025-09-08 10:53:41 +08:00
Width = 1353
Height = 250
2024-12-14 17:23:12 +08:00
Align = alClient
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
2025-07-17 14:27:41 +08:00
Color = clWhite
2024-12-14 17:23:12 +08:00
Ctl3D = False
2025-07-17 14:27:41 +08:00
ParentColor = False
2024-12-14 17:23:12 +08:00
ParentCtl3D = False
2025-09-08 10:53:41 +08:00
TabOrder = 3
2024-12-14 17:23:12 +08:00
object Label2: TLabel
Left = 262
Top = 15
Width = 64
Height = 21
Caption = #23545#26041#21333#20301
end
object Label6: TLabel
Left = 28
Top = 100
Width = 62
Height = 21
Caption = #32534' '#21495
end
object Label7: TLabel
2025-09-08 10:53:41 +08:00
Left = 27
Top = 143
2024-12-14 17:23:12 +08:00
Width = 62
Height = 21
Caption = #22791' '#27880
end
object Label8: TLabel
2025-07-17 14:27:41 +08:00
Left = 762
2024-12-14 17:23:12 +08:00
Top = 57
Width = 64
Height = 21
Caption = #20184#27454#26041#24335
end
object Label5: TLabel
Left = 27
Top = 15
Width = 64
Height = 21
Caption = #25105#26041#21333#20301
end
object Label9: TLabel
Left = 504
Top = 15
Width = 64
Height = 21
Caption = #19978#32423#21333#20301
end
object Label20: TLabel
2025-07-17 14:27:41 +08:00
Left = 762
2024-12-14 17:23:12 +08:00
Top = 15
Width = 67
Height = 21
Caption = #26085' '#26399
end
object Label22: TLabel
Left = 262
2025-07-17 14:27:41 +08:00
Top = 57
2024-12-14 17:23:12 +08:00
Width = 64
Height = 21
Caption = #35745#21010#21333#21495
end
object Label23: TLabel
Left = 25
2025-07-17 14:27:41 +08:00
Top = 57
2024-12-14 17:23:12 +08:00
Width = 68
Height = 21
Caption = #21512' '#21516' '#21495
end
object Label24: TLabel
2025-07-17 14:27:41 +08:00
Left = 504
Top = 57
2024-12-14 17:23:12 +08:00
Width = 62
Height = 21
Caption = #25688' '#35201
end
object Label18: TLabel
2025-09-08 10:53:41 +08:00
Left = 263
Top = 99
2024-12-14 17:23:12 +08:00
Width = 64
Height = 21
Caption = #26159#21542#21547#31246
end
2025-07-17 14:27:41 +08:00
object Label26: TLabel
Left = 1006
Top = 15
Width = 64
Height = 21
Caption = #24212#25910#26085#26399
end
object Label27: TLabel
Left = 1006
Top = 57
Width = 62
Height = 21
Caption = #27719' '#29575
2024-12-14 17:23:12 +08:00
end
object OurCoName: TcxButtonEdit
Left = 99
2025-07-17 14:27:41 +08:00
Top = 11
2024-12-14 17:23:12 +08:00
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = OurCoNamePropertiesButtonClick
Style.ButtonStyle = btsDefault
2025-09-08 10:53:41 +08:00
TabOrder = 0
2024-12-14 17:23:12 +08:00
OnDblClick = OurCoNameDblClick
Width = 151
end
object OppCoName: TcxButtonEdit
Left = 337
2025-07-17 14:27:41 +08:00
Top = 11
2024-12-14 17:23:12 +08:00
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = OppCoNamePropertiesButtonClick
Style.ButtonStyle = btsDefault
2025-09-08 10:53:41 +08:00
TabOrder = 1
2024-12-14 17:23:12 +08:00
OnDblClick = OurCoNameDblClick
Width = 159
end
object OppParentCoName: TcxButtonEdit
Left = 578
2025-07-17 14:27:41 +08:00
Top = 11
2024-12-14 17:23:12 +08:00
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = OppParentCoNamePropertiesButtonClick
Style.ButtonStyle = btsDefault
2025-09-08 10:53:41 +08:00
TabOrder = 2
2024-12-14 17:23:12 +08:00
OnDblClick = OurCoNameDblClick
Width = 151
end
object FFTime: TcxDateEdit
2025-07-17 14:27:41 +08:00
Left = 835
Top = 11
2024-12-14 17:23:12 +08:00
Properties.ShowTime = False
2025-09-08 10:53:41 +08:00
TabOrder = 3
2024-12-14 17:23:12 +08:00
Width = 151
end
object ConNo: TcxButtonEdit
Left = 99
2025-07-17 14:27:41 +08:00
Top = 53
2024-12-14 17:23:12 +08:00
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = ConNoPropertiesButtonClick
2025-09-08 10:53:41 +08:00
Properties.OnChange = ConNoPropertiesChange
2024-12-14 17:23:12 +08:00
Style.ButtonStyle = btsDefault
2025-09-08 10:53:41 +08:00
TabOrder = 4
2024-12-14 17:23:12 +08:00
OnDblClick = OurCoNameDblClick
Width = 151
end
object OrderNo: TcxButtonEdit
2025-09-18 10:18:16 +08:00
Left = 339
Top = 60
2024-12-14 17:23:12 +08:00
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = OrderNoPropertiesButtonClick
Style.ButtonStyle = btsDefault
2025-09-08 10:53:41 +08:00
TabOrder = 5
2024-12-14 17:23:12 +08:00
OnDblClick = OurCoNameDblClick
Width = 159
end
object FFAbstract: TcxButtonEdit
Left = 578
2025-07-17 14:27:41 +08:00
Top = 53
2024-12-14 17:23:12 +08:00
Hint = 'FFAbstract/'#25688#35201
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = FFAbstractPropertiesButtonClick
Style.ButtonStyle = btsDefault
2025-09-08 10:53:41 +08:00
TabOrder = 6
2024-12-14 17:23:12 +08:00
OnDblClick = OurCoNameDblClick
Width = 151
end
object PayMent: TcxButtonEdit
2025-07-17 14:27:41 +08:00
Left = 835
Top = 53
2024-12-14 17:23:12 +08:00
Hint = 'PayMent/'#20184#27454#26041#24335
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = FFAbstractPropertiesButtonClick
Style.ButtonStyle = btsDefault
2025-09-08 10:53:41 +08:00
TabOrder = 7
2024-12-14 17:23:12 +08:00
OnDblClick = OurCoNameDblClick
Width = 151
end
object IsInvoice: TcxComboBox
2025-09-08 10:53:41 +08:00
Left = 337
Top = 95
2024-12-14 17:23:12 +08:00
Properties.DropDownListStyle = lsEditFixedList
Properties.Items.Strings = (
2025-07-17 14:27:41 +08:00
#26159
#21542)
2025-09-08 10:53:41 +08:00
TabOrder = 8
2025-07-17 14:27:41 +08:00
Text = #26159
2025-09-08 10:53:41 +08:00
Width = 159
2024-12-14 17:23:12 +08:00
end
object Note: TcxMemo
2025-09-08 10:53:41 +08:00
Left = 95
Top = 146
TabOrder = 9
Height = 79
Width = 1128
2025-07-17 14:27:41 +08:00
end
object ReconciliationDate: TcxDateEdit
Left = 1076
Top = 11
Properties.ShowTime = False
2025-09-08 10:53:41 +08:00
TabOrder = 10
2025-07-17 14:27:41 +08:00
Width = 151
end
object F_Code: TcxButtonEdit
Left = 99
Top = 96
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = F_CodePropertiesButtonClick
Style.ButtonStyle = btsDefault
2025-09-08 10:53:41 +08:00
TabOrder = 11
2025-07-17 14:27:41 +08:00
OnDblClick = OurCoNameDblClick
Width = 151
end
object ExchangeRate: TcxCurrencyEdit
Left = 1074
Top = 53
Properties.AssignedValues.DisplayFormat = True
2025-09-08 10:53:41 +08:00
TabOrder = 12
2025-07-17 14:27:41 +08:00
Width = 150
end
2024-12-14 17:23:12 +08:00
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_Financial.ADOLink
LockType = ltReadOnly
Parameters = <>
2025-09-08 10:53:41 +08:00
Left = 648
Top = 321
2024-12-14 17:23:12 +08:00
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_Financial.ADOLink
Parameters = <>
2025-09-08 10:53:41 +08:00
Left = 512
Top = 321
2024-12-14 17:23:12 +08:00
end
object ADOQueryMain: TADOQuery
Connection = DataLink_Financial.ADOLink
LockType = ltReadOnly
Parameters = <>
2025-09-08 10:53:41 +08:00
Left = 580
Top = 321
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 716
Top = 321
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 784
Top = 321
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
Left = 992
Top = 462
end
object DS_2: TDataSource
DataSet = CDS_2
Left = 872
Top = 430
end
object ADO2: TADOQuery
Connection = DataLink_Financial.ADOLink
Parameters = <>
Left = 920
Top = 518
2024-12-14 17:23:12 +08:00
end
end