📄 uvadgsickness.dfm
字号:
inherited VADGSickness: TVADGSickness
inherited RzPanel1: TRzPanel
inherited RzPanel2: TRzPanel
inherited Grid: TcxGrid
inherited GridDBTableView: TcxGridDBTableView
DataController.Filter.Criteria = {FFFFFFFF0000000000}
object GridDBTableViewSICKNESSCODE: TcxGridDBColumn
FooterAlignmentHorz = taCenter
HeaderAlignmentHorz = taCenter
HeaderAlignmentVert = vaCenter
HeaderGlyphAlignmentHorz = taCenter
DataBinding.FieldName = 'SICKNESSCODE'
end
object GridDBTableViewCAPTION: TcxGridDBColumn
FooterAlignmentHorz = taCenter
HeaderAlignmentHorz = taCenter
HeaderAlignmentVert = vaCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 100
DataBinding.FieldName = 'CAPTION'
end
object GridDBTableViewSICKNESSCATALOGCODE: TcxGridDBColumn
PropertiesClassName = 'TcxLookupComboBoxProperties'
Properties.KeyFieldNames = 'SICKNESSCATALOGCODE'
Properties.ListColumns = <
item
FieldName = 'CAPTION'
end>
Properties.ListSource = SickNesscatalogCode
Visible = False
FooterAlignmentHorz = taCenter
HeaderAlignmentHorz = taCenter
HeaderAlignmentVert = vaCenter
HeaderGlyphAlignmentHorz = taCenter
Width = 100
DataBinding.FieldName = 'SICKNESSCATALOGCODE'
end
end
end
end
end
inherited DataSource: TDataSource
DataSet = MADSickness.ClientDataSet
end
object SickNesscatalogCode: TDataSource
DataSet = MADSickNesscatalog.ClientDataSet
Left = 152
Top = 16
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -