Граф наследования:Pager:
Свойства | |
IDispatch *RW | Control [] |
Свойство определяет дочерний компонент, содержимое которого прокручивает контейнер. | |
VARIANT_BOOL RW | Vertical [] |
Свойство определяет ориентацию компонента, является ли она вертикальной. | |
ULONG RW | ButtonSize [] |
Свойство определяет размер кнопок прокрутки. | |
LONG RW | Position [] |
Свойство определяет текущую позицию прокрутки. |
Контейнер позволяет прокручивать содержимое дочернего компонента с помощью кнопок прокрутки. Дочерний компонент, содержимое которого прокручивает контейнер определяется свойством Control, которое автоматически заполняется при создании первого дочернего компонента.
События: компонент вызывает событие OnChange при прокрутке.
Создание: Компонент можно создать методом CreatePager класса Frame.
o = new ActiveXObject("Scripting.WindowSystemObject") o.EnableVisualStyles = true f = o.CreateForm(0,0,0,0) f.Text = "WSO" f.ClientWidth = 300 f.ClientHeight = 200 f.CenterControl() Pager = f.CreatePager(10,10,150,150) Frame = Pager.CreateFrame(0,0,1000,1000) Frame.ParentColor = false Frame.CreateButton(10,20,75,35,"Button A") Frame.CreateButton(10,60,75,35,"Button B") Frame.CreateButton(10,100,75,35,"Button C") Frame.CreateButton(10,140,75,35,"Button D") Pager.ButtonSize = 20 Pager.BorderWidth = 10 Pager.Position = 10 Pager.Color = 0x00EEAA00 f.TextRect(170,70,100,100,"Use mouse to scroll Pager") with (f.Line(170,20,200,60)) { Pen.Color = 0x000000FF Pen.Width = 3 } with (f.Line(170,150,200,100)) { Pen.Color = 0x000000FF Pen.Width = 3 } f.Show() o.Run()
ULONG RW ButtonSize |
Свойство определяет размер кнопок прокрутки.
IDispatch* RW Control |
Свойство определяет дочерний компонент, содержимое которого прокручивает контейнер.
LONG RW Position |
Свойство определяет текущую позицию прокрутки.
VARIANT_BOOL RW Vertical |
Свойство определяет ориентацию компонента, является ли она вертикальной.
Значение по умолчанию: "TRUE".