D7myYunxiang/云翔一码通/U_YMTFHSQInPut.dfm
DESKTOP-E401PHE\Administrator 672bf06813 子表增行,打印标签
2025-08-12 16:22:08 +08:00

438 lines
11 KiB
Plaintext

object frmFHSQInPut: TfrmFHSQInPut
Left = 615
Top = 422
Width = 1113
Height = 664
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 = 1105
Height = 29
ButtonHeight = 30
ButtonWidth = 75
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_YXYMT.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 = 79
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
Width = 1105
Height = 111
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label1: TLabel
Tag = 1
Left = 33
Top = 12
Width = 90
Height = 17
Caption = #20986#24211#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Tag = 1
Left = 39
Top = 78
Width = 84
Height = 17
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Tag = 1
Left = 380
Top = 12
Width = 90
Height = 17
Caption = #25910#36135#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Tag = 1
Left = 380
Top = 43
Width = 90
Height = 17
Caption = #30003#35831#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Tag = 1
Left = 51
Top = 43
Width = 72
Height = 17
Caption = #19994#21153#21592#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CRType: TComboBox
Tag = 1
Left = 115
Top = 8
Width = 250
Height = 25
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ItemHeight = 17
ParentFont = False
TabOrder = 0
Items.Strings = (
#38144#21806#20869#38144
#21152#24037#20869#38144
#38144#21806#22806#38144
#21152#24037#22806#38144
#21152#24037#20986#24211
#20854#20182#20986#24211)
end
object Note: TEdit
Tag = 1
Left = 115
Top = 75
Width = 714
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 4
end
object SHDanWei: TBtnEditC
Tag = 1
Left = 455
Top = 7
Width = 373
Height = 26
Hint = 'KHNo'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 1
OnBtnUpClick = SHDanWeiBtnUpClick
OnBtnDnClick = SHDanWeiBtnDnClick
end
object SQDate: TDateTimePicker
Tag = 1
Left = 455
Top = 39
Width = 130
Height = 25
BevelInner = bvNone
Date = 43473.670856296290000000
Format = 'yyyy-MM-dd'
Time = 43473.670856296290000000
Checked = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 2
end
object Salesman: TBtnEditC
Tag = 1
Left = 115
Top = 38
Width = 135
Height = 26
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 3
OnBtnUpClick = SalesmanBtnUpClick
OnBtnDnClick = SalesmanBtnDnClick
end
end
object ToolBar2: TToolBar
Left = 0
Top = 140
Width = 1105
Height = 29
ButtonHeight = 30
ButtonWidth = 95
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_YXYMT.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 2
object ToolButton3: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #35745#21010#21333
ImageIndex = 57
OnClick = ToolButton3Click
end
object ToolButton2: TToolButton
Left = 99
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 113
OnClick = ToolButton2Click
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 169
Width = 1105
Height = 464
Align = alClient
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
item
Kind = skSum
Column = v1PRTColor
end
item
Kind = skSum
Column = v1Column5
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Content = DataLink_YXYMT.Default
Styles.Inactive = DataLink_YXYMT.SHuangSe
Styles.IncSearch = DataLink_YXYMT.SHuangSe
Styles.Selection = DataLink_YXYMT.SHuangSe
Styles.Header = DataLink_YXYMT.Default
object v1Column14: TcxGridDBColumn
Caption = #35745#21010#21333#21495
DataBinding.FieldName = 'SCConNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 130
end
object v1Column6: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'MXPrtName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 110
end
object v1Column1: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'MXPrtColor'
HeaderAlignmentHorz = taCenter
Width = 95
end
object v1Column2: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'MXPrtHX'
HeaderAlignmentHorz = taCenter
Width = 81
end
object v1PRTColor: TcxGridDBColumn
Caption = #30003#35831#21305#25968
DataBinding.FieldName = 'SQPS'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Header = DataLink_YXYMT.Default
Width = 115
end
object v1Column4: TcxGridDBColumn
Caption = #30003#35831#25968#37327'(M)'
DataBinding.FieldName = 'SQQtyM'
Width = 125
end
object v1Column3: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'CPType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 79
end
object v1Column10: TcxGridDBColumn
Caption = #36153#29992#21517#31216
DataBinding.FieldName = 'FeeName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v1Column10PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 107
end
object v1Column5: TcxGridDBColumn
Caption = #36153#29992#37329#39069
DataBinding.FieldName = 'FeeMoney'
HeaderAlignmentHorz = taCenter
Width = 106
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ADOTemp: TADOQuery
Connection = DataLink_YXYMT.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 200
Top = 65533
end
object ADOCmd: TADOQuery
Connection = DataLink_YXYMT.ADOLink
Parameters = <>
Left = 168
Top = 65533
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 768
Top = 392
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 728
Top = 392
end
object ADOQuery1: TADOQuery
Connection = DataLink_YXYMT.ADOLink
Parameters = <>
Left = 136
Top = 65533
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 688
Top = 392
end
end