D10xhGemei/T02贸易汇总仓库/U_ItemizedListInPut.dfm

610 lines
16 KiB
Plaintext
Raw Normal View History

2025-02-19 14:05:29 +08:00
inherited frmItemizedListInPut: TfrmItemizedListInPut
Left = 143
Top = 4
Caption = #35746#21333#24405#20837
ClientHeight = 593
2025-03-08 10:45:47 +08:00
ClientWidth = 1153
2025-02-19 14:05:29 +08:00
Font.Charset = GB2312_CHARSET
Font.Height = -16
Position = poMainFormCenter
2025-03-20 16:38:30 +08:00
ExplicitWidth = 1161
ExplicitHeight = 624
2025-02-19 14:05:29 +08:00
PixelsPerInch = 96
TextHeight = 21
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
2025-03-08 10:45:47 +08:00
Width = 1153
2025-02-19 14:05:29 +08:00
Height = 30
AutoSize = True
ButtonHeight = 30
ButtonWidth = 99
Caption = 'ToolBar1'
EdgeInner = esNone
EdgeOuter = esNone
Images = cxImageList_bar
List = True
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 16
OnClick = TBSaveClick
end
2025-02-22 17:41:53 +08:00
object ToolButton5: TToolButton
2025-02-19 14:05:29 +08:00
Left = 71
Top = 0
AutoSize = True
2025-02-22 17:41:53 +08:00
Caption = #26412#21333#25171#21360
ImageIndex = 21
OnClick = ToolButton5Click
end
2025-03-06 16:38:54 +08:00
object ToolButton1: TToolButton
2025-02-22 17:41:53 +08:00
Left = 174
Top = 0
AutoSize = True
2025-03-06 16:38:54 +08:00
Caption = #21246#36873#25171#21360
ImageIndex = 21
OnClick = ToolButton1Click
end
object ToolButton3: TToolButton
Left = 277
Top = 0
AutoSize = True
2025-02-19 14:05:29 +08:00
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton3Click
end
object TBClose: TToolButton
2025-03-06 16:38:54 +08:00
Left = 380
2025-02-19 14:05:29 +08:00
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object ToolBar2: TToolBar [1]
Tag = 1
Left = 0
Top = 193
2025-03-08 10:45:47 +08:00
Width = 1153
2025-02-19 14:05:29 +08:00
Height = 30
ButtonHeight = 30
ButtonWidth = 99
Caption = 'ToolBar1'
EdgeInner = esNone
EdgeOuter = esNone
Images = cxImageList_bar
List = True
ShowCaptions = True
TabOrder = 1
2025-02-24 13:42:25 +08:00
object btnAdd: TToolButton
2025-02-19 14:05:29 +08:00
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 2
2025-02-24 13:42:25 +08:00
OnClick = btnAddClick
2025-02-19 14:05:29 +08:00
end
object ToolButton2: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 6
OnClick = ToolButton2Click
end
object ToolButton4: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #20135#21697#36873#25321
ImageIndex = 4
Visible = False
OnClick = ToolButton4Click
end
end
object Panel2: TPanel [2]
Left = 0
Top = 223
2025-03-08 10:45:47 +08:00
Width = 1153
2025-02-19 14:05:29 +08:00
Height = 370
Align = alClient
Caption = 'Panel2'
TabOrder = 2
object Panel3: TPanel
Left = 1
Top = 1
2025-03-08 10:45:47 +08:00
Width = 1151
2025-02-19 14:05:29 +08:00
Height = 368
Align = alClient
Caption = 'Panel2'
TabOrder = 0
object cxGrid1: TcxGrid
Left = 1
Top = 1
2025-03-08 10:45:47 +08:00
Width = 1149
2025-02-19 14:05:29 +08:00
Height = 366
Align = alClient
PopupMenu = PopupMenu2
TabOrder = 0
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
2025-02-21 15:28:49 +08:00
OnMouseDown = Tv1MouseDown
2025-02-19 14:05:29 +08:00
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_1
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = '0'
Position = spFooter
end
item
Format = '0'
Position = spFooter
Column = v1PRTOrderQty
end
item
Format = '0'
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1PRTOrderQty
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = VC_PRTPs
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsData.Deleting = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object v1Column11: TcxGridDBColumn
Tag = 99
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 81
end
object Tv1Column3: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'SerialNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Sorting = False
SortIndex = 0
SortOrder = soAscending
Width = 85
end
object Tv1Column1: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
2025-02-22 13:21:24 +08:00
Properties.ReadOnly = True
2025-02-19 14:05:29 +08:00
Properties.OnButtonClick = Tv1Column1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 89
end
object Tv1Column7: TcxGridDBColumn
2025-02-24 13:45:36 +08:00
Caption = #33394#24067#21517#31216
2025-02-19 14:05:29 +08:00
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
2025-02-21 15:28:49 +08:00
PropertiesClassName = 'TcxLookupComboBoxProperties'
Properties.IncrementalFilteringOptions = [ifoUseContainsOperator]
Properties.KeyFieldNames = 'C_Name'
Properties.ListColumns = <
2025-02-19 14:05:29 +08:00
item
2025-02-21 15:28:49 +08:00
Caption = #21697#21517
FieldName = 'C_Name'
2025-02-19 14:05:29 +08:00
end>
2025-02-21 15:28:49 +08:00
Properties.ListSource = DS_PM
Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 145
end
2025-02-26 09:31:39 +08:00
object Tv1Column6: TcxGridDBColumn
Caption = #26579#21378#21697#21517
DataBinding.FieldName = 'C_GYSNAME'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxLookupComboBoxProperties'
Properties.KeyFieldNames = 'C_GYSNAME'
Properties.ListColumns = <
item
Caption = #26579#21378#21697#21517
FieldName = 'C_GYSNAME'
end>
Properties.ListSource = DS_RCPM
Properties.OnEditValueChanged = Tv1Column6PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 98
end
2025-02-21 15:28:49 +08:00
object Tv1Column5: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'C_ColorNo'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxLookupComboBoxProperties'
Properties.IncrementalFilteringOptions = [ifoUseContainsOperator]
Properties.KeyFieldNames = 'C_ColorNo'
Properties.ListColumns = <
item
Caption = #33394#21495
FieldName = 'C_ColorNo'
end
item
Caption = #39068#33394
FieldName = 'C_Color'
end>
Properties.ListSource = DS_YS
Properties.OnEditValueChanged = Tv1Column5PropertiesEditValueChanged
2025-02-19 14:05:29 +08:00
HeaderAlignmentHorz = taCenter
2025-02-21 15:28:49 +08:00
Width = 130
2025-02-19 14:05:29 +08:00
end
object v1PRTColor: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
HeaderAlignmentHorz = taCenter
2025-02-21 15:28:49 +08:00
Width = 93
2025-02-19 14:05:29 +08:00
end
object VC_PRTPs: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'TISPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 67
end
object v1PRTOrderQty: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'TISQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 55
end
object Tv1Column8: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'TISUnit'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxComboBoxProperties'
2025-02-24 13:42:25 +08:00
Properties.DropDownListStyle = lsEditFixedList
2025-02-19 14:05:29 +08:00
Properties.Items.Strings = (
'M'
'Y'
'Kg')
HeaderAlignmentHorz = taCenter
Width = 55
end
object Tv1Column4: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'Price'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 93
end
object Tv1Column2: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'OrdSNote'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 55
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
end
end
object ScrollBox1: TScrollBox [3]
Left = 0
Top = 30
2025-03-08 10:45:47 +08:00
Width = 1153
2025-02-19 14:05:29 +08:00
Height = 163
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
Ctl3D = False
ParentCtl3D = False
TabOrder = 3
object Label3: TLabel
Left = 377
Top = 11
Width = 64
Height = 21
Caption = #30721#21333#26085#26399
end
object Label1: TLabel
Left = 21
Top = 90
Width = 32
Height = 21
Caption = #22791#27880
end
object Label2: TLabel
Left = 21
Top = 11
Width = 64
Height = 21
Caption = #30721#21333#32534#21495
end
object Label14: TLabel
Left = 21
Top = 51
2025-02-21 15:28:49 +08:00
Width = 64
2025-02-19 14:05:29 +08:00
Height = 21
2025-02-21 15:28:49 +08:00
Caption = #23545#26041#21333#20301
2025-02-19 14:05:29 +08:00
end
object Label4: TLabel
Left = 377
Top = 51
Width = 64
Height = 21
Caption = #30721#21333#31867#22411
end
object TIMNo: TcxTextEdit
Left = 114
Top = 5
Enabled = False
TabOrder = 0
Width = 200
end
object TIMNote: TMemo
Left = 114
Top = 90
Width = 562
Height = 58
ScrollBars = ssVertical
TabOrder = 1
end
object OopCoName: TcxButtonEdit
Left = 114
2025-02-26 09:31:39 +08:00
Top = 46
2025-02-19 14:05:29 +08:00
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = CustNamePropertiesButtonClick
Style.ButtonStyle = btsDefault
TabOrder = 2
OnDblClick = OurCoNameDblClick
Width = 200
end
object TIMDate: TcxDateEdit
Left = 461
Top = 5
Enabled = False
Properties.ShowTime = False
TabOrder = 3
Width = 200
end
object TIMType: TcxComboBox
Left = 461
Top = 45
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#21152#24037#23436#25104
2025-02-21 15:28:49 +08:00
#22238#20462#23436#25104
#23458#25143#36864#36135)
2025-02-19 14:05:29 +08:00
TabOrder = 4
Text = #21152#24037#23436#25104
Width = 200
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
2025-02-21 15:28:49 +08:00
Left = 361
Top = 94
2025-02-19 14:05:29 +08:00
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
2025-02-21 15:28:49 +08:00
Left = 455
Top = 94
2025-02-19 14:05:29 +08:00
end
inherited ImageList_new32: TImageList
2025-02-21 15:28:49 +08:00
Left = 455
Top = 470
2025-02-19 14:05:29 +08:00
end
inherited cxImageList_bar: TcxImageList
FormatVersion = 1
2025-02-21 15:28:49 +08:00
Left = 267
Top = 376
DesignInfo = 24641803
2025-02-19 14:05:29 +08:00
end
object ADOTemp: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
LockType = ltReadOnly
Parameters = <>
2025-02-21 15:28:49 +08:00
Left = 643
Top = 94
2025-02-19 14:05:29 +08:00
end
object ADOCmd: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
Parameters = <>
2025-02-21 15:28:49 +08:00
Left = 267
Top = 94
2025-02-19 14:05:29 +08:00
end
object DS_1: TDataSource
DataSet = CDS_1
2025-02-21 15:28:49 +08:00
Left = 361
Top = 376
2025-02-19 14:05:29 +08:00
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
2025-02-21 15:28:49 +08:00
Left = 361
Top = 282
2025-02-19 14:05:29 +08:00
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
2025-02-21 15:28:49 +08:00
Left = 549
Top = 282
2025-02-19 14:05:29 +08:00
end
object ADOQueryLabel: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
Parameters = <>
2025-02-21 15:28:49 +08:00
Left = 549
Top = 94
2025-02-19 14:05:29 +08:00
end
object ADO_I1: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
Parameters = <>
2025-02-21 15:28:49 +08:00
Left = 455
Top = 188
2025-02-19 14:05:29 +08:00
end
object DS_I1: TDataSource
DataSet = ADO_I1
2025-02-21 15:28:49 +08:00
Left = 549
Top = 376
2025-02-19 14:05:29 +08:00
end
object IdFTP1: TIdFTP
ConnectTimeout = 0
NATKeepAlive.UseKeepAlive = False
NATKeepAlive.IdleTimeMS = 0
NATKeepAlive.IntervalMS = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
ReadTimeout = 0
2025-02-21 15:28:49 +08:00
Left = 361
Top = 470
2025-02-19 14:05:29 +08:00
end
object ADO_I2: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
Parameters = <>
2025-02-21 15:28:49 +08:00
Left = 549
Top = 188
2025-02-19 14:05:29 +08:00
end
object DS_I2: TDataSource
DataSet = ADO_I2
2025-02-21 15:28:49 +08:00
Left = 643
Top = 376
2025-02-19 14:05:29 +08:00
end
object PopupMenu2: TPopupMenu
2025-02-21 15:28:49 +08:00
Left = 549
Top = 470
2025-02-19 14:05:29 +08:00
object N3: TMenuItem
Caption = #20840#36873
OnClick = N3Click
end
object N4: TMenuItem
Caption = #20840#24323
OnClick = N4Click
end
end
object GPM_2: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
2025-02-21 15:28:49 +08:00
Left = 643
Top = 282
2025-02-19 14:05:29 +08:00
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
2025-02-21 15:28:49 +08:00
Left = 455
Top = 282
2025-02-19 14:05:29 +08:00
end
object DS_2: TDataSource
DataSet = CDS_2
2025-02-21 15:28:49 +08:00
Left = 455
Top = 376
2025-02-19 14:05:29 +08:00
end
object ADO_2: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
LockType = ltReadOnly
Parameters = <>
2025-02-21 15:28:49 +08:00
Left = 361
Top = 188
2025-02-19 14:05:29 +08:00
end
object ADO_YQ: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
LockType = ltReadOnly
Parameters = <>
2025-02-21 15:28:49 +08:00
Left = 267
Top = 282
2025-02-19 14:05:29 +08:00
end
object ADO_1: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
LockType = ltReadOnly
Parameters = <>
2025-02-21 15:28:49 +08:00
Left = 267
Top = 188
end
object DS_PM: TDataSource
DataSet = ADO_PM
Left = 267
Top = 470
end
object ADO_PM: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 643
Top = 188
end
object ADO_YS: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
LockType = ltReadOnly
Parameters = <>
2025-02-24 13:42:25 +08:00
Left = 775
Top = 188
2025-02-21 15:28:49 +08:00
end
object DS_YS: TDataSource
DataSet = ADO_YS
Left = 755
Top = 340
2025-02-19 14:05:29 +08:00
end
2025-02-26 09:31:39 +08:00
object DS_RCPM: TDataSource
DataSet = ADO_RCPM
Left = 744
Top = 427
end
object ADO_RCPM: TADOQuery
Connection = DataLink_TradeTotalClothStk.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 722
Top = 270
end
2025-02-19 14:05:29 +08:00
end