D10SZKaiXiYa/B01基础合同管理/U_TatSCTLLIST.dfm
2025-11-12 17:32:44 +08:00

782 lines
23 KiB
Plaintext

inherited frmSCTLLIST: TfrmSCTLLIST
Left = 154
Top = 76
Caption = #29983#20135#25237#26009#35745#31639#34920
ClientHeight = 649
ClientWidth = 1540
Font.Height = -16
Position = poScreenCenter
ExplicitWidth = 1556
ExplicitHeight = 688
PixelsPerInch = 96
TextHeight = 21
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1540
Height = 30
AutoSize = True
ButtonHeight = 30
ButtonWidth = 83
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_Contract.cxImageList_bar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_Contract.cxImageList_bar
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 2
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TBRafreshClick
end
object ToolButton5: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 0
OnClick = ToolButton5Click
end
object ToolButton2: TToolButton
Left = 126
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object Panel1: TPanel [1]
Left = 0
Top = 30
Width = 1540
Height = 91
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 3
object Label9: TLabel
Left = 36
Top = 6
Width = 64
Height = 21
Caption = #19979#21333#26085#26399
Color = clWhite
ParentColor = False
end
object Label1: TLabel
Left = 252
Top = 11
Width = 48
Height = 21
Caption = #21512#21516#21495
Color = clWhite
ParentColor = False
end
object Label4: TLabel
Left = 252
Top = 50
Width = 64
Height = 21
Caption = #22383#24067#32534#21495
Color = clWhite
ParentColor = False
end
object EndDate: TcxDateEdit
Left = 111
Top = 44
TabOrder = 0
Width = 121
end
object BegDate: TcxDateEdit
Left = 111
Top = 5
TabOrder = 1
Width = 121
end
object ConNo: TcxTextEdit
Tag = 2
Left = 321
Top = 5
Properties.OnChange = ConNoPropertiesChange
TabOrder = 2
Width = 121
end
object C_CODE: TcxTextEdit
Tag = 2
Left = 321
Top = 44
Properties.OnChange = ConNoPropertiesChange
TabOrder = 3
Width = 121
end
end
inherited loadProcess: TPanel
Left = 671
Top = 285
ExplicitLeft = 671
ExplicitTop = 285
end
inherited cxProgressBar2: TcxProgressBar
Left = 663
Top = 321
ExplicitLeft = 663
ExplicitTop = 321
ExplicitHeight = 29
end
object cxGrid1: TcxGrid [4]
Left = 0
Top = 121
Width = 1540
Height = 317
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 4
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
OnFocusedRecordChanged = Tv1FocusedRecordChanged
DataController.DataSource = DS_1
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skCount
end
item
Kind = skCount
end
item
Kind = skCount
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object v3Column8: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 52
end
object Tv1Column1: TcxGridDBColumn
Caption = #38754#26009#21512#21516#21495
DataBinding.FieldName = 'MlConno'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 135
end
object v3Column1: TcxGridDBColumn
Caption = #38754#26009#25968#37327
DataBinding.FieldName = 'mlqty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 104
end
object Tv1Column9: TcxGridDBColumn
Caption = #25237#22383#31995#25968
DataBinding.FieldName = 'tpxs'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 104
end
object v3Column6: TcxGridDBColumn
Caption = #22383#24067#21512#21516#21495
DataBinding.FieldName = 'CONNO'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Width = 97
end
object Tv1Column10: TcxGridDBColumn
Caption = #22383#24067#32534#21495
DataBinding.FieldName = 'C_CODE'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object v3Column16: TcxGridDBColumn
Caption = #25237#22383#25968#37327
DataBinding.FieldName = 'Conqty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 84
end
object Tv1Column5: TcxGridDBColumn
Caption = #25237#32433#31995#25968
DataBinding.FieldName = 'tsxs'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 95
end
object Tv1Column4: TcxGridDBColumn
Caption = #32463#32433#24635#38271#24230
DataBinding.FieldName = 'zsqty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object Tv1GKBH: TcxGridDBColumn
Caption = #38050#31576#32534#21495
DataBinding.FieldName = 'GKBH'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 107
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv1
end
end
object cxPageControl3: TcxPageControl [5]
Left = 0
Top = 438
Width = 1540
Height = 211
Align = alBottom
TabOrder = 5
Properties.ActivePage = cxTabSheet2
Properties.CustomButtons.Buttons = <>
Properties.Style = 9
ClientRectBottom = 211
ClientRectRight = 1540
ClientRectTop = 28
object cxTabSheet1: TcxTabSheet
Caption = #32463#19997#32452#21512
ImageIndex = 0
object GroupBox1: TGroupBox
Left = 931
Top = 0
Width = 609
Height = 183
Align = alRight
Caption = #32463#25490#21015
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -29
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
Visible = False
object Y_Note_PLJ: TMemo
Tag = 2
Left = 2
Top = 31
Width = 605
Height = 150
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 931
Height = 183
Align = alClient
TabOrder = 1
object cxPageControl2: TcxPageControl
Left = 1
Top = 1
Width = 929
Height = 181
Align = alClient
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = []
ParentBackground = False
ParentColor = False
ParentFont = False
TabOrder = 0
Visible = False
Properties.CustomButtons.Buttons = <>
Properties.Style = 6
ClientRectBottom = 181
ClientRectRight = 929
ClientRectTop = 0
end
object cxGrid2: TcxGrid
Left = 1
Top = 1
Width = 929
Height = 181
Align = alClient
TabOrder = 1
object cxGridDBTableView1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_2
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'C_Code'
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = TV1Column8
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object TV1Column7: TcxGridDBColumn
Caption = #34892#21495
DataBinding.FieldName = 'RowNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'Y_Code'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
Width = 100
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'Y_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Moving = False
Options.Sorting = False
Width = 100
end
object TV1Column13: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'Y_Spec'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
object cxGridDBColumn8: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'Y_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 100
end
object TV1Column6: TcxGridDBColumn
Caption = #20998#29305'(Dtex)'
DataBinding.FieldName = 'TestDenier'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 96
end
object TV1Column14: TcxGridDBColumn
Caption = #25903#25968
DataBinding.FieldName = 'Z_Number'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 71
end
object cxGridDBColumn1: TcxGridDBColumn
Caption = #26681#25968
DataBinding.FieldName = 'YarnQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object TV1Column2: TcxGridDBColumn
Caption = #24490#29615#26681#25968
DataBinding.FieldName = 'CycleYarnQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object cxGridDBColumn2: TcxGridDBColumn
Caption = #20840#24133#26681#25968
DataBinding.FieldName = 'QFYARNQTY'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object TV1Column8: TcxGridDBColumn
Caption = #30334#31859#32463#38271#37325#37327'KG'
DataBinding.FieldName = 'MeterQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 163
end
object TV1Column11: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'NOTE'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 100
end
end
object cxGridLevel1: TcxGridLevel
GridView = cxGridDBTableView1
end
end
end
end
object cxTabSheet2: TcxTabSheet
Caption = #32428#19997#32452#21512
ImageIndex = 1
object GroupBox2: TGroupBox
Left = 863
Top = 0
Width = 677
Height = 183
Align = alRight
Caption = #32428#25490#21015
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -29
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
Visible = False
object Y_Note_PLW: TMemo
Tag = 2
Left = 2
Top = 31
Width = 673
Height = 150
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
end
object Panel3: TPanel
Left = 0
Top = 0
Width = 863
Height = 183
Align = alClient
TabOrder = 1
object cxPageControl1: TcxPageControl
Left = 1
Top = 1
Width = 861
Height = 181
Align = alClient
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = []
ParentBackground = False
ParentColor = False
ParentFont = False
TabOrder = 0
Visible = False
Properties.CustomButtons.Buttons = <>
Properties.Style = 6
ClientRectBottom = 181
ClientRectRight = 861
ClientRectTop = 0
end
object cxGrid3: TcxGrid
Left = 1
Top = 1
Width = 861
Height = 181
Align = alClient
TabOrder = 1
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_3
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Format = 'C_Code'
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = Tv2Column8
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object Tv2Column7: TcxGridDBColumn
Caption = #34892#21495
DataBinding.FieldName = 'RowNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object v2Column10: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'Y_Code'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
Width = 100
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'Y_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Moving = False
Options.Sorting = False
Width = 100
end
object Tv2Column13: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'Y_Spec'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
object v2Column6: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'Y_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 100
end
object Tv2Column6: TcxGridDBColumn
Caption = #20998#29305'(Dtex)'
DataBinding.FieldName = 'TestDenier'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 91
end
object Tv2Column14: TcxGridDBColumn
Caption = #25903#25968
DataBinding.FieldName = 'Z_Number'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 88
end
object Tv2Column1: TcxGridDBColumn
Caption = #26681#25968
DataBinding.FieldName = 'YarnQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv2Column2: TcxGridDBColumn
Caption = #24490#29615#26681#25968
DataBinding.FieldName = 'CycleYarnQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv2Column11: TcxGridDBColumn
Caption = #25439#32791
DataBinding.FieldName = 'Y_Loss'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv2Column8: TcxGridDBColumn
Caption = #32433#32447#24635#29992#37327'KG'
DataBinding.FieldName = 'allYarn'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 151
end
object Tv2Column12: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'note'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
end
object cxGridLevel3: TcxGridLevel
GridView = Tv2
end
end
end
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_Contract.ADOLink
Left = 81
Top = 272
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_Contract.ADOLink
Left = 81
Top = 209
end
object GPM_1: TcxGridPopupMenu
PopupMenus = <>
Left = 296
Top = 368
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_Contract.ADOLink
Parameters = <>
Left = 720
Top = 208
end
object ADOQueryMain: TADOQuery
Connection = DataLink_Contract.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 560
Top = 200
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_Contract.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 352
Top = 192
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_Contract.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 472
Top = 200
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 520
Top = 364
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 472
Top = 364
end
object PopupMenu1: TPopupMenu
Left = 368
Top = 272
object N1: TMenuItem
Caption = #20840#36873
OnClick = N1Click
end
object N2: TMenuItem
Caption = #20840#24323
OnClick = N2Click
end
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
Left = 472
Top = 444
end
object DS_2: TDataSource
DataSet = CDS_2
Left = 520
Top = 444
end
object GPM_2: TcxGridPopupMenu
PopupMenus = <>
Left = 296
Top = 448
end
object CDS_3: TClientDataSet
Aggregates = <>
Params = <>
Left = 632
Top = 376
end
object DS_3: TDataSource
DataSet = CDS_3
Left = 712
Top = 384
end
end