DBGrid中增加一列CHECKBOX

经常会遇到这样的需求，就是要给用户选择一组数据。希望能在DBGRID中增加一列CHECKBOX

网络上搜索了下，感觉解决方案都不是很好。只能自己动手做一个。

基本思路：

1. 从THlSortDBGrid继承，(THlSortDBGrid是从TTCustomDBGrid继承，实现了排序功能和CHECKBOX无关)
2. 增加两个属性：KeyField:用于指定和该DBGRID连接的DATASET的主键字段名，CheckField:用于指定显示CHECKBOX的字段名。
3. 继承DrawDataCell,如果制定字段是CHECKFIELD则在这个CELL区域创建一个CHECKBOX

演示效果：