aruage.dfm
来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 172 行
DFM
172 行
inherited frmAruAge: TfrmAruAge
Left = 89
Top = 68
Width = 640
Height = 420
Caption = '未到期帐龄区间'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
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 sgAruAge: TSDGrid [2]
Left = 0
Top = 39
Width = 313
Height = 313
Align = alLeft
Color = 50331647
ColCount = 4
Ctl3D = False
DefaultRowHeight = 18
FixedColor = 8564917
RowCount = 4
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
ParentCtl3D = False
TabOrder = 2
OnClick = sgAruAgeClick
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>
ColWidths = (
10
79
84
122)
end
object FloatPanel1: TFloatPanel [3]
Left = 313
Top = 39
Width = 319
Height = 313
Align = alClient
Color = 50331647
Caption = 'FloatPanel1'
ParentColor = False
TabOrder = 3
object Label1: TLabel
Left = 28
Top = 32
Width = 60
Height = 12
Caption = '区间序号:'
end
object Label2: TLabel
Left = 28
Top = 63
Width = 60
Height = 12
Caption = '区间天数:'
end
object Label3: TLabel
Left = 28
Top = 93
Width = 60
Height = 12
Caption = '区间说明:'
end
object seAruAgeNo: TSDEdit
Left = 84
Top = 27
Width = 150
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'seAroAgeNo'
OnExit = seAruAgeNoExit
CharType = ctNumeric
SplitSymbol = ' | '
end
object seAruAgeDays: TSDEdit
Left = 85
Top = 58
Width = 147
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 1
Text = 'seAroAgeName'
CharType = ctNumeric
SplitSymbol = ' | '
end
object memAruAgeDesc: TMemo
Left = 29
Top = 111
Width = 206
Height = 73
Color = 50331647
Ctl3D = False
Lines.Strings = (
'memAruAgeDesc')
ParentCtl3D = False
TabOrder = 2
end
end
inherited MainMenu1: TMainMenu
Left = 554
Top = 163
end
inherited ImageList1: TImageList
Left = 553
Top = 130
end
inherited RecPrintDlg: TPrintDialog
Left = 555
Top = 95
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?