Delphi

Разработка сайтов

Наши проекты

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

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

Автор: Борисов Сергей

Создаем обработчики событий 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;

KM 5600

Вытяжки, варочные панели, духовые шкафы. Условия кредита, доставки.

shop-miele.ru
Сварка труб

Предызолированные ППУ трубы. Металлообрабатывающее оборудование.

toolprofi.ru

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

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