Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];



Вниз

Как запретить перемещение(cмену позиции) колонок в DBGRID, но разрешить Resize(изменять ширину)? 

Nest   (2001-12-14 15:20) [0]

Вобщем, нужно чтоб пользователь не мог менять колонки местами, но чтоб мог изменять ширину(если например всё значение не влезает).

Сторонние(нестандартные) компоненты - гриды и т.п.
Использовать очень нехочется - возможно проект будет компилироваться на разных машинах, где их может не быть.
Но если другого выхода нет - то можно рискнуть.

---

Mick   (2001-12-14 15:32) [1]

способ 1: Убрать из опций dgColumnResize, а для изменения ширины колонок сделать свой интерфейс.
способ 2: оставить опцию dgColumnResize, но после OnColumnMove восстанавливать правильный индекс колонок

---

Nest   (2001-12-14 15:49) [2]

Ковырнул 2 ещё давно, но сразу не получилось.
НО!
Сичас попоробовал ещё раз - получилось!!!!!!
Тогда я не то делал:
procedure TForm1.DBGrid1ColumnMoved(Sender: TObject; FromIndex,
ToIndex: Integer);
begin
table1.fields[ fromindex].index:= toindex
end;

А надо :
table1.fields[ toindex].index:= fromindex

Перепутал. А так всё работает.
Так что спасибо.
Вопрос решён.

---

Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.72 MB
Время: 0.036 c