📄 wocancel.dfm
字号:
inherited frmWoCancel: TfrmWoCancel
Left = 160
Top = 102
Width = 669
Height = 560
Caption = '加工单取消'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
inherited sbBar: TStatusBar
Top = 511
Width = 661
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 661
Height = 33
ButtonHeight = 28
Caption = 'ToolBar1'
TabOrder = 1
object btnClear: TBitBtn
Left = 0
Top = 2
Width = 75
Height = 28
Caption = '(&C)清空'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = btnClearClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object btnQuery: TBitBtn
Left = 75
Top = 2
Width = 75
Height = 28
Caption = '(&Q)查询'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = btnQueryClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333FF3FF3333333333CC30003333333333773777333333333C33
3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
33003377333337F33377333333333C333300333F333337F33377339333333C33
3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
330077F377F337F33377993399333C33330077FF773337F33377399993333C33
33333777733337F333FF333333333C33300033333333373FF7773333333333CC
3000333333333377377733333333333333333333333333333333}
NumGlyphs = 2
end
object btnCancel: TBitBtn
Left = 150
Top = 2
Width = 75
Height = 28
Caption = '(&C)取消'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = btnCancelClick
Kind = bkCancel
end
object btnExit: TBitBtn
Left = 225
Top = 2
Width = 75
Height = 28
BiDiMode = bdLeftToRight
Caption = '(&I)退出'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentBiDiMode = False
ParentFont = False
TabOrder = 3
OnClick = btnExitClick
Kind = bkIgnore
end
end
object GroupBox1: TGroupBox
Left = 0
Top = 33
Width = 661
Height = 131
Align = alTop
Caption = '查询条件'
Color = 16643297
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 2
object Label2: TLabel
Left = 80
Top = 85
Width = 24
Height = 12
Caption = ' 到:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 284
Top = 20
Width = 6
Height = 12
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 331
Top = 41
Width = 24
Height = 12
Caption = ' 到:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 14
Top = 22
Width = 54
Height = 12
Caption = '工艺路线:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 14
Top = 44
Width = 54
Height = 12
Caption = '加工件码:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 331
Top = 83
Width = 24
Height = 12
Caption = ' 到:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 551
Top = 17
Width = 54
Height = 12
Caption = '工单状态:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 451
Top = 17
Width = 54
Height = 12
Caption = '工单类型:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seWoCodeF: TSDEdit
Left = 101
Top = 59
Width = 143
Height = 18
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 0
Text = 'seWoCodeF'
SplitSymbol = ' | '
end
object seWoCodeT: TSDEdit
Left = 101
Top = 80
Width = 144
Height = 18
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 1
Text = 'seWoCodeT'
SplitSymbol = ' | '
end
object deWoSdateF: TDateEdit
Left = 355
Top = 17
Width = 86
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-04-26'
InitDate = '2001-04-26'
ModalResult = 0
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
TabOrder = 2
Color = 50197729
Ctl3D = False
ParentFont = False
ParentCtl3D = False
end
object deWoSdateT: TDateEdit
Left = 355
Top = 37
Width = 86
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-04-26'
InitDate = '2001-04-26'
ModalResult = 0
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
TabOrder = 3
Color = 50197729
Ctl3D = False
ParentFont = False
ParentCtl3D = False
end
object scWoRoute: TSDComboBox
Left = 101
Top = 16
Width = 158
Height = 20
Color = 16643297
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 4
Text = 'scWoRoute'
KeyItem = cbItem2
end
object seWoGoods: TSDEdit
Left = 101
Top = 38
Width = 156
Height = 18
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 5
Text = 'seWoGoods'
SplitSymbol = ' | '
end
object deWoRdateT: TDateEdit
Left = 356
Top = 79
Width = 85
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-04-26'
InitDate = '2001-04-26'
ModalResult = 0
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
TabOrder = 6
Color = 50197729
Ctl3D = False
ParentFont = False
ParentCtl3D = False
end
object deWoRdateF: TDateEdit
Left = 356
Top = 58
Width = 85
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-04-26'
InitDate = '2001-04-26'
ModalResult = 0
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
TabOrder = 7
Color = 50197729
Ctl3D = False
ParentFont = False
ParentCtl3D = False
end
object clbWoState: TCheckListBox
Left = 551
Top = 33
Width = 87
Height = 87
Color = 16643297
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
Items.Strings = (
'预备'
'确认'
'待下达'
'已下达'
'完工')
ParentCtl3D = False
ParentFont = False
TabOrder = 8
end
object clbWoType: TCheckListBox
Left = 452
Top = 33
Width = 95
Height = 87
Color = 16643297
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
Items.Strings = (
'常规'
'返工'
'改装'
'委外'
'副产品')
ParentCtl3D = False
ParentFont = False
TabOrder = 9
end
object chkWoCode: TCheckBox
Left = 14
Top = 66
Width = 89
Height = 14
Caption = '加工单号 从:'
TabOrder = 10
end
object chkWoSdate: TCheckBox
Left = 265
Top = 20
Width = 90
Height = 13
Caption = '开工日期 从:'
TabOrder = 11
end
object chkWoRdate: TCheckBox
Left = 265
Top = 61
Width = 90
Height = 13
Caption = '要求日期 从:'
TabOrder = 12
end
end
object sgWoCancel: TSDGrid
Left = 0
Top = 164
Width = 661
Height = 347
Align = alClient
Color = 16643297
ColCount = 9
Ctl3D = False
DefaultRowHeight = 22
FixedColor = 8564917
FixedCols = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing]
ParentCtl3D = False
TabOrder = 3
OnClick = sgWoCancelClick
Columns = <
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = ' '
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '加工单号'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '加工件码'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '加工数量'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '要求日期'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '开工日期'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '工艺路线代码'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '类型'
ColumnWidth = 0
end
item
ColumnFont.Charset = DEFAULT_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -11
ColumnFont.Name = 'MS Sans Serif'
ColumnFont.Style = []
TitleString = '状态'
ColumnWidth = 0
end>
ColWidths = (
22
73
144
51
80
65
106
43
55)
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -