nppm.dfm
来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 410 行
DFM
410 行
inherited frmNppm: TfrmNppm
Left = 67
Top = 86
Width = 640
Height = 420
Caption = '票据付款'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Label1: TLabel [0]
Left = 26
Top = 21
Width = 60
Height = 12
Caption = '发 票 号:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label20: TLabel [1]
Left = 260
Top = 21
Width = 48
Height = 12
Caption = '供应商:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel [2]
Left = 493
Top = 21
Width = 60
Height = 12
Caption = '系统日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object labApivhSysDate: TLabel [3]
Left = 528
Top = 20
Width = 84
Height = 12
Caption = 'lbApivhSysDate'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
inherited sbBar: TStatusBar
Top = 352
Width = 632
end
inherited CoolBar1: TCoolBar
Width = 632
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 632
end>
inherited tbMainBar: TToolBar
Width = 619
end
end
object sgNppm: TSDGrid [6]
Left = 0
Top = 39
Width = 329
Height = 313
Align = alLeft
Color = 50331647
Ctl3D = False
DefaultRowHeight = 22
FixedColor = 8564917
RowCount = 1
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
ParentCtl3D = False
TabOrder = 2
OnClick = sgNppmClick
EvenGridColor = 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
91
81
78
64)
end
object FloatPanel1: TFloatPanel [7]
Left = 329
Top = 39
Width = 303
Height = 313
Align = alClient
Color = 50331647
Caption = 'FloatPanel1'
ParentColor = False
TabOrder = 3
object Label2: TLabel
Left = 20
Top = 23
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 = 20
Top = 75
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 = 20
Top = 128
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 = 20
Top = 154
Width = 60
Height = 12
Caption = '费用类型:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 20
Top = 49
Width = 60
Height = 12
Caption = '付款日期:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 20
Top = 101
Width = 60
Height = 12
Caption = '利 息:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 20
Top = 206
Width = 60
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 = 180
Width = 60
Height = 12
Caption = '操 作 员:'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seNppmExp: TSDEdit
Left = 78
Top = 123
Width = 135
Height = 18
Ctl3D = False
MaxLength = 13
ParentColor = True
ParentCtl3D = False
TabOrder = 4
Text = '0'
DigLen = 2
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seNppmAmt: TSDEdit
Left = 78
Top = 70
Width = 135
Height = 18
Ctl3D = False
MaxLength = 13
ParentColor = True
ParentCtl3D = False
ReadOnly = True
TabOrder = 2
Text = '0'
DigLen = 2
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seNppmInr: TSDEdit
Left = 78
Top = 96
Width = 135
Height = 18
Ctl3D = False
MaxLength = 13
ParentColor = True
ParentCtl3D = False
TabOrder = 3
Text = '0'
DigLen = 2
DataType = dtNumber
CharType = ctMathematic
SplitSymbol = ' | '
DefaultValue = '0'
end
object seNppmCode: TSDEdit
Left = 78
Top = 18
Width = 135
Height = 18
Ctl3D = False
MaxLength = 18
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'seNppmCode'
OnKeyDown = seNppmCodeKeyDown
OnButtonClick = seNppmCodeButtonClick
ButtonVisible = True
SplitSymbol = ' | '
end
object deNppmDate: TDateEdit
Left = 78
Top = 45
Width = 135
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-08-16'
InitDate = '2001-08-16'
ModalResult = 0
TabOrder = 1
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object memNppmDesc: TMemo
Left = 22
Top = 225
Width = 241
Height = 62
Color = 50331647
Ctl3D = False
Lines.Strings = (
'')
ParentCtl3D = False
TabOrder = 7
end
object scNppmExpense: TSDComboBox
Left = 78
Top = 149
Width = 134
Height = 20
Color = 50331647
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 5
Text = 'scNppmExpense'
KeyItem = cbItem2
ReadOnly = True
end
object scNppmUser: TSDComboBox
Left = 78
Top = 175
Width = 135
Height = 20
Color = 50331647
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 6
Text = 'scNppmUser'
KeyItem = cbItem2
ReadOnly = True
end
end
inherited RecPrintDlg: TPrintDialog
Left = 627
Top = 65535
end
inherited PrnSetupDlg: TPrinterSetupDialog
Left = 659
Top = 7
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?