D7myYunxiang/云翔一码通/U_YMTFHSQInPut.dfm

467 lines
12 KiB
Plaintext
Raw Normal View History

2025-07-30 15:56:27 +08:00
object frmFHSQInPut: TfrmFHSQInPut
2025-09-20 10:39:47 +08:00
Left = 354
2025-09-29 09:29:56 +08:00
Top = 296
Width = 1499
2025-07-30 15:56:27 +08:00
Height = 664
Caption = #21457#36135#30003#35831#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -15
2025-07-30 15:56:27 +08:00
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
2025-09-29 09:29:56 +08:00
PixelsPerInch = 120
TextHeight = 15
2025-07-30 15:56:27 +08:00
object ToolBar1: TToolBar
Left = 0
Top = 0
2025-09-29 09:29:56 +08:00
Width = 1491
2025-07-30 15:56:27 +08:00
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
2025-09-29 09:29:56 +08:00
Width = 1491
Height = 139
2025-07-30 15:56:27 +08:00
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label1: TLabel
Tag = 1
2025-09-29 09:29:56 +08:00
Left = 41
Top = 15
Width = 115
Height = 22
2025-07-30 15:56:27 +08:00
Caption = #20986#24211#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Tag = 1
2025-09-29 09:29:56 +08:00
Left = 49
Top = 98
Width = 105
Height = 22
2025-07-30 15:56:27 +08:00
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Tag = 1
2025-09-29 09:29:56 +08:00
Left = 475
Top = 15
Width = 115
Height = 22
2025-07-30 15:56:27 +08:00
Caption = #25910#36135#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Tag = 1
2025-09-29 09:29:56 +08:00
Left = 475
Top = 54
Width = 115
Height = 22
2025-07-30 15:56:27 +08:00
Caption = #30003#35831#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Tag = 1
2025-09-29 09:29:56 +08:00
Left = 64
Top = 54
Width = 92
Height = 22
2025-07-30 15:56:27 +08:00
Caption = #19994#21153#21592#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
2025-09-20 10:39:47 +08:00
object Label3: TLabel
Tag = 1
2025-09-29 09:29:56 +08:00
Left = 1061
Top = 15
Width = 92
Height = 22
2025-09-20 10:39:47 +08:00
Caption = #21152#24037#31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-09-20 10:39:47 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
2025-07-30 15:56:27 +08:00
object CRType: TComboBox
Tag = 1
2025-09-29 09:29:56 +08:00
Left = 144
Top = 10
Width = 312
Height = 30
2025-07-30 15:56:27 +08:00
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
2025-09-29 09:29:56 +08:00
ItemHeight = 22
2025-07-30 15:56:27 +08:00
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
2025-09-29 09:29:56 +08:00
Left = 144
Top = 94
Width = 892
2025-07-30 15:56:27 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
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
2025-09-29 09:29:56 +08:00
Left = 569
Top = 9
Width = 466
2025-07-30 15:56:27 +08:00
Height = 26
Hint = 'KHNo'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
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
2025-09-29 09:29:56 +08:00
Left = 569
Top = 49
Width = 162
Height = 30
2025-07-30 15:56:27 +08:00
BevelInner = bvNone
Date = 43473.670856296290000000
Format = 'yyyy-MM-dd'
Time = 43473.670856296290000000
Checked = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
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
2025-09-29 09:29:56 +08:00
Left = 144
Top = 48
Width = 169
2025-07-30 15:56:27 +08:00
Height = 26
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-07-30 15:56:27 +08:00
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
2025-09-20 10:39:47 +08:00
object JGType: TEdit
Tag = 1
2025-09-29 09:29:56 +08:00
Left = 1164
Top = 10
Width = 150
2025-09-20 10:39:47 +08:00
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-09-29 09:29:56 +08:00
Font.Height = -22
2025-09-20 10:39:47 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 5
end
2025-07-30 15:56:27 +08:00
end
object ToolBar2: TToolBar
Left = 0
2025-09-29 09:29:56 +08:00
Top = 168
Width = 1491
2025-07-30 15:56:27 +08:00
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
2025-09-29 09:29:56 +08:00
Top = 197
Width = 1491
Height = 430
2025-07-30 15:56:27 +08:00
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