![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Синхронизация двух ScrollBox [D6, WinXP]
Gurd © (2008-09-26 15:26:00)Есть два ScrollBox при изменении 1-го ScrollBar нужно автоматическое изменение 2-го, никак не пойму через что это реализовать, в событиях srollBox нет например onScroll. Подскажите через что это можно сделать.
Vlad Oshin (2008-09-26 16:16:00) [21]тогда прошу прощения
Gurd (2008-09-26 16:10:00) [22]Простите, может я чегото не понимаю но у компонента srollBox нет события onScrollпро которое описано в поисе по яндексу
{это статья из предложенной ссылки}
Решить задачу помогут обработчики событий OnScroll(в данном примере два компонента ScrollBox (ScrollBar1 и ScrollBar2) расположены на форме TMainForm):
procedure TMainForm.ScrollBar1Scroll(Sender: TObject;
ScrollCode: TScrollCode; var ScrollPos: Integer);
begin
ScrollBar2.Position:=ScrollPos;
end;
procedure TMainForm.ScrollBar2Scroll(Sender: TObject;
ScrollCode: TScrollCode; var ScrollPos: Integer);
begin
ScrollBar1.Position := ScrollPos;
end;
Или может я не правильно изложил задачу?
{RASkov} (2008-09-26 16:09:00) [23]> [0] Gurd (26.09.08 15:26)
Лови сообщения WM_H{V}SCROLL у первого и шли их второму....
{RASkov} (2008-09-26 16:00:00) [24]> [1] Vlad Oshin © (26.09.08 15:47)
> просто забил тему
Посмотри найденные результаты :)
Все как один.... дурдом)
Vlad Oshin (2008-09-26 15:47:00) [25]просто забил тему
http://yandex.ru/yandsearch?rpt=rad&text=%D0%A1%D0%B8%D0%BD%D1%85%D1%80%D0%BE%D0%BD%D0%B8%D0%B7%D0%B0%D1%86%D0%B8%D1%8F%20%D0%B4%D0%B2%D1%83%D1%85%20ScrollBox%20