D7gmYushang/发货申请(ShipmentRequest.dll)/U_PBOutHZList.dfm

939 lines
23 KiB
Plaintext
Raw Permalink Normal View History

2025-09-24 13:13:14 +08:00
object frmPBOutHZList: TfrmPBOutHZList
Left = -2
Top = 64
Width = 1541
Height = 737
Caption = #30721#21333#26597#35810'('#20302')'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1533
AutoSize = True
ButtonHeight = 30
ButtonWidth = 95
Caption = 'ToolBar1'
Color = clSkyBlue
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_ShipmentRequest.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = TBRafreshClick
end
object TBFind: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 20
OnClick = TBFindClick
end
object ToolButton1: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 4
OnClick = ToolButton1Click
end
object ComboBox1: TComboBox
Left = 189
Top = 0
Width = 172
Height = 24
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 16
ItemIndex = 0
ParentFont = False
TabOrder = 0
Text = #20986#24211#30721#21333'1'
Items.Strings = (
#20986#24211#30721#21333'1'
#20986#24211#30721#21333'2'
#20986#24211#30721#21333'3')
end
object ToolButton2: TToolButton
Left = 361
Top = 0
Caption = #25171#21360#20986#24211#21333
ImageIndex = 14
Visible = False
OnClick = ToolButton2Click
end
object TBExport: TToolButton
Left = 456
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 68
OnClick = TBExportClick
end
object TBClose: TToolButton
Left = 519
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 32
Width = 1533
Height = 60
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label2: TLabel
Left = 64
Top = 36
Width = 12
Height = 12
Caption = #33267
end
object Label10: TLabel
Left = 189
Top = 12
Width = 48
Height = 12
Caption = #30003#35831#21333#21495
end
object Label5: TLabel
Left = 190
Top = 36
Width = 48
Height = 12
Caption = #35746' '#21333' '#21495
end
object Label8: TLabel
Left = 357
Top = 36
Width = 48
Height = 12
Caption = #20986#24211#31867#22411
end
object Label14: TLabel
Left = 357
Top = 12
Width = 48
Height = 12
Caption = #23458' '#25143
end
object Label1: TLabel
Left = 505
Top = 12
Width = 48
Height = 12
Caption = #32534' '#21495
end
object Label3: TLabel
Left = 505
Top = 36
Width = 72
Height = 12
Caption = #39068' '#33394' '
end
object Label4: TLabel
Left = 653
Top = 12
Width = 48
Height = 12
Caption = #32568' '#21495
end
object BegDate: TDateTimePicker
Left = 77
Top = 8
Width = 87
Height = 20
Date = 40768.458268587970000000
Time = 40768.458268587970000000
TabOrder = 0
end
object EndDate: TDateTimePicker
Left = 77
Top = 32
Width = 87
Height = 20
Date = 40768.458268587970000000
Time = 40768.458268587970000000
TabOrder = 3
end
object FSID: TEdit
Tag = 2
Left = 246
Top = 8
Width = 87
Height = 20
TabOrder = 1
OnChange = PrtCodeNameChange
end
object ConNo: TEdit
Tag = 2
Left = 246
Top = 32
Width = 87
Height = 20
TabOrder = 4
OnChange = ConNoChange
OnKeyPress = ConNoKeyPress
end
object CRType: TComboBox
Tag = 4
Left = 409
Top = 32
Width = 87
Height = 20
Style = csDropDownList
ItemHeight = 12
ItemIndex = 0
TabOrder = 5
Text = #38144#21806#20986#24211
OnChange = CRTypeChange
Items.Strings = (
#38144#21806#20986#24211
#20854#23427#20986#24211
'')
end
object CustomerNoName: TEdit
Tag = 2
Left = 409
Top = 8
Width = 87
Height = 20
TabOrder = 2
OnChange = PrtCodeNameChange
end
object CheckBox1: TCheckBox
Left = 7
Top = 10
Width = 70
Height = 17
Caption = #26597#35810#26102#38388
TabOrder = 6
end
object HZCODE: TEdit
Tag = 2
Left = 557
Top = 8
Width = 87
Height = 20
TabOrder = 7
OnChange = PrtCodeNameChange
end
object HZcolor: TEdit
Tag = 2
Left = 557
Top = 32
Width = 87
Height = 20
TabOrder = 8
OnChange = PrtCodeNameChange
end
object HZganghao: TEdit
Tag = 2
Left = 705
Top = 8
Width = 87
Height = 20
TabOrder = 9
OnChange = PrtCodeNameChange
end
end
object MovePanel2: TMovePanel
Left = 344
Top = 192
Width = 289
Height = 49
BevelInner = bvLowered
Caption = #27491#22312#25191#34892#25968#25454#25805#20316#65292#35831#31245#21518#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
Visible = False
end
object cxGrid1: TcxGrid
Left = 0
Top = 92
Width = 1533
Height = 309
Align = alClient
TabOrder = 2
object Tv1: TcxGridDBTableView
OnMouseDown = Tv1MouseDown
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
Column = v1Column11
end
item
Kind = skSum
Position = spFooter
Column = v1Column18
end
item
Kind = skSum
Position = spFooter
Column = v1Column19
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1Column11
end
item
Kind = skSum
Column = v1Column18
end
item
Kind = skSum
Column = v1Column19
end
item
Kind = skSum
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1Column11
end
item
Kind = skSum
Column = v1Column18
end
item
Kind = skSum
Column = v1Column19
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.GroupFooters = gfAlwaysVisible
OptionsView.Indicator = True
Styles.Content = DataLink_ShipmentRequest.Default
Styles.Inactive = DataLink_ShipmentRequest.SHuangSe
Styles.IncSearch = DataLink_ShipmentRequest.SHuangSe
Styles.Selection = DataLink_ShipmentRequest.SHuangSe
Styles.Header = DataLink_ShipmentRequest.Default
object Tv1Column5: TcxGridDBColumn
Caption = #36130#21153#24050#29983#25104
DataBinding.FieldName = 'ISCW'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 90
end
object v1Column8: TcxGridDBColumn
Caption = #30003#35831#21333#21495
DataBinding.FieldName = 'FSID'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 93
end
object v1CustomerNoName: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'CustomerNoName'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_ShipmentRequest.Default
Width = 87
end
object v1OrdPerson1: TcxGridDBColumn
Caption = #19994#21153#21592
DataBinding.FieldName = 'Salesman'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_ShipmentRequest.Default
Width = 74
end
object v1OrdDate: TcxGridDBColumn
Caption = #30003#35831#26085#26399
DataBinding.FieldName = 'SQDate'
PropertiesClassName = 'TcxDateEditProperties'
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Header = DataLink_ShipmentRequest.Default
Width = 85
end
object v1Column23: TcxGridDBColumn
Caption = #20986#24211#31867#22411
DataBinding.FieldName = 'CRType'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 85
end
object Tv1Column2: TcxGridDBColumn
Caption = #25910#36135#20154
DataBinding.FieldName = 'ShouHuoer'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 72
end
object Tv1Column3: TcxGridDBColumn
Caption = #25910#36135#22320#22336
DataBinding.FieldName = 'FHDZ'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 97
end
object v1Column11: TcxGridDBColumn
Caption = #30003#35831#21305#25968
DataBinding.FieldName = 'SQPSHZ'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 92
end
object v1Column1: TcxGridDBColumn
Caption = #30003#35831#20154
DataBinding.FieldName = 'Filler'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 66
end
object v1Column13: TcxGridDBColumn
Caption = #23457#26680#20154
DataBinding.FieldName = 'Chker'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 65
end
object v1Column17: TcxGridDBColumn
Caption = #23457#26680#26085#26399
DataBinding.FieldName = 'ChkTime'
HeaderAlignmentHorz = taCenter
Width = 94
end
object v1Column5: TcxGridDBColumn
Caption = #21457#36135#26085#26399
DataBinding.FieldName = 'FHDate'
HeaderAlignmentHorz = taCenter
Width = 100
end
object v1Column18: TcxGridDBColumn
Caption = #21457#36135#21305#25968
DataBinding.FieldName = 'FHPSHZ'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 122
end
object v1Column19: TcxGridDBColumn
Caption = #21457#36135#37325#37327
DataBinding.FieldName = 'FHQtyHZ'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 93
end
object Tv1Column4: TcxGridDBColumn
Caption = #21457#36135#38271#24230
DataBinding.FieldName = 'FHmsHZ'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 77
end
object v1Column7: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 99
end
object Tv1Column1: TcxGridDBColumn
Caption = #25171#21360#27425#25968
DataBinding.FieldName = 'DYCS1'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taLeftJustify
HeaderAlignmentHorz = taCenter
Width = 100
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object cxSplitter1: TcxSplitter
Left = 0
Top = 401
Width = 1533
Height = 8
HotZoneClassName = 'TcxMediaPlayer9Style'
AlignSplitter = salBottom
Visible = False
end
object cxGrid2: TcxGrid
Left = 0
Top = 409
Width = 1533
Height = 297
Align = alBottom
TabOrder = 5
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = '0'
Position = spFooter
end
item
Format = '0'
Position = spFooter
end
item
Format = '0'
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = Tv2Column3
end
item
Kind = skSum
Column = v2Column3
end
item
Kind = skSum
Column = cv2Column6
end
item
Kind = skSum
Column = cv2Column5
end
item
Kind = skSum
Column = v2Column1
end
item
Kind = skSum
Column = Tv2Column2
end
item
Kind = skSum
Column = Tv2Column5
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.GroupFooters = gfAlwaysVisible
Styles.Content = DataLink_ShipmentRequest.Default
Styles.Inactive = DataLink_ShipmentRequest.SHuangSe
Styles.IncSearch = DataLink_ShipmentRequest.SHuangSe
Styles.Selection = DataLink_ShipmentRequest.SHuangSe
Styles.Header = DataLink_ShipmentRequest.Default
object cv2Column10: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'SPrtCodeName'
HeaderAlignmentHorz = taCenter
Width = 66
end
object cv2Column4: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'prtcolor'
HeaderAlignmentHorz = taCenter
Width = 66
end
object cv2Column7: TcxGridDBColumn
Caption = #32568#21495
DataBinding.FieldName = 'ganghao'
HeaderAlignmentHorz = taCenter
Width = 66
end
object cv2Column5: TcxGridDBColumn
Caption = #30003#35831#21305#25968
DataBinding.FieldName = 'sqps'
HeaderAlignmentHorz = taCenter
Width = 80
end
object cv2Column6: TcxGridDBColumn
Caption = #30003#35831#25968#37327
DataBinding.FieldName = 'sqqty'
HeaderAlignmentHorz = taCenter
Width = 80
end
object v2Column1: TcxGridDBColumn
Caption = #21457#36135#21305#25968
DataBinding.FieldName = 'FHPS'
HeaderAlignmentHorz = taCenter
Width = 77
end
object v2Column3: TcxGridDBColumn
Caption = #21457#36135#37325#37327
DataBinding.FieldName = 'FHQty'
HeaderAlignmentHorz = taCenter
Width = 81
end
object Tv2Column5: TcxGridDBColumn
Caption = #21457#36135#38271#24230
DataBinding.FieldName = 'FHMS'
HeaderAlignmentHorz = taCenter
Width = 84
end
object Tv2Column1: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'Price'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv2Column2: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'Money'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv2Column3: TcxGridDBColumn
Caption = #21253#32568#36153
DataBinding.FieldName = 'BGFee'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv2Column4: TcxGridDBColumn
Caption = #20179#20301
DataBinding.FieldName = 'cangwei'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv2Column6: TcxGridDBColumn
Caption = #26159#21542#24320#21305
DataBinding.FieldName = 'SFKP'
HeaderAlignmentHorz = taCenter
Width = 80
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
Parameters = <>
Left = 968
Top = 16
end
object ADOQueryMain: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 936
Top = 16
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1024
Top = 16
end
object DataSource1: TDataSource
DataSet = CDS_Main
Left = 920
Top = 152
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 784
Top = 248
end
object CDS_Main1: TClientDataSet
Aggregates = <>
Params = <>
Left = 568
Top = 280
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
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 = RMDB_Main
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 362
Top = 218
ReportData = {}
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 = 256
Top = 260
end
object ADOQueryDH: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 496
Top = 208
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 703
Top = 267
end
object CDS_Juan: TClientDataSet
Aggregates = <>
Params = <>
Left = 272
Top = 216
end
object CDS_JuanPRT: TClientDataSet
Aggregates = <>
Params = <>
Left = 432
Top = 288
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_JuanPRT
Left = 320
Top = 216
end
object CDS_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 443
Top = 134
end
object CDS_Label: TClientDataSet
Aggregates = <>
Params = <>
Left = 243
Top = 142
end
object DataSource2: TDataSource
DataSet = CDS_Main1
Left = 824
Top = 316
end
end