D10szXingjie/E01梭织生产计划/U_TatPlanMachList.dfm
DESKTOP-E401PHE\Administrator d4fd8d4862 123
2025-06-06 10:26:48 +08:00

413 lines
10 KiB
Plaintext

inherited frmTatPlanMachList: TfrmTatPlanMachList
Left = 34
Top = 55
Caption = #23613#26426#23433#25490
ClientHeight = 518
ClientWidth = 1109
ExplicitWidth = 1125
ExplicitHeight = 557
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1109
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TatPlan.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TBRafreshClick
end
object TBFind: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 0
Visible = False
OnClick = TBFindClick
end
object ToolButton1: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #26032#22686#20219#21153
ImageIndex = 9
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 237
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 332
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object Panel1: TPanel [1]
Left = 0
Top = 38
Width = 1109
Height = 64
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 1
object Label15: TLabel
Left = 191
Top = 36
Width = 52
Height = 12
Caption = #32455#36896#21333#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 190
Top = 10
Width = 53
Height = 12
Caption = #26426' '#21488' '#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 371
Top = 10
Width = 52
Height = 12
Caption = #20135#21697#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 28
Top = 10
Width = 52
Height = 12
Caption = #26597#35810#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 67
Top = 36
Width = 13
Height = 12
Caption = #33267
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 371
Top = 36
Width = 52
Height = 12
Caption = #20135#21697#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MCNo: TEdit
Tag = 3
Left = 244
Top = 6
Width = 80
Height = 20
TabOrder = 0
OnChange = GSBHChange
end
object OrderNo: TEdit
Tag = 3
Left = 244
Top = 32
Width = 80
Height = 20
TabOrder = 1
OnChange = GSBHChange
end
object C_Code: TEdit
Tag = 3
Left = 425
Top = 6
Width = 80
Height = 20
TabOrder = 2
OnChange = GSBHChange
end
object BegDate: TDateTimePicker
Left = 82
Top = 6
Width = 87
Height = 20
Date = 40768.000000000000000000
Time = 0.458268587972270300
TabOrder = 3
end
object EndDate: TDateTimePicker
Left = 82
Top = 32
Width = 87
Height = 20
Date = 40768.000000000000000000
Time = 0.458268587972270300
TabOrder = 4
end
object C_Name: TEdit
Tag = 3
Left = 425
Top = 32
Width = 80
Height = 20
TabOrder = 5
OnChange = GSBHChange
end
end
object cxGrid1: TcxGrid [2]
Left = 0
Top = 129
Width = 1109
Height = 389
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clBtnShadow
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PM_1
TabOrder = 2
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DS_1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoGroupsAlwaysExpanded, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsView.GroupByBox = False
Styles.Header = DataLink_TatPlan.Default
Styles.Selection = DataLink_TatPlan.SHuangSe
object VC_MCNo: TcxGridDBColumn
Caption = #26426#21488#21495
DataBinding.FieldName = 'MCNo'
Visible = False
GroupIndex = 0
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = DataLink_TatPlan.FontBlue
Styles.Footer = DataLink_TatPlan.FontBlue
Styles.GroupSummary = DataLink_TatPlan.FontBlue
Styles.Header = DataLink_TatPlan.FontBlue
VisibleForCustomization = False
Width = 81
end
object Tv1Column2: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'Sequence'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 50
end
object v1Column8: TcxGridDBColumn
Caption = #26426#22411
DataBinding.FieldName = 'MCType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 79
end
object Tv1Column1: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'PMType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 107
end
object Tv1Column15: TcxGridDBColumn
Caption = #26797#32455#21333#21495
DataBinding.FieldName = 'OrderNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 100
end
object Tv1Column5: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'C_Code'
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 100
end
object Tv1Column16: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'C_Name'
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 100
end
object Tv1Column7: TcxGridDBColumn
Caption = #23433#25490#20154
DataBinding.FieldName = 'filler'
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 100
end
object Tv1Column8: TcxGridDBColumn
Caption = #23433#25490#26102#38388
DataBinding.FieldName = 'filltime'
HeaderAlignmentHorz = taCenter
Options.Editing = False
VisibleForCustomization = False
Width = 100
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object cxTabControl1: TcxTabControl [3]
Left = 0
Top = 102
Width = 1109
Height = 27
Align = alTop
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
Properties.CustomButtons.Buttons = <>
Properties.Style = 6
Properties.TabIndex = 0
Properties.Tabs.Strings = (
' '#26410#23436#25104' '
' '#29983#20135#20013' '
' '#24050#23436#25104' '
' '#20840' '#37096' ')
OnChange = cxTabControl1Change
ClientRectBottom = 29
ClientRectRight = 1109
ClientRectTop = 29
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_TatPlan.ADOLink
Left = 302
Top = 178
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_TatPlan.ADOLink
Left = 166
Top = 207
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TatPlan.ADOLink
Parameters = <>
Left = 593
Top = 178
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_TatPlan.ADOLink
Parameters = <>
Left = 712
Top = 171
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 596
Top = 286
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 485
Top = 284
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 396
Top = 296
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TatPlan.ADOLink
Parameters = <>
Left = 468
Top = 193
end
object PM_1: TPopupMenu
Left = 314
Top = 296
object N1: TMenuItem
Caption = #19978#31227
OnClick = N1Click
end
object N2: TMenuItem
Caption = #19979#31227
OnClick = N2Click
end
end
end