📄 gmth_w.dfm
字号:
inherited frmGmth_W: TfrmGmth_W
Left = 147
Top = 109
Width = 701
Height = 563
Caption = '工单领料表'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object sgGmth: TSDGrid [0]
Left = 0
Top = 125
Width = 693
Height = 335
Align = alClient
Color = clWhite
ColCount = 8
Ctl3D = False
DefaultRowHeight = 18
FixedColor = 8564917
FixedCols = 0
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goEditing, goAlwaysShowEditor]
ParentCtl3D = False
ParentFont = False
TabOrder = 2
OnClick = sgGmthClick
OnDblClick = sgGmthDblClick
OnSelectCell = sgGmthSelectCell
EvenGridColor = clWhite
OddGridColor = clWhite
Columns = <
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clGreen
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '选取'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '行号'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '物料编码'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '单位'
ColumnWidth = 0
end
item
EditType = sdEdit
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
CharType = gtNumeric
TitleString = '领料定额'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '已领数量'
ColumnWidth = 0
end
item
EditType = sdEdit
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clBlue
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '领料数量'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clBlue
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '发料货位'
ColumnWidth = 0
end>
ColWidths = (
25
44
149
47
89
129
64
64)
end
inherited sbBar: TStatusBar
Top = 495
Width = 693
end
inherited CoolBar1: TCoolBar
Width = 693
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 693
end>
inherited tbMainBar: TToolBar
Width = 680
end
end
object PnlGmth: TPanel [3]
Left = 0
Top = 39
Width = 693
Height = 86
Align = alTop
BevelInner = bvRaised
Color = clWhite
TabOrder = 3
object Label1: TLabel
Left = 20
Top = 11
Width = 54
Height = 12
Caption = '领料单号:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 20
Top = 36
Width = 54
Height = 12
Caption = '制单日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 20
Top = 60
Width = 54
Height = 12
Caption = '财务月份:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 494
Top = 7
Width = 42
Height = 12
Caption = '单备注:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 241
Top = 36
Width = 54
Height = 12
Caption = '领料类型:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 241
Top = 11
Width = 54
Height = 12
Caption = '收发类型:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label26: TLabel
Left = 241
Top = 60
Width = 54
Height = 12
Caption = '加工单号:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seGmthCode: TSDEdit
Left = 79
Top = 5
Width = 133
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'seGmthCode'
OnKeyDown = seGmthCodeKeyDown
SplitSymbol = ' | '
end
object deGmthDate: TDateEdit
Left = 79
Top = 32
Width = 94
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-04-27'
InitDate = '2001-04-27'
ModalResult = 0
TabOrder = 1
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object scGmthFmonth: TSDComboBox
Left = 79
Top = 53
Width = 94
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 2
end
object memGmthDesc: TMemo
Left = 496
Top = 22
Width = 172
Height = 43
Color = clWhite
Ctl3D = False
Lines.Strings = (
'')
ParentCtl3D = False
TabOrder = 3
end
object scGmthPosType: TSDComboBox
Left = 297
Top = 3
Width = 151
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 4
KeyItem = cbItem2
end
object scGmthType: TSDComboBox
Left = 297
Top = 28
Width = 150
Height = 20
TabStop = False
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 5
Text = 'scGmthType'
KeyItem = cbItem2
end
object seGmthWo: TSDEdit
Left = 297
Top = 55
Width = 168
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 6
Text = 'seGmthWo'
OnButtonClick = seGmthWoButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
end
object PnlGmtd: TPanel [4]
Left = 0
Top = 460
Width = 693
Height = 35
Align = alBottom
BevelInner = bvRaised
Color = clWhite
TabOrder = 4
object Label3: TLabel
Left = 473
Top = 12
Width = 42
Height = 12
Caption = '审核人:'
end
object labChecker: TLabel
Left = 518
Top = 12
Width = 42
Height = 12
Caption = 'Checker'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 571
Top = 12
Width = 42
Height = 12
Caption = '制单人:'
end
object labUser: TLabel
Left = 613
Top = 12
Width = 42
Height = 12
Caption = 'labUser'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 355
Top = 12
Width = 54
Height = 12
Caption = '审核日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object labCheckDate: TLabel
Left = 414
Top = 12
Width = 54
Height = 12
Caption = 'CheckDate'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 13
Top = 19
Width = 240
Height = 12
Caption = '2、双击<物料编码>列可以查询/编辑物料分摊'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = [fsUnderline]
ParentFont = False
end
object Label6: TLabel
Left = 13
Top = 4
Width = 210
Height = 12
Caption = '1、双击<发料货位>列可以编辑发料货位'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = [fsUnderline]
ParentFont = False
end
object chkGmthCheck: TCheckBox
Left = 289
Top = 9
Width = 59
Height = 20
Caption = '已审核'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
end
end
inherited MainMenu1: TMainMenu
Left = 363
Top = 291
end
inherited ImageList1: TImageList
Left = 363
Top = 291
end
inherited BillPrintDlg: TPrintDialog
Left = 363
Top = 291
end
inherited BillPrnSetupDlg: TPrinterSetupDialog
Left = 363
Top = 291
end
inherited pmDetail: TPopupMenu
Left = 363
Top = 291
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -