Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как заставить 2 грида прокручивать столбцы синхронно? [D7]

Denis © (2005-06-03 10:31:00)
Приветствую всех.
Вопрос, собственно, в теме... Есть 2 грида, один под другим,абсолютно одинаковые, но с различными по смыслу данными - вверху оригинальные, внизу - отредактированные. Хочу избавиться от заголовков в нижнем гриде, и, чтобы не путать столбцы, сделать взаимосвязанную горизонтальную прокрутку этих гридов.
Я пытался сделать нечто вроде
Pos:=GetScrollPos(dbgKTS.Handle,sb_Horz);
SetScrollPos(dbgEdit.Handle,sb_Horz,Pos,true);
на OnColEnter но это не то.
Подскажите, как поступить?

Denis (2005-06-03 12:28:00) [1]
:) Смотрел уже... Хорошего мало...

Denis (2005-06-03 12:23:00) [2]
>это взгляд лишь с твоей колокольни, а она у тебя, видимо, выше других, с нее все видно и ее все видят)

Повесь на главной странице "Требования как задавать вопрос Digitmanu"... Тогда мы оценим архитектурные особенности и тонкости стиля твоей колокольни...

по всему прочему - мне не "влом" если бы мне написали 2 слова "какой грид?" - и все! И не бы ло бы этой перепалки и очередного
тыкания носом в коврик.
Digitman, я ,конечно, понимаю что ты мастер и специалист. Но почему-бы не быть попроще, а? Я никого не оскорблял, не борзел. Нафига это все? Можно было бы все сделать проще, вот и все.

>туда ей и дорога)
так что там насчет твоей колокольни? )))

Предлагаю угомониться. Мир-труд-май.
За лекцию о гридах спасибо.

Digitman (2005-06-03 12:05:00) [3]

> Denis © (03.06.05 11:40) [9]
> сейчас скатим ветку в оффтоп

а вот и еще один "уважаемый", легок на помине :

http://www.delphimaster.ru/cgi-bin/forum.pl?id=1117781895&n=0

вот КАК бы ты ему ответил, если бы знал что у какого то-там "грида" в составе RX нет, например, св-ва Cells, но не знал что автор мается именно ЭТИМ гридом, а не каким-то другим, например, TGrid, решение для которого очевидно и оно практически у тебя под рукой ?)

Digitman (2005-06-03 11:57:00) [4]

> считаю твои претензии необоснованными

твое право.

но

> дал достаточно подробное описание проблемы

это взгляд лишь с твоей колокольни, а она у тебя, видимо, выше других, с нее все видно и ее все видят)

> Может отдельным файлом ТЗ и описание инструментальных средств
> высылать?

не передергивай, уважаемый.

все что от тебя требовалось - в первом же посте уточнить, грид какого конкретно класса тебя озаботил.

их же туева хуча, этих гридов всякоразных !

и у каждого могут быть или отсутствовать те или иные методы/св-ва/события.. т.е. грид гриду - рознь !

я привел тебе пример в расчете на наиболее, на мой взгляд, вероятное использование тобой наследника TCustomDrawGrid, который не скрыл св-во OnSelectCell и не переопределил метод SelectCell

не менее вероятным было бы и использование наследника TCustomDbGrid, там было бы свое решение, не менее простое и базирующееся на станд.методах TDataSet, позиционирующих НД и через DataSource вызывающих соотв.позиционирование грида ... и решение, кстати, в этом случае было бы универсальным и оч простым ... но - опять же ! - тебе было "влом" уточнить, что у тебя грид не связан с НД)

так что

> сейчас скатим ветку в оффтоп

туда ей и дорога)

Denis (2005-06-03 11:40:00) [5]
сейчас скатим ветку в оффтоп...
Уважения у меня достаточно как к другим, так и к себе.
Я считаю твои претензии необоснованными. Я дал достаточно подробное описание проблемы. Может отдельным файлом ТЗ и описание инструментальных средств высылать? Или сменить грид, потому что совет уважаемого Digitmana подходит к другому?

Digitman (2005-06-03 11:25:00) [6]

> Denis © (03.06.05 11:16) [7]

а тебе не кажется, что надо элементарное уважение иметь к другим участникам форума ?

> ты предложил, я проверил и уточнил. по-моему нормальный
> рабочий диалог

а по-моему далеко не нормальный : ты в роли праздного дегустатора, а другие в роли официантов - мол, несите все подряд супы, мне, мол, без разницы какие, я, мол, попробую, понравится - съем, не понравится - выплюну)

Denis (2005-06-03 11:16:00) [7]
2Digitman ©
не надо придираться, ладно?
ты предложил, я проверил и уточнил. по-моему нормальный рабочий диалог.

Denis (2005-06-03 11:15:00) [8]
чую я, пронумерую столбцы в заголовках и дело с концом.
но задача интересная... хотелось бы таки разобраться.

Digitman (2005-06-03 11:13:00) [9]

> Denis © (03.06.05 11:06) [4]

а мы тут догадываться должны, Eh там у тебя или не Eh ?
это так сложно было сразу уточнить ?

Denis (2005-06-03 11:06:00) [10]
Нету у моих гридов таких событий :)
Использую EhLib v3.6

TUser (2005-06-03 11:04:00) [11]
Ловить wm_hscroll и посылать его другому гриду? При этом, конечно, избежать бесконечной 'рекурсии'.

Pearled (2005-06-03 10:44:00) [12]
Попробуй использовать Leftcol в событии OnTopLeftChanged.

Digitman (2005-06-03 10:43:00) [13]
попробуй так

procedure TMyForm.dbgKTSSelectCell(Sender: TObject; ACol, ARow: Longint; var CanSelect: Boolean);
begin
if ARow <> dbgEdit.Row then
dbgEdit.SelectCell(dbgEdit.Col, ARow);
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »