📄 fadec.dfm
字号:
inherited frmFaDec: TfrmFaDec
Left = 75
Top = 120
Width = 644
Height = 448
Caption = '设备减少'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
inherited sbBar: TStatusBar
Top = 380
Width = 636
end
inherited CoolBar1: TCoolBar
Width = 636
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 636
end>
inherited tbMainBar: TToolBar
Width = 623
inherited tbCheck: TToolButton
Visible = True
end
end
end
object FloatPanel3: TFloatPanel [2]
Left = 0
Top = 347
Width = 636
Height = 33
Align = alBottom
Color = 50331647
Enabled = False
Caption = 'FloatPanel3'
ParentColor = False
TabOrder = 2
object Label14: TLabel
Left = 429
Top = 7
Width = 48
Height = 12
Caption = '操作员:'
end
object labFaDecUser: TLabel
Left = 477
Top = 7
Width = 72
Height = 12
Caption = 'labFaDecUser'
end
object Label11: TLabel
Left = 252
Top = 9
Width = 60
Height = 12
Caption = '审核日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object labFaDecChecker: TLabel
Left = 142
Top = 8
Width = 90
Height = 12
Caption = 'labFaDecChecker'
end
object Label9: TLabel
Left = 93
Top = 8
Width = 48
Height = 12
Caption = '审核人:'
end
object labFaDecCheckDate: TLabel
Left = 313
Top = 8
Width = 102
Height = 12
Caption = 'labFaDecCheckDate'
end
object chkFaDecCheck: TCheckBox
Left = 24
Top = 5
Width = 61
Height = 17
Caption = '审核'
Checked = True
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 0
end
end
object FloatPanel1: TFloatPanel [3]
Left = 337
Top = 39
Width = 299
Height = 308
Align = alClient
Color = 50331647
Caption = 'FloatPanel4'
ParentColor = False
TabOrder = 3
object Label1: TLabel
Left = 30
Top = 26
Width = 60
Height = 12
Caption = '减少单号:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 30
Top = 105
Width = 60
Height = 12
Caption = '设备编码:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 30
Top = 158
Width = 60
Height = 12
Caption = '减少类型:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 30
Top = 184
Width = 60
Height = 12
Caption = '减少原因:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 30
Top = 79
Width = 60
Height = 12
Caption = '财务月份:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 30
Top = 52
Width = 60
Height = 12
Caption = '减少日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 30
Top = 267
Width = 60
Height = 12
Caption = '系统日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 106
Top = 239
Width = 48
Height = 12
Caption = '凭证号:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 30
Top = 210
Width = 60
Height = 12
Caption = '对方科目:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object labFaDecSysDate: TLabel
Left = 92
Top = 267
Width = 102
Height = 12
Caption = 'labFaDecCheckDate'
end
object Label12: TLabel
Left = 30
Top = 131
Width = 60
Height = 12
Caption = '设备名称:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seFaDecCode: TSDEdit
Left = 86
Top = 21
Width = 120
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'seFaDecCode'
OnKeyDown = seFaDecCodeKeyDown
SplitSymbol = ' | '
end
object seFaDecPzCode: TSDEdit
Left = 153
Top = 233
Width = 120
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 8
Text = 'seFaDecPzCode'
SplitSymbol = ' | '
end
object seFaDecOGlkm: TSDEdit
Left = 88
Top = 203
Width = 187
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 6
Text = 'seFaDecOGlkm'
CharType = ctMathematic
OnButtonClick = seFaDecOGlkmButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
object chkFaDecPost: TCheckBox
Left = 30
Top = 237
Width = 59
Height = 17
Caption = '制凭证'
TabOrder = 7
OnClick = chkFaDecPostClick
end
object sdFaDecDate: TDateEdit
Left = 88
Top = 48
Width = 120
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-04-26'
InitDate = '2001-04-26'
ModalResult = 0
TabOrder = 1
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object scFaDecFmonth: TSDComboBox
Left = 88
Top = 72
Width = 120
Height = 20
Color = 50331647
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 2
Text = 'scFaDecFmonth'
end
object seFaDecDesc: TSDEdit
Left = 88
Top = 177
Width = 187
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 5
Text = 'seFaDecDesc'
SplitSymbol = ' | '
end
object scFaDecFav: TSDComboBox
Left = 87
Top = 151
Width = 120
Height = 20
Style = csDropDownList
Color = 50331647
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 4
KeyItem = cbItem2
end
object seFaDecFadnName: TSDEdit
Left = 88
Top = 125
Width = 120
Height = 18
Ctl3D = False
Enabled = False
ParentColor = True
ParentCtl3D = False
ReadOnly = True
TabOrder = 9
Text = 'seFaDecFadnName'
SplitSymbol = ' | '
end
object seFaDecFadn: TSDEdit
Left = 86
Top = 101
Width = 120
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 3
Text = 'seFaDecCode'
OnKeyDown = seFaDecFadnKeyDown
OnButtonClick = seFaDecFadnButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
end
object sgFaDec: TSDGrid [4]
Left = 0
Top = 39
Width = 337
Height = 308
Align = alLeft
Color = 50331647
Ctl3D = False
DefaultRowHeight = 22
FixedColor = 8564917
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing]
ParentCtl3D = False
TabOrder = 4
OnClick = sgFaDecClick
EvenGridColor = 50331647
OddGridColor = 50331647
Columns = <
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
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>
ColWidths = (
9
68
87
84
82)
end
inherited RecPrintDlg: TPrintDialog
Left = 555
Top = 95
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -