[merdashka]

Можно на событие ColumnMoved прописать в каком порядке должны стоять колонки.



Пример

procedure TForm1.DBGrid1ColumnMoved(Sender: TObject; FromIndex,
ToIndex: Integer);
begin
DbGrid1.Columns.Items[0].FieldName:='Имя_Поля1';
DbGrid1.Columns.Items[1].FieldName:='Имя_Поля2';
.
.
.
end;

И пусть перетаскивают сколько могут