Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 15 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 02.07.2019, 13:04   #1
KBO
Форумчанин
 
Регистрация: 11.06.2010
Сообщений: 461
Репутация: 16
По умолчанию DBGridEh - одновременная рокировка сразу нескольких столбцов

Доброе время суток форумчане,
Все знают, что в DBGridEh, можно менять столбцы местами...
Но у меня возникла необходимость: при перемещении одного (конкретного) из стобцов таблицы, перемещать в след за ним еще 2 смежных столбца, чтоб не терять вида представления данных.

Как это можно сделать?
Есть сразу вариант, после перемещения определенного столбца, менять положение и двух других, но это как-то очень «сильно». Тем более это нужно знать какой столбец перетаскиваешь?

Заранее спасибо за ответ.
KBO на форуме   Ответить с цитированием
Старый 02.07.2019, 13:06   #2
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 25,681
Репутация: 5617
По умолчанию

попробуйте повесить код на событие OnColumnMoved
Serge_Bliznykov вне форума   Ответить с цитированием
Старый 02.07.2019, 23:55   #3
KBO
Форумчанин
 
Регистрация: 11.06.2010
Сообщений: 461
Репутация: 16
По умолчанию

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
попробуйте повесить код на событие OnColumnMoved
а, ну что-то типа такого.

Код:
procedure TFMain.dbgrehProtocolColumnMoved(Sender: TObject; FromIndex, ToIndex: Integer);
begin
  if dbgrehProtocol.Columns[ToIndex].FieldName = 'CALC_PROPOSAL_SOLUTION' then
  begin
    dbgrehProtocol.Columns[FromIndex+1].index:=ToIndex+1;
    dbgrehProtocol.Columns[FromIndex+2].index:=ToIndex+2;
  end;
end;
где, если переношу колонку "'CALC_PROPOSAL_SOLUTION'", переносятся также 2 колонки и за ней

Последний раз редактировалось KBO; 02.07.2019 в 23:57.
KBO на форуме   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Очистка сразу нескольких StringGrid Artamos Компоненты Delphi 7 13.05.2011 13:58
Установка нескольких атрибутов сразу Shouldercannon Общие вопросы Delphi 7 01.05.2011 22:49
Добавление и удаление столбцов в DBGridEh cw82 Помощь студентам 2 02.11.2010 15:39
Создание сразу нескольких txt файлов Nice42ru Помощь студентам 11 11.02.2010 19:35
dbGridEh и выбор нескольких строк tavrocotaps Общие вопросы Delphi 3 21.01.2010 00:31


22:55.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.