ScrollRate Property

Purpose

Returns or sets a value that specifies the number of months that are scrolled when the user clicks one of the scroll buttons in a MonthView Ocx.

Syntax

MonthView.ScrollRate [= number]

Description

The ScrollRate property specifies the number of months that are scrolled at once. The ScrollRate property allows the user to scroll more than one month at a time.

Example

Local Int32 h, w, w1

OpenW 1

Ocx MonthView mvw

~mvw.ComputeControlSize(1, 1, w, h) : w1 = TextWidth("Scroll Rate: ")

Ocx Label lbl = "Scroll Rate:", w + 20, 10, w1, 14

Ocx TextBox tb = "", w + w1 + 20, 10, 60, 14 : .BorderStyle = 1 ': .ReadOnly = True

Ocx UpDown up : up.BuddyControl = tb : .Increment = 1 : .Min = 1 : .Max = 12 : .Value = mvw.ScrollRate

Do : Sleep : Until Win_1 Is Nothing

 

Sub up_Change

mvw.ScrollRate = up.Value

EndSub

See Also

MonthView

{Created by Sjouke Hamstra; Last updated: 22/10/2014 by James Gaite}