Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];

Вниз

Как заставить 2 грида прокручивать столбцы синхронно?   Найти похожие ветки 

 
Denis ©   (2005-06-03 10:31) [0]

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


 
Digitman ©   (2005-06-03 10:43) [1]

попробуй так

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


 
Pearled ©   (2005-06-03 10:44) [2]

Попробуй использовать Leftcol в событии OnTopLeftChanged.


 
TUser ©   (2005-06-03 11:04) [3]

Ловить wm_hscroll и посылать его другому гриду? При этом, конечно, избежать бесконечной "рекурсии".


 
Denis ©   (2005-06-03 11:06) [4]

Нету у моих гридов таких событий :)
Использую EhLib v3.6


 
Digitman ©   (2005-06-03 11:13) [5]


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


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


 
Denis ©   (2005-06-03 11:15) [6]

чую я, пронумерую столбцы в заголовках и дело с концом.
но задача интересная... хотелось бы таки разобраться.


 
Denis ©   (2005-06-03 11:16) [7]

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


 
Digitman ©   (2005-06-03 11:25) [8]


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


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


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


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


 
Denis ©   (2005-06-03 11:40) [9]

сейчас скатим ветку в оффтоп...
Уважения у меня достаточно как к другим, так и к себе.
Я считаю твои претензии необоснованными. Я дал достаточно подробное описание проблемы. Может отдельным файлом ТЗ и описание инструментальных средств высылать? Или сменить грид, потому что совет уважаемого Digitmana подходит к другому?


 
Digitman ©   (2005-06-03 11:57) [10]


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


твое право.

но


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


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


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


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

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

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

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

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

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

так что


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


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


 
Digitman ©   (2005-06-03 12:05) [11]


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


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

http://delphimaster.net/view/1-1117781895/

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


 
Denis ©   (2005-06-03 12:23) [12]

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

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

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

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

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


 
Denis ©   (2005-06-03 12:28) [13]

:) Смотрел уже... Хорошего мало...



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.5 MB
Время: 0.04 c
1-1117914700
alex-drob
2005-06-04 23:51
2005.06.29
Все строки функции выполнятся?


4-1115369254
pavel_guzhanov
2005-05-06 12:47
2005.06.29
как определить размеры рисунка


1-1117652395
Ralf
2005-06-01 22:59
2005.06.29
PopUp


1-1118035496
СержК
2005-06-06 09:24
2005.06.29
Как запустить процедуру DBGrid4KeyPress(...


6-1112272722
spam
2005-03-31 16:38
2005.06.29
Как програмно узнать, что пришол пакет на опредилённый порт?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский