怎样写代码？为DBGridEH的第一列加上checkbox复选框，这一列存储的是每条记录的id值，用户可以多选，对多条记录进行批量删除

Question

怎样写代码？为DBGridEH的第一列加上checkbox复选框，这一列存储的是每条记录的id值，用户可以多选，对多条记录进行批量删除

Answer 1

我是直接在表里面加个字段,它是:U_Choose char(2),代码如下:
procedure TFrm_Clearing.DBGrid1DblClick(Sender: TObject);
begin
  tdbgrid(sender).DataSource.DataSet.Edit;
  if tdbgrid(sender).DataSource.DataSet.FieldByName('U_Choose').AsString='√' then
    tdbgrid(sender).DataSource.DataSet.FieldValues['U_Choose']:=''
  else
    tdbgrid(sender).DataSource.DataSet.FieldValues['U_Choose']:='√';
end;

Answer 2

要用checkbox，哪位知道怎么做？