Dbgrid Column.Index colorear

[shoulder]

Hola en el dbgrid pinto una columna de negro para que no se vean los datos si entra un usuario con un rol especial,funciona bien, pero si el usuario hace un click sobre la celda el valor se hace visible y el fondo de la celda vuelve a blanco no entiendo porque. Probe y veo que al hacer click en la celda de la columna se pierde en el ondrawcolumn el numero de columna lo trae en blanco. Gracias

ejemplo en el ondrawcolumn

Código Delphi [-]

if a = '1' then
 begin
   if (Column.Index = 3) then
      begin
        DbGrid1.Canvas.Brush.Color := clBlack;
        DbGrid1.Canvas.Font.Color := clBlack;
        DbGrid1.DefaultDrawColumnCell(rect,DataCol,Column,State);
      end;
end;

es decir al clikear la columna entra por a= 1 pero al posicionarme en column.index veo blanco y no el numero 3 de la columna.