D7zzXiangHeng/发货申请(ShipmentRequest.dll)/U_FHSQInPut.dfm

545 lines
13 KiB
Plaintext
Raw Normal View History

2025-08-08 10:42:50 +08:00
object frmFHSQInPut: TfrmFHSQInPut
Left = 254
Top = 165
Width = 1219
Height = 635
Caption = #21457#36135#30003#35831#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1203
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 = 1203
Height = 146
Align = alClient
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label14: TLabel
Left = 31
Top = 15
Width = 67
Height = 12
Caption = #23458' '#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 965
Top = 125
Width = 65
Height = 12
Caption = #20986#24211#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label12: TLabel
Left = 31
Top = 100
Width = 67
Height = 12
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 897
Top = 72
Width = 65
Height = 12
Caption = #25910#36135#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label13: TLabel
Left = 33
Top = 71
Width = 65
Height = 12
Caption = #21457#36135#25260#22836#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 31
Top = 42
Width = 67
Height = 12
Caption = #26579' '#21378#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 968
Top = 45
Width = 66
Height = 12
Caption = #36710' '#29260' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label18: TLabel
Left = 253
Top = 16
Width = 65
Height = 12
Caption = #25910#36135#25260#22836#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label26: TLabel
Left = 751
Top = 44
Width = 67
Height = 12
Caption = #25209' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label2: TLabel
Left = 901
Top = 99
Width = 65
Height = 12
Caption = #21496#26426#30005#35805#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label3: TLabel
Left = 777
Top = 154
Width = 65
Height = 12
Caption = #25910#36135#22320#22336#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label4: TLabel
Left = 463
Top = 15
Width = 52
Height = 12
Caption = #30003#35831#26085#26399
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CRType: TComboBox
Tag = 1
Left = 1030
Top = 119
Width = 144
Height = 20
Style = csDropDownList
ItemHeight = 12
ItemIndex = 0
TabOrder = 0
Text = #38144#21806#20986#24211
Visible = False
Items.Strings = (
#38144#21806#20986#24211
#21152#24037#20986#24211
#20854#20182#20986#24211
#24320#21457#26679#20986#24211)
end
object Note: TEdit
Tag = 1
Left = 98
Top = 94
Width = 784
Height = 18
TabOrder = 5
end
object SHDanWei: TBtnEditC
Tag = 1
Left = 961
Top = 68
Width = 138
Height = 20
Hint = 'FYName/'#36153#29992#21517#31216
TabOrder = 1
Visible = False
OnBtnUpClick = SHDanWeiBtnUpClick
OnBtnDnClick = SHDanWeiBtnDnClick
end
object FHTaiTou: TBtnEditC
Tag = 1
Left = 98
Top = 66
Width = 144
Height = 20
Hint = 'FHTaiTou/'#21457#36135#25260#22836
TabOrder = 3
OnBtnUpClick = FHTaiTouBtnUpClick
OnBtnDnClick = FHTaiTouBtnDnClick
end
object ranchang: TBtnEditC
Tag = 1
Left = 97
Top = 38
Width = 352
Height = 20
Hint = 'FHTaiTou/'#21457#36135#25260#22836
TabOrder = 2
OnBtnUpClick = ranchangBtnUpClick
OnBtnDnClick = ranchangBtnDnClick
end
object TruckId: TEdit
Tag = 1
Left = 1033
Top = 41
Width = 138
Height = 18
TabOrder = 4
Visible = False
end
object CustomerNoName: TBtnEditA
Tag = 1
Left = 98
Top = 11
Width = 144
Height = 20
ReadOnly = True
TabOrder = 6
OnBtnClick = CustomerNoNameBtnClick
end
object SQBatchNoHZ: TEdit
Tag = 1
Left = 818
Top = 40
Width = 144
Height = 18
TabOrder = 7
Visible = False
end
object SJPHONE: TEdit
Tag = 1
Left = 961
Top = 95
Width = 138
Height = 18
TabOrder = 8
Visible = False
end
object SHDZ: TBtnEditC
Tag = 1
Left = 841
Top = 150
Width = 352
Height = 20
Hint = 'FHTaiTou/'#21457#36135#25260#22836
TabOrder = 9
Visible = False
OnBtnUpClick = SHDZBtnUpClick
OnBtnDnClick = SHDZBtnDnClick
end
object shouhuotaitou: TBtnEditC
Tag = 1
Left = 313
Top = 12
Width = 138
Height = 20
Hint = 'FYName/'#36153#29992#21517#31216
TabOrder = 10
OnBtnUpClick = shouhuotaitouBtnUpClick
OnBtnDnClick = shouhuotaitouBtnDnClick
end
object SQDate: TDateTimePicker
Tag = 1
Left = 516
Top = 11
Width = 85
Height = 20
Date = 40675.464742650460000000
Format = 'yyyy-MM-dd'
Time = 40675.464742650460000000
TabOrder = 11
end
end
object ToolBar2: TToolBar
Left = 0
Top = 175
Width = 1203
Height = 33
Align = alBottom
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 ze: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 2
OnClick = zeClick
end
object ToolButton2: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 113
OnClick = ToolButton2Click
end
object ToolButton1: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 57
Visible = False
OnClick = ToolButton1Click
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 208
Width = 1203
Height = 388
Align = alBottom
TabOrder = 3
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
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 Tv1Column1: TcxGridDBColumn
Caption = #23458#25143#21697#21517
DataBinding.FieldName = 'FHKHPM'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = Tv1Column1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1PRTColor: TcxGridDBColumn
Caption = #30003#35831#21305#25968
DataBinding.FieldName = 'SQPS'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Header = DataLink_ShipmentRequest.Default
Width = 90
end
object v1Column3: TcxGridDBColumn
Caption = #30003#35831#25968#37327
DataBinding.FieldName = 'SQQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 78
end
object Tv1Column2: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'SQPRICE'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 71
end
object Tv1Column3: TcxGridDBColumn
Caption = #24635#20215
DataBinding.FieldName = 'SQMONEY'
HeaderAlignmentHorz = taCenter
Width = 76
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ADOTemp: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 200
Top = 65533
end
object ADOCmd: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
Parameters = <>
Left = 168
Top = 65533
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 1016
Top = 368
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 1000
Top = 352
end
object ADOQuery1: TADOQuery
Connection = DataLink_ShipmentRequest.ADOLink
Parameters = <>
Left = 136
Top = 65533
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 472
Top = 488
end
end