D10myYicheng/发货申请(ShipmentRequest.dll)/U_FHSQInPut220313.dfm

677 lines
16 KiB
Plaintext
Raw Normal View History

2025-05-27 14:08:09 +08:00
object frmFHSQInPut220313: TfrmFHSQInPut220313
Left = 371
Top = 205
Width = 1252
Height = 646
Caption = #21457#36135#30003#35831#24405#20837
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 = 1234
Height = 29
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
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 TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object TBClose: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
Width = 1234
Height = 220
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label10: TLabel
Left = 576
Top = 16
Width = 82
Height = 15
Caption = #35746' '#21333' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 39
Top = 16
Width = 84
Height = 15
Caption = #23458' '#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 305
Top = 16
Width = 80
Height = 15
Caption = #20986#24211#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 661
Top = 240
Width = 80
Height = 15
Caption = #20135#21697#32534#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label5: TLabel
Left = 41
Top = 55
Width = 80
Height = 15
Caption = #20135#21697#21517#31216#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 575
Top = 55
Width = 84
Height = 15
Caption = #38376' '#24133#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 850
Top = 55
Width = 84
Height = 15
Caption = #20811' '#37325#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 39
Top = 178
Width = 84
Height = 15
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 41
Top = 93
Width = 80
Height = 15
Caption = #25910#36135#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 303
Top = 93
Width = 84
Height = 15
Caption = #26579' '#21378#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 303
Top = 55
Width = 84
Height = 15
Caption = #35268' '#26684#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 81
Top = 240
Width = 75
Height = 15
Caption = #26426' '#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label24: TLabel
Left = 353
Top = 240
Width = 75
Height = 15
Caption = #24037' '#33402#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label4: TLabel
Left = 853
Top = 16
Width = 80
Height = 15
Caption = #30003#35831#25209#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object lbl2: TLabel
Left = 10
Top = 129
Width = 112
Height = 15
Caption = #20132#36135#30830#35748#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 303
Top = 129
Width = 84
Height = 15
Caption = #26588' '#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 578
Top = 129
Width = 80
Height = 15
Caption = #38144#21806#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CRType: TComboBox
Tag = 1
Left = 383
Top = 11
Width = 170
Height = 23
Style = csDropDownList
ItemHeight = 15
ItemIndex = 0
TabOrder = 1
Text = #38144#21806#20986#24211
Items.Strings = (
#38144#21806#20986#24211)
end
object PrtCodeName: TEdit
Tag = 1
Left = 120
Top = 51
Width = 170
Height = 18
ReadOnly = True
TabOrder = 2
end
object prtmf: TEdit
Tag = 1
Left = 658
Top = 51
Width = 170
Height = 18
ReadOnly = True
TabOrder = 3
end
object prtkz: TEdit
Tag = 1
Left = 928
Top = 51
Width = 170
Height = 18
ReadOnly = True
TabOrder = 4
end
object ConNo: TBtnEditA
Tag = 1
Left = 658
Top = 11
Width = 173
Height = 23
ReadOnly = True
TabOrder = 0
OnBtnClick = ConNoBtnClick
end
object Note: TEdit
Tag = 1
Left = 120
Top = 174
Width = 980
Height = 18
TabOrder = 7
end
object SHDanWei: TBtnEditC
Tag = 1
Left = 120
Top = 88
Width = 170
Height = 23
Hint = 'FYName/'#36153#29992#21517#31216
TabOrder = 5
OnBtnUpClick = SHDanWeiBtnUpClick
OnBtnDnClick = SHDanWeiBtnDnClick
end
object ranchang: TBtnEditC
Tag = 1
Left = 383
Top = 88
Width = 440
Height = 23
Hint = 'FHTaiTou/'#21457#36135#25260#22836
TabOrder = 6
OnBtnUpClick = ranchangBtnUpClick
end
object PrtCode: TBtnEditA
Tag = 1
Left = 741
Top = 235
Width = 174
Height = 23
ReadOnly = True
TabOrder = 8
Visible = False
OnBtnClick = PrtCodeBtnClick
end
object CustomerNoName: TBtnEditA
Tag = 1
Left = 120
Top = 11
Width = 174
Height = 23
ReadOnly = True
TabOrder = 9
OnBtnClick = CustomerNoNameBtnClick
end
object prtspec: TEdit
Tag = 1
Left = 383
Top = 51
Width = 170
Height = 18
ReadOnly = True
TabOrder = 10
end
object CarType: TEdit
Tag = 1
Left = 153
Top = 236
Width = 170
Height = 18
TabOrder = 11
Visible = False
end
object gongyi: TEdit
Tag = 1
Left = 428
Top = 236
Width = 170
Height = 18
TabOrder = 12
Visible = False
end
object BatchNo: TComboBox
Tag = 1
Left = 928
Top = 11
Width = 278
Height = 23
Style = csDropDownList
ItemHeight = 15
TabOrder = 13
Visible = False
end
object DLYDATE: TDateTimePicker
Tag = 1
Left = 120
Top = 124
Width = 113
Height = 23
Date = 40675.464761099540000000
Format = 'yyyy-MM-dd'
Time = 40675.464761099540000000
TabOrder = 14
end
object GuiXing: TBtnEditC
Tag = 1
Left = 383
Top = 124
Width = 170
Height = 23
Hint = 'GuiXing/'#26588#22411
TabOrder = 15
OnBtnUpClick = SHDanWeiBtnUpClick
OnBtnDnClick = SHDanWeiBtnDnClick
end
object XSType: TComboBox
Tag = 1
Left = 658
Top = 124
Width = 168
Height = 23
Style = csDropDownList
ItemHeight = 15
TabOrder = 16
Items.Strings = (
#20869#38144
#22806#38144)
end
end
object ToolBar2: TToolBar
Left = 0
Top = 249
Width = 1234
Height = 29
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
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 = 2
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 57
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 113
OnClick = ToolButton2Click
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 278
Width = 1234
Height = 321
Align = alClient
TabOrder = 3
object Tv1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource1
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>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_ShipmentRequest.SHuangSe
Styles.IncSearch = DataLink_ShipmentRequest.SHuangSe
Styles.Selection = DataLink_ShipmentRequest.SHuangSe
Styles.Header = DataLink_ShipmentRequest.Default
object v1Column2: TcxGridDBColumn
Caption = #35745#21010#21333#21495
DataBinding.FieldName = 'SCConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 77
end
object v1Column1: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'PRTColor'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 81
end
object cv1Column4: TcxGridDBColumn
Caption = #32568#21495
DataBinding.FieldName = 'gangno'
HeaderAlignmentHorz = taCenter
Width = 75
end
object cv1Column6: TcxGridDBColumn
Caption = #27454#21495
DataBinding.FieldName = 'kuanhao'
HeaderAlignmentHorz = taCenter
Width = 93
end
object cv1Column7: TcxGridDBColumn
Caption = #35746#21333#21305#25968
DataBinding.FieldName = 'orderps'
HeaderAlignmentHorz = taCenter
Width = 83
end
object cv1Column8: TcxGridDBColumn
Caption = #35746#21333#25968#37327
DataBinding.FieldName = 'orderqty'
HeaderAlignmentHorz = taCenter
Width = 76
end
object cv1Column2: TcxGridDBColumn
Caption = #30003#35831#21305#25968
DataBinding.FieldName = 'sqps'
FooterAlignmentHorz = taRightJustify
HeaderAlignmentHorz = taCenter
Width = 86
end
object cv1Column3: TcxGridDBColumn
Caption = #30003#35831#25968#37327
DataBinding.FieldName = 'sqqty'
HeaderAlignmentHorz = taCenter
Width = 86
end
object cv1Column5: TcxGridDBColumn
Caption = #28014#21160#33539#22260
DataBinding.FieldName = 'fdfw'
HeaderAlignmentHorz = taCenter
Width = 95
end
object v1Column5: TcxGridDBColumn
Caption = #25152#23646#35746#21333#21495
DataBinding.FieldName = 'SSConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_ShipmentRequest.Default
Width = 97
end
object v1Column4: TcxGridDBColumn
Caption = #25152#23646#23458#25143
DataBinding.FieldName = 'SSKHName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_ShipmentRequest.Default
Width = 124
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ADOTemp: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 368
Top = 1
end
object ADOCmd: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
Parameters = <>
Left = 312
Top = 1
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 644
Top = 268
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 588
Top = 268
end
object ADOQuery1: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
Parameters = <>
Left = 260
Top = 1
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 528
Top = 268
end
object cxStyleRepository1: TcxStyleRepository
object dazi1: TcxStyle
AssignedValues = [svColor]
Color = clRed
end
end
end