Подписаться на RSS рассылку
Главная » Статьи по Delphi » Компоненты » Синхронизация двух ScrollBar

Синхронизация двух ScrollBar

Автор:

Tweet

Создаем обработчики событий OnScroll для каждого компонента:

procedure TForm1.ScrollBar1Scroll(Sender: TObject; ScrollCode: TScrollCode;
  var ScrollPos: Integer);
begin
  ScrollBar2.Position:=ScrollPos;
end;

procedure TForm1.ScrollBar2Scroll(Sender: TObject; ScrollCode: TScrollCode;
  var ScrollPos: Integer);
begin
  ScrollBar1.Position:=ScrollPos;
end;

Просмотров: 5928

Обсудить на форуме


Имя *:
Email:


Код *:


Импонируют дешевые индивидуалки? Этот интим сайт http://prostitutkirostova24.men/myprice/100-1800/ поспособствует оформить с ними личную встречу, да еще и в пригодном для вас пространстве, по доступной стоимости. Убедитесь в его ценностях единолично. | Команда профессионалов ежедневно наполняет каталоги домашнего порно видео! На нашем сайте все видео ежедневно обновляется и каждый пользователь найдет для себя ролик по вкусу!

Copyright © 2008 - 2018 Программирование на Delphi для начинающих и не только.

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам.

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации.