Como colocar un CheckList en un DbGrid

[JULIPO]

Reciban un cordial saludo.

Estuve revisando la informacion de como colocar un checklist en un dbgrid y lo logre realizar sin problemas el problema es que cuando selecciono la celda me aparece el contenido del registro en Texto en mi caso 1 y 0 como hacer para que no aparezca

el codigo que realice es el siguiente

Código Delphi [-]
procedure TTecnica.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);

var
   chequeado : Integer;
begin
if (Column.Field.FieldName = clistaznus.FieldByName('verificar').FieldName) then
    begin
     DBGrid1.Canvas.FillRect(Rect);
     chequeado := 0;
     if clistaznus.FieldByName('verificar').AsInteger=1 then
      chequeado := DFCS_CHECKED;
     DrawFrameControl(DBGrid1.Canvas.Handle, Rect,DFC_BUTTON, chequeado);
    end;
end;