RTFormwork/项目代码/RTBasicsV1/T01贸易生产计划/U_TradePlanSchedule1.dfm

851 lines
23 KiB
Plaintext
Raw Normal View History

2024-07-24 09:18:38 +08:00
inherited frmTradePlanSchedule1: TfrmTradePlanSchedule1
Left = 274
Top = 193
Caption = #35746#21333#36827#24230
ClientHeight = 910
ClientWidth = 1894
Font.Height = -16
Position = poScreenCenter
WindowState = wsMaximized
ExplicitWidth = 1910
ExplicitHeight = 949
PixelsPerInch = 96
TextHeight = 21
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1894
Height = 30
AutoSize = True
ButtonHeight = 30
ButtonWidth = 99
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_TradePlan.cxImageList_bar
Images = DataLink_TradePlan.cxImageList_bar
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
ExplicitWidth = 1595
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TBRafreshClick
end
object ToolButton2: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 0
OnClick = ToolButton2Click
end
object ToolButton1: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 20
OnClick = ToolButton1Click
end
object ToolButton3: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 21
OnClick = ToolButton3Click
end
object ToolButton5: TToolButton
Left = 284
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton5Click
end
object TBClose: TToolButton
Left = 387
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object Panel1: TPanel [1]
Left = 0
Top = 30
Width = 1894
Height = 87
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 1
object Label4: TLabel
Left = 452
Top = 50
Width = 64
Height = 21
Caption = #25105#26041#21333#20301
end
object Label9: TLabel
Left = 24
Top = 50
Width = 64
Height = 21
Caption = #37319#36141#21333#21495
end
object Label3: TLabel
Left = 246
Top = 50
Width = 48
Height = 21
Caption = #20379#24212#21830
end
inline frmFrameDateSel1: TfrmFrameDateSel
Left = 2
Top = 2
Width = 1890
Height = 37
Align = alTop
Color = clWhite
ParentBackground = False
ParentColor = False
TabOrder = 0
ExplicitLeft = 2
ExplicitTop = 2
ExplicitWidth = 1591
inherited BegDate: TcxDateEdit
ExplicitHeight = 33
end
inherited EndDate: TcxDateEdit
ExplicitHeight = 33
end
inherited cbbType: TcxComboBox
ExplicitHeight = 33
end
end
object BuyName: TcxTextEdit
Tag = 2
Left = 520
Top = 44
ParentFont = False
TabOrder = 1
Width = 150
end
object PurNo: TcxTextEdit
Tag = 2
Left = 92
Top = 44
ParentFont = False
TabOrder = 2
Width = 150
end
object SellName: TcxTextEdit
Tag = 2
Left = 298
Top = 44
ParentFont = False
TabOrder = 3
Width = 150
end
end
object cxGrid1: TcxGrid [2]
Left = 0
Top = 117
Width = 1894
Height = 400
Align = alTop
BorderStyle = cxcbsNone
TabOrder = 2
ExplicitTop = 137
ExplicitWidth = 1595
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
OnFocusedRecordChanged = TV1FocusedRecordChanged
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
Column = v1PRTPrice
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1PRTOrderQty
end
item
Kind = skSum
end
item
Kind = skSum
Column = cxGridDBColumn9
end
item
Kind = skSum
Column = TV1Column8
end
item
Kind = skSum
Column = TV1Column7
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object TV1Column4: TcxGridDBColumn
Caption = #19979#21333#26085#26399
DataBinding.FieldName = 'PurDate'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 104
end
object TV1Column2: TcxGridDBColumn
Caption = #37319#36141#21333#21495
DataBinding.FieldName = 'PurNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 109
end
object TV1Column1: TcxGridDBColumn
Caption = #20379#24212#21830
DataBinding.FieldName = 'SellName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 107
end
object TV1Column3: TcxGridDBColumn
Caption = #20132#36135#26085#26399
DataBinding.FieldName = 'DlyDate'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 106
end
object TV1Column5: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'C_Degree'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 91
end
object VC_SCSCode: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 92
end
object cxGridDBColumn2: TcxGridDBColumn
Caption = #20013#25991#21697#21517
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 93
end
object TV1Column12: TcxGridDBColumn
Caption = #24067#31181
DataBinding.FieldName = 'GC_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 68
end
object TV1Column14: TcxGridDBColumn
Caption = #21518#25972#29702#20013#25991
DataBinding.FieldName = 'CraftName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 99
end
object TV1Column13: TcxGridDBColumn
Caption = #21152#24037#21035
DataBinding.FieldName = 'CraftCode'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 87
end
object v1Column5: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'C_Spec'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object TV1Column6: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'C_GramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV1Column9: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'C_Width'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #25104#20998
DataBinding.FieldName = 'C_Composition'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object v1PRTOrderQty: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object v1OrderUnit: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'QtyUnit'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsEditFixedList
Properties.Items.Strings = (
'Kg'
'M'
'Y')
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 58
end
object v1PRTPrice: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'Price'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 70
end
object cxGridDBColumn9: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'Amount'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 84
end
object v1Column2: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'SNote'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 92
end
object TV1Column8: TcxGridDBColumn
Caption = #22238#20179#21305#25968
DataBinding.FieldName = 'LJHCPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 114
end
object TV1Column7: TcxGridDBColumn
Caption = #22238#20179#25968#37327
DataBinding.FieldName = 'LJHCQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 120
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV1
end
end
object Panel2: TPanel [3]
Left = 0
Top = 517
Width = 1894
Height = 393
Align = alClient
Caption = 'Panel2'
TabOrder = 3
ExplicitLeft = 8
ExplicitTop = 536
ExplicitWidth = 1595
ExplicitHeight = 373
object cxGrid2: TcxGrid
Left = 1
Top = 1
Width = 608
Height = 391
Align = alLeft
TabOrder = 0
ExplicitHeight = 371
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_2
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skCount
end
item
Kind = skSum
end
item
Kind = skSum
Column = v2Column6
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1Column15
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object TV2Column1: TcxGridDBColumn
Caption = #22238#20179#26085#26399
DataBinding.FieldName = 'IOTime'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 115
end
object v1Column10: TcxGridDBColumn
Caption = #25209#21495
DataBinding.FieldName = 'BatchNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 124
end
object v1Column15: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'Piece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 102
end
object v2Column6: TcxGridDBColumn
Tag = 2
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 118
end
object v1Column3: TcxGridDBColumn
Tag = 2
Caption = #21333#20301
DataBinding.FieldName = 'QtyUnit'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
'Kg'
'M'
'Y')
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 87
end
end
object cxGrid1Level1: TcxGridLevel
GridView = TV2
end
end
object cxGrid3: TcxGrid
Left = 609
Top = 1
Width = 1284
Height = 391
Align = alClient
TabOrder = 1
ExplicitLeft = 615
ExplicitTop = 6
ExplicitHeight = 371
object TV3: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_3
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skCount
end
item
Kind = skSum
end
item
Kind = skSum
Column = cxGridDBColumn8
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = cxGridDBColumn7
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object cxGridDBColumn3: TcxGridDBColumn
Caption = #26085#26399
DataBinding.FieldName = 'IOTime'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #32568#21495
DataBinding.FieldName = 'FtyPCId'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 66
end
object TV3Column1: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object cxGridDBColumn7: TcxGridDBColumn
Caption = #25237#22383#21305#25968
DataBinding.FieldName = 'TPPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object cxGridDBColumn8: TcxGridDBColumn
Tag = 2
Caption = #25237#22383#25968#37327
DataBinding.FieldName = 'TPQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV3Column3: TcxGridDBColumn
Caption = #21152#24037#21378
DataBinding.FieldName = 'ToCoName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV3Column2: TcxGridDBColumn
Caption = #22238#20179#37325#37327
DataBinding.FieldName = 'WGQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV3Column4: TcxGridDBColumn
Caption = #22238#20179#21305#25968
DataBinding.FieldName = 'WGPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV3Column5: TcxGridDBColumn
Caption = #25439#32791'%'
DataBinding.FieldName = 'sl'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV3Column6: TcxGridDBColumn
Caption = #22238#20179#24773#20917
DataBinding.FieldName = 'StkCoName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV3Column7: TcxGridDBColumn
Caption = #24211#23384#21305#25968
DataBinding.FieldName = 'STKPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object TV3Column8: TcxGridDBColumn
Caption = #24211#23384#25968#37327
DataBinding.FieldName = 'STKQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
end
object cxGridLevel2: TcxGridLevel
GridView = TV3
end
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Left = 789
Top = 369
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Left = 861
Top = 369
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_TradePlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 789
Top = 441
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Parameters = <>
Left = 933
Top = 369
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradePlan.ADOLink
LockType = ltReadOnly
CommandTimeout = 600
Parameters = <>
Left = 1005
Top = 369
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 933
Top = 441
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 1077
Top = 441
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 861
Top = 441
end
object RMGridReport1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbExport, rmpbNavigator]
DefaultCollate = False
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
PreviewOptions.RulerUnit = rmutScreenPixels
PreviewOptions.RulerVisible = False
PreviewOptions.DrawBorder = False
PreviewOptions.BorderPen.Color = clGray
PreviewOptions.BorderPen.Style = psDash
Dataset = RMDBDataSet1
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 906
Top = 650
ReportData = {}
end
object RMDBDataSet1: TRMDBDataSet
Visible = True
DataSet = CDS_1
Left = 803
Top = 627
end
object RMXLSExport1: TRMXLSExport
ShowAfterExport = True
ExportPrecision = 1
PagesOfSheet = 100
ExportImages = True
ExportFrames = True
ExportImageFormat = ifBMP
JPEGQuality = 0
ScaleX = 1.000000000000000000
ScaleY = 1.000000000000000000
CompressFile = False
Left = 1006
Top = 653
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_TradePlan.ADOLink
Parameters = <>
Left = 1077
Top = 369
end
object cxStyleRepository1: TcxStyleRepository
Left = 1005
Top = 441
PixelsPerInch = 96
object cxStyle1: TcxStyle
AssignedValues = [svColor, svFont, svTextColor]
Color = clBlack
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
TextColor = clBlack
end
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
Left = 788
Top = 707
end
object GPM_2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 860
Top = 707
end
object DS_2: TDataSource
DataSet = CDS_2
Left = 1004
Top = 707
end
object ADO_2: TADOQuery
Connection = DataLink_TradePlan.ADOLink
LockType = ltReadOnly
CommandTimeout = 600
Parameters = <>
Left = 912
Top = 713
end
object CDS_3: TClientDataSet
Aggregates = <>
Params = <>
Left = 791
Top = 785
end
object GPM_3: TcxGridPopupMenu
Grid = cxGrid3
PopupMenus = <>
Left = 863
Top = 785
end
object ADO_3: TADOQuery
Connection = DataLink_TradePlan.ADOLink
LockType = ltReadOnly
CommandTimeout = 600
Parameters = <>
Left = 915
Top = 791
end
object DS_3: TDataSource
DataSet = CDS_3
Left = 1007
Top = 785
end
end