D7szChenfeng/合同管理(ContractManagement.dll)/U_JHFXLIST.dfm

878 lines
22 KiB
Plaintext
Raw Normal View History

2025-07-22 15:51:47 +08:00
object frmjhfxlist: Tfrmjhfxlist
Left = 201
Top = 51
Width = 1293
Height = 795
Caption = #35745#21010#20998#26512#34920
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 Label1: TLabel
Tag = 1
Left = 809
Top = 89
Width = 65
Height = 12
Caption = #35746#21333#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1285
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_ContractManagement.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBClose: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
Width = 1285
Height = 256
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label34: TLabel
Left = 50
Top = 18
Width = 68
Height = 16
Caption = #21512#21516#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 33
Top = 58
Width = 85
Height = 16
Caption = #20135#21697#21517#31216#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object ConNo: TEdit
Tag = 2
Left = 115
Top = 15
Width = 150
Height = 22
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object P_Name: TEdit
Tag = 2
Left = 115
Top = 55
Width = 150
Height = 22
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object GroupBox3: TGroupBox
Left = 328
Top = 16
Width = 265
Height = 217
Caption = #20179#24211'1'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -27
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
object Label3: TLabel
Left = 17
Top = 58
Width = 51
Height = 16
Caption = #20837#24211#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 17
Top = 93
Width = 51
Height = 16
Caption = #20986#24211#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 17
Top = 130
Width = 51
Height = 16
Caption = #24211#23384#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 129
Top = 58
Width = 17
Height = 16
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 129
Top = 130
Width = 17
Height = 16
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 129
Top = 94
Width = 17
Height = 16
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 217
Top = 58
Width = 17
Height = 16
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 217
Top = 130
Width = 17
Height = 16
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 217
Top = 94
Width = 17
Height = 16
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object RKPS: TEdit
Tag = 2
Left = 65
Top = 55
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object CKPS: TEdit
Tag = 2
Left = 65
Top = 91
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object KCPS: TEdit
Tag = 2
Left = 65
Top = 127
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
end
object RKQTY: TEdit
Tag = 2
Left = 153
Top = 55
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object CKQTY: TEdit
Tag = 2
Left = 153
Top = 91
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
end
object KCQTY: TEdit
Tag = 2
Left = 153
Top = 127
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
end
end
object GroupBox4: TGroupBox
Left = 608
Top = 16
Width = 265
Height = 217
Caption = #20179#24211'2'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -27
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
object Label12: TLabel
Left = 17
Top = 58
Width = 51
Height = 16
Caption = #20837#24211#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 17
Top = 93
Width = 51
Height = 16
Caption = #20986#24211#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 17
Top = 130
Width = 51
Height = 16
Caption = #24211#23384#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 129
Top = 58
Width = 17
Height = 16
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 129
Top = 130
Width = 17
Height = 16
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 129
Top = 94
Width = 17
Height = 16
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 217
Top = 58
Width = 17
Height = 16
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Left = 217
Top = 130
Width = 17
Height = 16
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 217
Top = 94
Width = 17
Height = 16
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object WFRKPS: TEdit
Tag = 2
Left = 65
Top = 55
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object WFCKPS: TEdit
Tag = 2
Left = 65
Top = 91
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object WFKCPS: TEdit
Tag = 2
Left = 65
Top = 127
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
end
object WFRKQTY: TEdit
Tag = 2
Left = 153
Top = 55
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object WFCKQTY: TEdit
Tag = 2
Left = 153
Top = 91
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
end
object WFKCQTY: TEdit
Tag = 2
Left = 153
Top = 127
Width = 60
Height = 22
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
end
end
end
object GroupBox1: TGroupBox
Left = 0
Top = 285
Width = 689
Height = 479
Align = alLeft
Caption = #36801#32463
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -27
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
object cxGrid1: TcxGrid
Left = 2
Top = 29
Width = 685
Height = 448
Align = alClient
TabOrder = 0
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
OnCustomDrawCell = Tv1CustomDrawCell
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
Column = v1Column4
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Content = DataLink_ContractManagement.Default
Styles.Inactive = DataLink_ContractManagement.SHuangSe
Styles.IncSearch = DataLink_ContractManagement.SHuangSe
Styles.Selection = DataLink_ContractManagement.SHuangSe
Styles.Header = DataLink_ContractManagement.Default
object v1Column11: TcxGridDBColumn
Caption = #26085#26399
DataBinding.FieldName = 'filltime'
PropertiesClassName = 'TcxDateEditProperties'
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 133
end
object v1Column10: TcxGridDBColumn
Caption = #26426#21488#21495
DataBinding.FieldName = 'APMachineNo'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Alignment.Horz = taCenter
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
Properties.OnButtonClick = v1Column10PropertiesButtonClick
Properties.OnEditValueChanged = v1Column10PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 77
end
object Tv1Column2: TcxGridDBColumn
Caption = #21345#21495
DataBinding.FieldName = 'edtKaNo'
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Column4: TcxGridDBColumn
Caption = #21305#39069
DataBinding.FieldName = 'c_pie'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 135
end
object Tv1Column1: TcxGridDBColumn
Caption = #26159#21542#19978#36724
DataBinding.FieldName = 'issz'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
HeaderAlignmentHorz = taCenter
Width = 75
end
object Tv1Column3: TcxGridDBColumn
Caption = #21152#24037#21378
DataBinding.FieldName = 'ToFactoryName'
HeaderAlignmentHorz = taCenter
Width = 76
end
object Tv1Column4: TcxGridDBColumn
Caption = #26102#38388
DataBinding.FieldName = 'wftime'
HeaderAlignmentHorz = taCenter
Width = 82
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
end
object GroupBox2: TGroupBox
Left = 689
Top = 285
Width = 596
Height = 479
Align = alClient
Caption = #19978#36724
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -27
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
object cxGrid2: TcxGrid
Left = 2
Top = 29
Width = 592
Height = 448
Align = alClient
TabOrder = 0
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
OnCustomDrawCell = TV2CustomDrawCell
DataController.DataSource = DataSource2
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
Column = cxGridDBColumn4
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Content = DataLink_ContractManagement.Default
Styles.Inactive = DataLink_ContractManagement.SHuangSe
Styles.IncSearch = DataLink_ContractManagement.SHuangSe
Styles.Selection = DataLink_ContractManagement.SHuangSe
Styles.Header = DataLink_ContractManagement.Default
object cxGridDBColumn2: TcxGridDBColumn
Caption = #26085#26399
DataBinding.FieldName = 'crtime'
PropertiesClassName = 'TcxDateEditProperties'
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 141
end
object TV2Column1: TcxGridDBColumn
Caption = #21345#21495
DataBinding.FieldName = 'edtKaNo'
HeaderAlignmentHorz = taCenter
Width = 69
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #26426#21488#21495
DataBinding.FieldName = 'jth'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = False
Properties.OnButtonClick = v1Column10PropertiesButtonClick
Properties.OnEditValueChanged = v1Column10PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 77
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #21305#39069
DataBinding.FieldName = 'c_pie'
HeaderAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 125
end
object TV2Column2: TcxGridDBColumn
Caption = #26159#21542#23436#25104
DataBinding.FieldName = 'iszx'
HeaderAlignmentHorz = taCenter
Width = 75
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV2
end
end
end
object ADOTemp: TADOQuery
Connection = DataLink_ContractManagement.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1000
Top = 181
end
object ADOCmd: TADOQuery
Connection = DataLink_ContractManagement.ADOLink
Parameters = <>
Left = 948
Top = 181
end
object DataSource1: TDataSource
DataSet = Order_Sub
Left = 568
Top = 440
end
object Order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 500
Top = 448
end
object CDS_Type: TClientDataSet
Aggregates = <>
Params = <>
Left = 320
Top = 436
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 944
Top = 136
end
object cxStyleRepository1: TcxStyleRepository
PixelsPerInch = 96
object cxStyle1: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
end
end
object order_Sz: TClientDataSet
Aggregates = <>
Params = <>
Left = 772
Top = 432
end
object DataSource2: TDataSource
DataSet = order_Sz
Left = 904
Top = 424
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 936
Top = 232
end
end