D7snShanfengT/山峰贸易管理/U_ClothContractInPutSXMX.dfm

946 lines
24 KiB
Plaintext
Raw Permalink Normal View History

2026-02-26 09:41:35 +08:00
object frmClothContractInPutSXMX: TfrmClothContractInPutSXMX
Left = 191
Top = 135
Width = 1275
Height = 700
Align = alClient
Caption = #37319#36141'/'#21152#24037#21512#21516#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
WindowState = wsMaximized
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object cxGrid1: TcxGrid
Left = 0
Top = 508
Width = 1259
Height = 152
Align = alClient
TabOrder = 3
object Tv1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'C_Code'
Column = v1Column1
end
item
Format = '0'
Position = spFooter
Column = v1Price
end
item
Format = '0'
Position = spFooter
Column = v1ClothUnit
end
item
Format = '0'
Position = spFooter
Column = v1Column5
end
item
Format = '0'
Position = spFooter
Column = v1Column6
end
item
Format = '0'
Position = spFooter
Column = v1Column7
end>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.GroupByBox = False
object v1Column1: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'C_CodeName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Width = 98
end
object v1PRTSpec: TcxGridDBColumn
Caption = #35268#26684#22411#21495
DataBinding.FieldName = 'C_Spec'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1PRTSpecPropertiesButtonClick
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 86
end
object v1Column6: TcxGridDBColumn
Caption = #38376#24133'(CM)'
DataBinding.FieldName = 'MFQty'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1Column6PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 75
end
object v1Column7: TcxGridDBColumn
Caption = #20811#37325'(GSM)'
DataBinding.FieldName = 'KZQty'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1Column7PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 81
end
object v1C_Color: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1C_ColorPropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 69
end
object v1C_SeNo: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'C_SeNo'
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1MaChi: TcxGridDBColumn
Caption = #30721#23610
DataBinding.FieldName = 'MaChi'
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Price: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'Price'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1ClothUnitPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 62
end
object v1IFHS: TcxGridDBColumn
Caption = #26159#21542#21547#31246
DataBinding.FieldName = 'IFHS'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#26159
#21542
'')
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column5: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'PS'
HeaderAlignmentHorz = taCenter
Width = 55
end
object v1ClothUnit: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'C_Qty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1ClothUnitPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column2: TcxGridDBColumn
Caption = #25968#37327#21333#20301
DataBinding.FieldName = 'C_Unit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.ImmediatePost = True
Properties.Items.Strings = (
'Kg'
'M'
'Y')
HeaderAlignmentHorz = taCenter
Width = 86
end
object v1PBMoney: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'PBMoney'
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column9: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'C_Note'
HeaderAlignmentHorz = taCenter
Width = 95
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1259
Height = 29
ButtonHeight = 18
ButtonWidth = 36
Caption = 'ToolBar1'
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
List = True
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 = 40
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
Width = 1259
Height = 283
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
Ctl3D = False
ParentCtl3D = False
TabOrder = 1
object Label1: TLabel
Left = 361
Top = 15
Width = 72
Height = 13
Caption = #35746' '#21333' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 361
Top = 44
Width = 70
Height = 13
Caption = #20132#36135#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 700
Top = 44
Width = 72
Height = 13
Caption = #20379' '#24212' '#21830#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 39
Top = 44
Width = 70
Height = 13
Caption = #31614#35746#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 700
Top = 15
Width = 70
Height = 13
Caption = #25105#21496#25260#22836#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 39
Top = 189
Width = 74
Height = 13
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnDblClick = Label13DblClick
end
object Label14: TLabel
Left = 615
Top = 436
Width = 70
Height = 13
Caption = #21512#21516#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label7: TLabel
Left = 39
Top = 15
Width = 84
Height = 13
Caption = #22383#24067#21512#21516#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = -9
Top = 434
Width = 70
Height = 13
Caption = #32467#31639#35828#26126#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label12: TLabel
Left = -9
Top = 476
Width = 70
Height = 13
Caption = #20135#21697#36136#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label6: TLabel
Left = -9
Top = 517
Width = 70
Height = 13
Caption = #25968#37327#35828#26126#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label8: TLabel
Left = -9
Top = 558
Width = 70
Height = 13
Caption = #20184#27454#26041#24335#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label9: TLabel
Left = 39
Top = 72
Width = 70
Height = 13
Caption = #35746#21333#20132#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 39
Top = 96
Width = 70
Height = 13
Caption = #38468#21152#26465#27454#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnDblClick = Label13DblClick
end
object Label15: TLabel
Left = 700
Top = 72
Width = 70
Height = 13
Caption = #30003#35831#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 360
Top = 72
Width = 70
Height = 13
Caption = #21152#24037#24037#24207#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object DLYDate: TDateTimePicker
Left = 428
Top = 40
Width = 220
Height = 21
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 0
end
object QDTime: TDateTimePicker
Left = 106
Top = 40
Width = 203
Height = 21
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 1
end
object FactoryNoName: TBtnEditA
Left = 767
Top = 40
Width = 200
Height = 21
Hint = 'FactoryNo'
ReadOnly = True
TabOrder = 2
end
object CompanyName: TBtnEditA
Left = 767
Top = 11
Width = 200
Height = 21
ReadOnly = True
TabOrder = 3
OnBtnClick = CompanyNameBtnClick
end
object ConTypeOther: TComboBox
Left = 680
Top = 431
Width = 247
Height = 21
DropDownCount = 20
ItemHeight = 13
TabOrder = 4
Text = #22383#24067#21512#21516
Visible = False
Items.Strings = (
#22383#24067#21512#21516)
end
object CGNo: TEdit
Left = 115
Top = 12
Width = 193
Height = 19
CharCase = ecUpperCase
TabOrder = 5
end
object JieSuanNote: TBtnEditA
Left = 59
Top = 431
Width = 546
Height = 21
TabOrder = 6
Visible = False
OnBtnClick = JieSuanNoteBtnClick
end
object PRTZhiLiang: TBtnEditA
Left = 59
Top = 472
Width = 546
Height = 21
TabOrder = 7
Visible = False
OnBtnClick = PRTZhiLiangBtnClick
end
object QtyNote: TBtnEditA
Left = 59
Top = 514
Width = 546
Height = 21
TabOrder = 8
Visible = False
OnBtnClick = QtyNoteBtnClick
end
object PayMent: TBtnEditA
Left = 59
Top = 555
Width = 546
Height = 21
TabOrder = 9
Visible = False
OnBtnClick = PayMentBtnClick
end
object DDDate: TDateTimePicker
Left = 106
Top = 68
Width = 203
Height = 21
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 10
end
object ConNO: TBtnEditA
Left = 428
Top = 11
Width = 217
Height = 21
ReadOnly = True
TabOrder = 11
end
object Note: TMemo
Left = 106
Top = 190
Width = 863
Height = 85
ScrollBars = ssVertical
TabOrder = 12
end
object FJNote: TMemo
Left = 106
Top = 95
Width = 863
Height = 89
ScrollBars = ssVertical
TabOrder = 13
OnDblClick = FJNoteDblClick
end
object SQType: TComboBox
Left = 767
Top = 68
Width = 202
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 14
Items.Strings = (
#37319#36141
#21152#24037)
end
object JGGX: TBtnEditA
Left = 427
Top = 68
Width = 219
Height = 21
ReadOnly = True
TabOrder = 15
OnBtnClick = JGGXBtnClick
end
end
object ToolBar2: TToolBar
Left = 0
Top = 479
Width = 1259
Height = 29
ButtonHeight = 18
ButtonWidth = 36
Caption = 'ToolBar1'
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
List = True
ParentFont = False
ShowCaptions = True
TabOrder = 2
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 12
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 40
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 13
OnClick = ToolButton2Click
end
end
object Panel1: TPanel
Left = 0
Top = 312
Width = 1259
Height = 167
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 4
object cxGrid2: TcxGrid
Left = 2
Top = 2
Width = 437
Height = 163
Align = alLeft
TabOrder = 0
object Tv2: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnFocusedRecordChanged = Tv2FocusedRecordChanged
DataController.DataSource = DataSource3
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
object TV2PSXH: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'PSXH'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
SortIndex = 0
SortOrder = soAscending
Width = 55
end
object TV2PSName: TcxGridDBColumn
Caption = #24037#24207#21517#31216
DataBinding.FieldName = 'PSName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 72
end
object v2PSSH: TcxGridDBColumn
Caption = #39044#35745#25439#32791'%'
DataBinding.FieldName = 'PSSH'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 76
end
object TV2PSNote: TcxGridDBColumn
Caption = #27880#24847#20107#39033'/'#21697#36136#35828#26126
DataBinding.FieldName = 'PSNote'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 185
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv2
end
end
object cxGrid3: TcxGrid
Left = 447
Top = 2
Width = 810
Height = 163
Align = alClient
TabOrder = 1
object Tv3: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource4
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
object cxGridDBColumn3: TcxGridDBColumn
Caption = #20379#24212#21830
DataBinding.FieldName = 'FactoryName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 85
end
object v3Column1: TcxGridDBColumn
Caption = #36319#21333#21592
DataBinding.FieldName = 'PFGenDanPerson'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
Width = 78
end
object v3Column8: TcxGridDBColumn
Caption = #23433#25490#26085#26399
DataBinding.FieldName = 'PFDate'
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Width = 58
end
object Tv3Column1: TcxGridDBColumn
Caption = #20132#36135#26085#26399
DataBinding.FieldName = 'PFDlyDate'
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 58
end
object v3Column2: TcxGridDBColumn
Caption = #23433#25490#21305#25968
DataBinding.FieldName = 'PFTPPS'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 58
end
object v3Column3: TcxGridDBColumn
Caption = #23433#25490#25968#37327
DataBinding.FieldName = 'PFTPQty'
HeaderAlignmentHorz = taCenter
Width = 58
end
object v3Column5: TcxGridDBColumn
Caption = #23433#25490#25968#37327#21333#20301
DataBinding.FieldName = 'PFTPUnit'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
'M'
'Y'
'Kg')
HeaderAlignmentHorz = taCenter
Width = 84
end
object v3Column6: TcxGridDBColumn
Caption = #33457#22411#21495
DataBinding.FieldName = 'PRTHX'
HeaderAlignmentHorz = taCenter
Width = 78
end
object v3Column7: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'PRTColor'
HeaderAlignmentHorz = taCenter
Width = 68
end
object v3TOGYSName: TcxGridDBColumn
Caption = #21435#21521
DataBinding.FieldName = 'TOGYSName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
FooterAlignmentHorz = taRightJustify
HeaderAlignmentHorz = taCenter
Width = 70
end
object v3Column4: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'PFNote'
HeaderAlignmentHorz = taCenter
Width = 101
end
end
object cxGridLevel3: TcxGridLevel
GridView = Tv3
end
end
object cxSplitter1: TcxSplitter
Left = 439
Top = 2
Width = 8
Height = 163
HotZoneClassName = 'TcxMediaPlayer9Style'
Control = cxGrid2
end
end
object ADOTemp: TADOQuery
LockType = ltReadOnly
Parameters = <>
Left = 600
Top = 5
end
object ADOCmd: TADOQuery
Parameters = <>
Left = 520
Top = 5
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 356
Top = 459
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 388
Top = 454
end
object DataSource2: TDataSource
DataSet = ADOZDY
Left = 240
end
object ADOZDY: TADOQuery
LockType = ltReadOnly
Parameters = <>
Left = 287
Top = 3
end
object CDS_ZDY: TClientDataSet
Aggregates = <>
Params = <>
Left = 208
end
object ADOQuery1: TADOQuery
Parameters = <>
Left = 560
Top = 5
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 848
Top = 400
end
object Order_GX: TClientDataSet
Aggregates = <>
Params = <>
Left = 201
Top = 364
end
object DataSource3: TDataSource
DataSet = Order_GX
Left = 154
Top = 369
end
object DataSource4: TDataSource
DataSet = CDS_JGC
Left = 788
Top = 399
end
object CDS_JGC: TClientDataSet
Aggregates = <>
Params = <>
Left = 885
Top = 324
end
end