cxgrid 标题增加checkbox

procedure Uyxmdo.yxmdatagridDBTableView1selectHeaderClick(  //增加单击select标题，可以进行全选和反选操作
  Sender: TObject);
begin
  inherited;
  if Self.yxmdatagridDBTableView1select.HeaderImageIndex = 1 then
  begin
     Self.yxmdatagridDBTableView1select.HeaderImageIndex := 0;
     TyxmApplicationfunction.DetailCheckAll(yxmdatagridDBTableView1, True);  //全选
  end
  else
  begin
     Self.yxmdatagridDBTableView1select.HeaderImageIndex := 1;
     TyxmApplicationfunction.DetailCheckAll(yxmdatagridDBTableView1, False); //反选
  end;
end;

其实就是增加cximglist增加 选择和反选 图片，同时增加一个标题的单击事件，给人一种是CHECKBOX的错觉