D7DJjunhao/检验管理/U_MJSJFX.dfm
DESKTOP-E401PHE\Administrator 41f7218fc4 ~
2025-04-30 19:46:56 +08:00

719 lines
19 KiB
Plaintext

object frmMJSJFX: TfrmMJSJFX
Left = 90
Top = 28
Width = 1726
Height = 817
Align = alClient
Caption = #24067#21305#31649#29702
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 15
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1708
Height = 30
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeManage.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBClose: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 30
Width = 1708
Height = 42
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
Visible = False
object Label1: TLabel
Left = 41
Top = 15
Width = 66
Height = 15
Caption = #35746' '#21333' '#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 41
Top = 60
Width = 9
Height = 15
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Ma: TLabel
Left = 380
Top = 110
Width = 8
Height = 15
Caption = 'M'
end
object Label7: TLabel
Left = 279
Top = 110
Width = 30
Height = 15
Caption = #21407#30721
end
object Label5: TLabel
Left = 385
Top = 145
Width = 8
Height = 15
Caption = 'M'
end
object Label8: TLabel
Left = 279
Top = 150
Width = 30
Height = 15
Caption = #24133#23485
end
object Label9: TLabel
Left = 395
Top = 140
Width = 16
Height = 15
Caption = 'cm'
end
object Label3: TLabel
Left = 414
Top = 125
Width = 30
Height = 15
Caption = #20811#37325
end
object Label11: TLabel
Left = 515
Top = 125
Width = 31
Height = 15
Caption = 'g/'#13217
end
object Label13: TLabel
Left = 549
Top = 150
Width = 30
Height = 15
Caption = #36192#36865
end
object OrderNo: TEdit
Left = 110
Top = 10
Width = 186
Height = 30
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnKeyPress = OrderNoKeyPress
end
object MJQty1: TEdit
Left = 310
Top = 105
Width = 68
Height = 23
TabOrder = 1
end
object MJFK: TEdit
Left = 310
Top = 145
Width = 68
Height = 23
TabOrder = 3
end
object MJSJKZ: TEdit
Left = 445
Top = 120
Width = 68
Height = 23
TabOrder = 2
end
object MJQty2: TEdit
Left = 580
Top = 145
Width = 68
Height = 23
TabOrder = 4
end
end
object Panel2: TPanel
Left = 0
Top = 72
Width = 1708
Height = 700
Align = alClient
Caption = 'Panel2'
TabOrder = 2
object Label4: TLabel
Left = 635
Top = 180
Width = 48
Height = 15
Caption = 'Label4'
end
object Panel4: TPanel
Left = 1
Top = 1
Width = 712
Height = 698
Align = alLeft
TabOrder = 0
object cxGrid3: TcxGrid
Left = 1
Top = 31
Width = 710
Height = 666
Align = alClient
TabOrder = 0
object TV3: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
Images = DataLink_TradeManage.ThreeImgList
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_TradeManage.TextSHuangSe
object cxGridDBColumn7: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'MjXH'
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn8: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'MJID'
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn9: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'SOrddefstr1'
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn10: TcxGridDBColumn
Caption = #20013#25991#39068#33394
DataBinding.FieldName = 'prtcolor'
HeaderAlignmentHorz = taCenter
Width = 74
end
object cxGridDBColumn11: TcxGridDBColumn
Caption = #23458#25143#35746#21333#21495
DataBinding.FieldName = 'khorderno'
HeaderAlignmentHorz = taCenter
Width = 77
end
object cxGridDBColumn12: TcxGridDBColumn
Caption = #25171#21367#26102#38388
DataBinding.FieldName = 'filltime'
HeaderAlignmentHorz = taCenter
Width = 76
end
object TV3Column1: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'MJLen'
HeaderAlignmentHorz = taCenter
Width = 70
end
object TV3Column2: TcxGridDBColumn
Caption = #20928#37325
DataBinding.FieldName = 'mjqty4'
HeaderAlignmentHorz = taCenter
Width = 65
end
object TV3Column3: TcxGridDBColumn
Caption = #27611#37325
DataBinding.FieldName = 'mjmaoz'
HeaderAlignmentHorz = taCenter
Width = 65
end
end
object cxGridLevel3: TcxGridLevel
GridView = TV3
end
end
object Panel5: TPanel
Left = 1
Top = 1
Width = 710
Height = 30
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #25552#20132#36807#24555#25968#25454
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
end
object Panel6: TPanel
Left = 713
Top = 1
Width = 994
Height = 698
Align = alClient
Caption = 'Panel6'
TabOrder = 1
object cxGrid1: TcxGrid
Left = 1
Top = 519
Width = 992
Height = 178
Align = alClient
TabOrder = 0
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource4
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
Styles.Header = DataLink_TradeManage.TextSHuangSe
object cxGridDBColumn1: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'mjxh'
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn2: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'mjid'
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #33394#21495
DataBinding.FieldName = 'SOrddefstr1'
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #20013#25991#39068#33394
DataBinding.FieldName = 'prtcolor'
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #23458#25143#35746#21333#21495
DataBinding.FieldName = 'khorderno'
HeaderAlignmentHorz = taCenter
Width = 87
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #21024#38500#26102#38388
DataBinding.FieldName = 'deltime'
HeaderAlignmentHorz = taCenter
Width = 65
end
object TV1Column1: TcxGridDBColumn
Caption = #21024#38500#20154
DataBinding.FieldName = 'deler'
HeaderAlignmentHorz = taCenter
Width = 65
end
object TV1Column2: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'mjlen'
HeaderAlignmentHorz = taCenter
Width = 65
end
object TV1Column3: TcxGridDBColumn
Caption = #20928#37325
DataBinding.FieldName = 'mjqty4'
HeaderAlignmentHorz = taCenter
Width = 65
end
object TV1Column4: TcxGridDBColumn
Caption = #27611#37325
DataBinding.FieldName = 'mjmaoz'
HeaderAlignmentHorz = taCenter
Width = 65
end
end
object cxGridLevel2: TcxGridLevel
GridView = TV1
end
end
object Panel7: TPanel
Left = 1
Top = 489
Width = 992
Height = 30
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #21024#38500#25968#25454
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object Panel9: TPanel
Left = 1
Top = 1
Width = 992
Height = 30
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #20462#25913#25968#25454
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object cxGrid4: TcxGrid
Left = 1
Top = 31
Width = 992
Height = 162
Align = alTop
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
object TV4: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource3
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
Styles.Header = DataLink_TradeManage.TextSHuangSe
object TV4Column1: TcxGridDBColumn
Caption = #25805#20316#20154
DataBinding.FieldName = 'Operor'
HeaderAlignmentHorz = taCenter
Width = 59
end
object TV4Column2: TcxGridDBColumn
Caption = #25805#20316#26102#38388
DataBinding.FieldName = 'OperTime'
HeaderAlignmentHorz = taCenter
Width = 141
end
object cxGridDBColumn19: TcxGridDBColumn
Caption = #35760#24405
DataBinding.FieldName = 'OPEvent'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taRightJustify
Width = 767
end
end
object cxGridLevel4: TcxGridLevel
GridView = TV4
end
end
object Panel8: TPanel
Left = 1
Top = 349
Width = 992
Height = 30
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #37325#25171#25968#25454
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
object cxGrid2: TcxGrid
Left = 1
Top = 379
Width = 992
Height = 110
Align = alTop
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
Styles.Header = DataLink_TradeManage.TextSHuangSe
object cxGridDBColumn13: TcxGridDBColumn
Caption = #25805#20316#20154
DataBinding.FieldName = 'Operor'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn14: TcxGridDBColumn
Caption = #25805#20316#26102#38388
DataBinding.FieldName = 'OperTime'
HeaderAlignmentHorz = taCenter
Width = 65
end
object cxGridDBColumn15: TcxGridDBColumn
Caption = #35760#24405
DataBinding.FieldName = 'OPEvent'
HeaderAlignmentHorz = taCenter
Width = 834
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV2
end
end
object Panel3: TPanel
Left = 1
Top = 193
Width = 992
Height = 30
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #36339#21495#25968#25454
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
object cxGrid5: TcxGrid
Left = 1
Top = 223
Width = 992
Height = 126
Align = alTop
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
object Tv5: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DataSource5
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
Styles.Header = DataLink_TradeManage.TextSHuangSe
object cxGridDBColumn20: TcxGridDBColumn
Caption = #25805#20316#20154
DataBinding.FieldName = 'Operor'
HeaderAlignmentHorz = taCenter
Width = 59
end
object cxGridDBColumn21: TcxGridDBColumn
Caption = #25805#20316#26102#38388
DataBinding.FieldName = 'OperTime'
HeaderAlignmentHorz = taCenter
Width = 141
end
object cxGridDBColumn22: TcxGridDBColumn
Caption = #35760#24405
DataBinding.FieldName = 'OPEvent'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taRightJustify
Width = 767
end
end
object cxGridLevel5: TcxGridLevel
GridView = Tv5
end
end
end
end
object ADOTmp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 832
Top = 72
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 312
Top = 200
end
object ADOCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 832
Top = 40
end
object DataSource1: TDataSource
DataSet = Order_YC
Left = 380
Top = 200
end
object Order_YC: TClientDataSet
Aggregates = <>
Params = <>
Left = 344
Top = 200
end
object Order_CD: TClientDataSet
Aggregates = <>
Params = <>
Left = 856
Top = 476
end
object DataSource2: TDataSource
DataSet = Order_CD
Left = 892
Top = 476
end
object Order_XG: TClientDataSet
Aggregates = <>
Params = <>
Left = 692
Top = 464
end
object DataSource3: TDataSource
DataSet = Order_XG
Left = 720
Top = 464
end
object DataSource4: TDataSource
DataSet = Order_Del
Left = 864
Top = 180
end
object Order_Del: TClientDataSet
Aggregates = <>
Params = <>
Left = 828
Top = 180
end
object Order_TH: TClientDataSet
Aggregates = <>
Params = <>
Left = 1312
Top = 364
end
object DataSource5: TDataSource
DataSet = Order_TH
Left = 1348
Top = 364
end
end