D10sxYilanbuyi/F04染色刷卡/U_MachTaskList.dfm

510 lines
14 KiB
Plaintext
Raw Normal View History

2025-09-11 16:06:40 +08:00
object frmMachTaskList: TfrmMachTaskList
Left = 0
Top = 0
Caption = #25195#25551#25490#32568
2025-09-30 17:22:54 +08:00
ClientHeight = 836
ClientWidth = 1540
2025-09-11 16:06:40 +08:00
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #24494#36719#38597#40657
Font.Style = []
OldCreateOrder = False
WindowState = wsMaximized
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 21
2025-09-30 17:22:54 +08:00
object Splitter1: TSplitter
Left = 846
Top = 97
Height = 739
Align = alRight
ExplicitLeft = 688
ExplicitTop = 296
ExplicitHeight = 100
end
2025-09-11 16:06:40 +08:00
object cxGrid1: TcxGrid
Left = 0
2025-09-30 17:22:54 +08:00
Top = 97
Width = 846
Height = 739
2025-09-11 16:06:40 +08:00
Align = alClient
Images = DataLink_DyeProcess.ThreeImgList
TabOrder = 0
2025-09-30 17:22:54 +08:00
ExplicitLeft = 8
ExplicitTop = 91
object Tv1: TcxGridDBTableView
2025-09-11 16:06:40 +08:00
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
2025-09-30 17:22:54 +08:00
DataController.DataSource = DS_1
2025-09-11 16:06:40 +08:00
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
2025-09-30 17:22:54 +08:00
Column = Tv1taskQty
2025-09-11 16:06:40 +08:00
end
item
Kind = skSum
2025-09-30 17:22:54 +08:00
Column = Tv1taskRollNum
2025-09-11 16:06:40 +08:00
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsCustomize.ColumnGrouping = False
OptionsCustomize.ColumnSorting = False
OptionsData.Deleting = False
OptionsData.Inserting = False
OptionsView.ShowEditButtons = gsebForFocusedRecord
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.HeaderHeight = 30
2025-09-30 17:22:54 +08:00
object Tv1OrderNo: TcxGridDBColumn
2025-09-11 16:06:40 +08:00
Caption = #35745#21010#21333
DataBinding.FieldName = 'OrderNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Options.Editing = False
Width = 59
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1pcid: TcxGridDBColumn
Caption = #27969#31243#21345#21495
DataBinding.FieldName = 'pcid'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Options.Editing = False
Width = 92
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1C_name: TcxGridDBColumn
Caption = #25104#21697#21517#31216
DataBinding.FieldName = 'C_name'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Options.Editing = False
Width = 99
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1c_color: TcxGridDBColumn
Caption = #24037#24207#21517#31216
DataBinding.FieldName = 'GlideName'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
2025-09-30 17:22:54 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = Tv1c_colorPropertiesButtonClick
2025-09-11 16:06:40 +08:00
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Width = 78
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1taskRollNum: TcxGridDBColumn
Caption = #20219#21153#21305#25968
DataBinding.FieldName = 'PCPiece'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Options.Editing = False
Width = 87
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1taskQty: TcxGridDBColumn
Caption = #20219#21153#25968#37327
DataBinding.FieldName = 'PCQty'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
2025-09-30 17:22:54 +08:00
Width = 82
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1taskDate: TcxGridDBColumn
Caption = #20219#21153#26102#38388
DataBinding.FieldName = 'time'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
2025-09-30 17:22:54 +08:00
Width = 79
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1MCNO: TcxGridDBColumn
Caption = #26426#21488
DataBinding.FieldName = 'MCNO'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
2025-09-30 17:22:54 +08:00
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = tv1CarNoPropertiesButtonClick
2025-09-11 16:06:40 +08:00
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Width = 61
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1BegTime: TcxGridDBColumn
Caption = #24320#22987#26102#38388
DataBinding.FieldName = 'BegTime'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
2025-09-30 17:22:54 +08:00
PropertiesClassName = 'TcxDateEditProperties'
Properties.Kind = ckDateTime
Properties.OnValidate = tv1BegTimePropertiesValidate
2025-09-11 16:06:40 +08:00
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Width = 70
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1MCName: TcxGridDBColumn
Caption = #26426#21488#21517#31216
DataBinding.FieldName = 'MCName'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Width = 86
end
object Tv1GlideID: TcxGridDBColumn
Caption = #20027#38190
DataBinding.FieldName = 'GlideID'
DataBinding.IsNullValueType = True
Visible = False
2025-09-11 16:06:40 +08:00
Width = 80
end
2025-09-30 17:22:54 +08:00
object Tv1GlideNo: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'GlideNo'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
2025-09-30 17:22:54 +08:00
Visible = False
2025-09-11 16:06:40 +08:00
HeaderAlignmentHorz = taCenter
Width = 80
end
2025-09-30 17:22:54 +08:00
object Tv1PSType: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'PSType'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Width = 90
2025-09-11 16:06:40 +08:00
end
2025-09-30 17:22:54 +08:00
object Tv1PSID: TcxGridDBColumn
Caption = #24037#24207#20027#38190
DataBinding.FieldName = 'PSID'
2025-09-11 16:06:40 +08:00
DataBinding.IsNullValueType = True
2025-09-30 17:22:54 +08:00
Visible = False
2025-09-11 16:06:40 +08:00
HeaderAlignmentHorz = taCenter
2025-09-30 17:22:54 +08:00
Width = 80
2025-09-11 16:06:40 +08:00
end
end
object cxGrid1Level1: TcxGridLevel
2025-09-30 17:22:54 +08:00
GridView = Tv1
2025-09-11 16:06:40 +08:00
end
end
object ToolBar3: TToolBar
Tag = 1
Left = 0
Top = 0
2025-09-30 17:22:54 +08:00
Width = 1540
2025-09-11 16:06:40 +08:00
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 107
Caption = 'ToolBar1'
GradientEndColor = clWindow
Images = DataLink_DyeProcess.ImageList_new32
List = True
GradientDrawingOptions = [gdoHotTrack]
ShowCaptions = True
TabOrder = 1
object Trefresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TrefreshClick
end
object ToolButton1: TToolButton
Left = 79
Top = 0
AutoSize = True
Caption = #19978#31227
ImageIndex = 19
2025-09-30 17:22:54 +08:00
Visible = False
2025-09-11 16:06:40 +08:00
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 158
Top = 0
AutoSize = True
Caption = #19979#31227
ImageIndex = 17
2025-09-30 17:22:54 +08:00
Visible = False
2025-09-11 16:06:40 +08:00
OnClick = ToolButton2Click
end
2025-09-30 17:22:54 +08:00
object TbSave: TToolButton
2025-09-11 16:06:40 +08:00
Left = 237
Top = 0
AutoSize = True
2025-09-30 17:22:54 +08:00
Caption = #20445#23384
ImageIndex = 16
OnClick = TbSaveClick
end
object TbEditSave: TToolButton
Left = 316
Top = 0
AutoSize = True
Caption = #20462#25913#20445#23384
ImageIndex = 3
OnClick = TbEditSaveClick
2025-09-11 16:06:40 +08:00
end
object TBDel: TToolButton
2025-09-30 17:22:54 +08:00
Left = 427
2025-09-11 16:06:40 +08:00
Top = 0
AutoSize = True
2025-09-30 17:22:54 +08:00
Caption = #21024#38500#20445#23384
2025-09-11 16:06:40 +08:00
ImageIndex = 5
OnClick = TBDelClick
end
2025-09-30 17:22:54 +08:00
object Tconfirm: TToolButton
Left = 538
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = TconfirmClick
end
2025-09-11 16:06:40 +08:00
object Tclose: TToolButton
2025-09-30 17:22:54 +08:00
Left = 649
2025-09-11 16:06:40 +08:00
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TcloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 38
2025-09-30 17:22:54 +08:00
Width = 1540
Height = 59
2025-09-11 16:06:40 +08:00
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object Label1: TLabel
Left = 24
Top = 18
Width = 64
Height = 22
Caption = #27969#31243#21345#21495
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
2025-09-30 17:22:54 +08:00
Left = 357
Top = 15
Width = 64
2025-09-11 16:06:40 +08:00
Height = 22
2025-09-30 17:22:54 +08:00
Caption = #20135#21697#21517#31216
2025-09-11 16:06:40 +08:00
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object pcid: TcxTextEdit
2025-09-30 17:22:54 +08:00
Left = 99
Top = 11
2025-09-11 16:06:40 +08:00
ParentFont = False
Style.Font.Charset = DEFAULT_CHARSET
Style.Font.Color = clWindowText
Style.Font.Height = -21
Style.Font.Name = #24494#36719#38597#40657
Style.Font.Style = []
Style.IsFontAssigned = True
TabOrder = 0
OnKeyPress = pcidKeyPress
Width = 228
end
2025-09-30 17:22:54 +08:00
object C_Name: TcxTextEdit
Left = 427
Top = 11
2025-09-11 16:06:40 +08:00
ParentFont = False
Properties.ReadOnly = True
Style.Font.Charset = DEFAULT_CHARSET
Style.Font.Color = clWindowText
Style.Font.Height = -21
Style.Font.Name = #24494#36719#38597#40657
Style.Font.Style = []
Style.IsFontAssigned = True
TabOrder = 1
Width = 155
end
end
2025-09-30 17:22:54 +08:00
object cxGrid2: TcxGrid
Left = 849
Top = 97
Width = 691
Height = 739
Align = alRight
TabOrder = 3
ExplicitLeft = 852
ExplicitTop = 103
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
FindPanel.DisplayMode = fpdmAlways
ScrollbarAnnotations.CustomAnnotations = <>
OnCellDblClick = Tv2CellDblClick
DataController.DataSource = DS_2
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsView.GroupByBox = False
object Tv2OrderNo: TcxGridDBColumn
Caption = #35745#21010#21333#21495
DataBinding.FieldName = 'OrderNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 99
end
object Tv2PCID: TcxGridDBColumn
Caption = #27969#31243#21345#21495
DataBinding.FieldName = 'PCID'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 89
end
object Tv2GlideName: TcxGridDBColumn
Caption = #24037#24207#21517#31216
DataBinding.FieldName = 'GlideName'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = Tv2GlideNamePropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 92
end
object Tv2GlideNo: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'GlideNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object Tv2C_Name: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 97
end
object Tv2PSType: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'PSType'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object Tv2All_zhuji: TcxGridDBColumn
Caption = #21161#21058
DataBinding.FieldName = 'All_zhuji'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object Tv2ALL_temperature6: TcxGridDBColumn
Caption = '6#'#28201#24230
DataBinding.FieldName = 'ALL_temperature6'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 90
end
object Tv2GlideID: TcxGridDBColumn
Caption = #25490#20135'ID'
DataBinding.FieldName = 'GlideID'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Width = 80
end
end
object cxGrid2Level1: TcxGridLevel
GridView = Tv2
end
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 728
Top = 224
2025-09-11 16:06:40 +08:00
end
object ADOQueryList: TADOQuery
Connection = DataLink_DyeProcess.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 232
Top = 240
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_DyeProcess.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 232
Top = 304
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_DyeProcess.ADOLink
Parameters = <>
Left = 312
Top = 312
end
object ADOQueryCard: TADOQuery
Connection = DataLink_DyeProcess.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 232
Top = 360
end
object ADOQueryMach: TADOQuery
Connection = DataLink_DyeProcess.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 320
Top = 360
end
2025-09-30 17:22:54 +08:00
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 840
Top = 232
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
Left = 1168
Top = 288
end
object DS_2: TDataSource
DataSet = CDS_2
Left = 1280
Top = 296
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 680
Top = 312
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 1056
Top = 224
end
2025-09-11 16:06:40 +08:00
end