Mover columnas en un dbgrid

[jzginez]

Hola a todos tengo varios dbgrid y por default al usar este componente puedo mover las diferentes columnas a la posición que yo quiera en tiempo de ejecución lo que necesito es que en algunos dbgrid no se puedan mover las columnas y en otros que la nueva posición de la columna quede fija para la proxima vez que ejecuto la aplicación ya que cuando muevo las columnas, salgo y vuelvo a entrar a la aplicación la posición de las columnas es la que defini en el diseño.

Espero me puedan decir como hago esto

gracias

[Julià T.]

El TDBGrid no puede , peri su componente interno TDBGridColumns, puede guardar su configuración en un fichero (también en streams)

DBGrid1.Columns.SaveToFile(Nombre_del_fichero);
DBGrid1.Columns.LoadFromFile(Nombre_del_fichero);

[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.