qcc.dfm
来自「科思ERP部分源码及控件」· DFM 代码 · 共 155 行
DFM
155 行
inherited frmQcc: TfrmQcc
Left = 120
Top = 135
Width = 628
Height = 417
Caption = '质检项目'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
inherited sbBar: TStatusBar
Top = 349
Width = 620
end
inherited CoolBar1: TCoolBar
Width = 620
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 620
end>
inherited tbMainBar: TToolBar
Width = 607
end
end
object sgQcc: TSDGrid [2]
Left = 0
Top = 39
Width = 281
Height = 310
Align = alLeft
Color = clWhite
ColCount = 3
Ctl3D = False
DefaultRowHeight = 18
FixedColor = 8564917
RowCount = 4
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
ParentCtl3D = False
ParentFont = False
TabOrder = 2
OnClick = sgQccClick
OddGridColor = 14806523
Columns = <
item
ColumnFont.Charset = DEFAULT_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -11
ColumnFont.Name = 'MS Sans Serif'
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>
ColWidths = (
10
104
159)
end
object fpQcc: TFloatPanel [3]
Left = 281
Top = 39
Width = 339
Height = 310
Align = alClient
Color = clWhite
Caption = 'fpQcc'
ParentColor = False
TabOrder = 3
object Label1: TLabel
Left = 22
Top = 41
Width = 60
Height = 12
Caption = '项目代码:'
end
object Label2: TLabel
Left = 22
Top = 89
Width = 60
Height = 12
Caption = '名 称:'
end
object Label3: TLabel
Left = 22
Top = 137
Width = 60
Height = 12
Caption = '备 注:'
end
object seQccName: TSDEdit
Left = 105
Top = 84
Width = 163
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'seQccName'
SplitSymbol = ' | '
DefaultValue = ' '
end
object seQccDesc: TSDEdit
Left = 105
Top = 131
Width = 163
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 1
Text = 'seQccDesc'
SplitSymbol = ' | '
end
object seQccCode: TSDEdit
Left = 105
Top = 36
Width = 163
Height = 18
CharCase = ecUpperCase
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 2
Text = 'SEQCCCODE'
OnKeyPress = seQccCodeKeyPress
SplitSymbol = ' | '
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?