[marcoszorrilla]

Para permitir o evitar que muevan o cambien cualquier columna por código:

Código Delphi [-]
procedure TForm1.BtnNoMoverClick(Sender: TObject);
begin
 if dgColumnResize in DbGrid1.Options then
 DbGrid1.Options:=DbGRid1.Options-[dgColumnResize];
end;

procedure TForm1.BtnMoverClick(Sender: TObject);
begin
  if not (dgColumnResize in DbGrid1.Options) then
  DbGrid1.Options:=DbGRid1.Options+[dgColumnResize];
end;

Un Saludo.