Ответ: (+) («Телесистемы»: Конференция «Микроконтроллеры и их применение»)

Разработка, производство и продажа радиоэлектронной аппаратуры

| Карта сайта | Пишите нам | В избранное

Требуется программист в Зеленограде
- обработка данных с датчиков; ColdFire; 40 тыс.
e-mail:jobsmp@pochta.ru

Телесистемы | Электроника | Конференция «Микроконтроллеры и их применение»

Ответ: (+)

Отправлено XR63 05 декабря 2006 г. 18:28
В ответ на: Кто подскажет, как программно прокрутить TScrollBar (например, в Delphi) ? отправлено <font color=gray>vinogradov aleksei</font> 05 декабря 2006 г. 18:24

Компонент TScrollBar
TObject->TPersistent->TComponent-”TControl->TWinControl-^TScrollBar
Модуль STDCTRLS
Страница Палитры компонентов Standard
TScrollBar представляет собой стандартный бегунок Windows. В таблице перечислены свойства этого компонента:
(Pb) property Kind: TScrollBarKind; ScrollBarKind = (sbHorizontal, sbVertical) ; Задает один из предопределенных типов бегунка: горизонтальный (по умолчанию) или вертикальный.
(Pb) property Max: Integer; Максимальное значение положения бегунка.
(Pb) property Min: Integer; Минимальное значение положения бегунка.
(РЫ property Position: Integer; Текущее положение бегунка.
procedure SetParams(APosition, AMin, AMax: Integer); Устанавливает сразу положение и пределы изменения бегунка. Если AMax(РЙ property LargeChange: TScrollBarInc; TScroll Bar Inc=l...32767; "Большой" сдвиг бегунка. Применяется при перемещении на одну страницу. Осуществляется при щелчке мышью по поверхности компонента с соответствующей стороны или при нажатии или .
(РЬ) property SmallChange: TScrollBarInc; "Малый" сдвиг бегунка. Применяется при перемещениях на одну линию: при щелчке на кнопках со стрелками на концах бегунка или нажатии клавиш управления курсором.

Событие
(Pb) property OnScroll: TScrollEvent;
TScrollEvent = procedure(Sender: TObject; ScrollCode:
TScrollCode; var ScrollPos: Integer) of object;
вызывается при каждом изменеюш положения бегунка. Обработчик же события OnChange вызывается внутри метода SetParams при изменении значений Мах, Min и Position. ScrollCode — вид перемещения бегунка:
TScrollCode = (scLineUp, scLineDown, scPageUp, scPageDown, scPosition, scTrack, scTop, scBottorn, scEndScroll) ;
scLineUp, scLineDown — на строку вверх/вниз;
scPageUp, scPageDown — на страницу вверх/вниз;
scPosition, scTrack — в заданную позицию;
scTop, scBottom — в крайнее верхнее/нижнее положение;
scEndScroll — извещает об окончании процесса прокрутки.
В параметре ScrollPos программисту передается новое положение бегунка. При необходимости, его можно изменить.

Составить ответ | Вернуться на конференцию

Ответы

Все, спасибо. Разобрался. Надо было использовать OnChange ... — vinogradov aleksei (05.12.2006 18:35 91.124.72.94, пустое)
- а может все-таки йаду ? — DASM (05.12.2006 19:05 212.58.192.14, пустое)
  - А это поможет ? :) — vinogradov aleksei (05.12.2006 20:19 91.124.72.94, пустое)

Перейти к списку ответов | Конференция | Раздел "Электроника" | Главная страница | Карта сайта

Ответ: (+)

Ответы

Отправка ответа