Como Apagar toda a coluna de um DBgrid?

Tabela.First;
While Not Tabela.Eof Do Begin
    Tabela.Edit;
    Tabela.FieldByName( ´campo´ ).AsVariant := null;
    Tabela.Post;
    Tabela.Next;
End;