diff --git a/collects/scribblings/gui/canvas-class.scrbl b/collects/scribblings/gui/canvas-class.scrbl index 16ee2c7c55..e5dee91ef9 100644 --- a/collects/scribblings/gui/canvas-class.scrbl +++ b/collects/scribblings/gui/canvas-class.scrbl @@ -91,7 +91,7 @@ The @scheme[gl-config] argument determines properties of an OpenGL } @defmethod[(get-scroll-page [which (one-of/c 'horizontal 'vertical)]) - (integer-in 1 1000000000)]{ + (integer-in 1 10000)]{ Get the current page step size of a manual scrollbar. The result is @scheme[0] if the scrollbar is not active or it is automatic. @@ -106,7 +106,7 @@ See also @defmethod[(get-scroll-pos [which (one-of/c 'horizontal 'vertical)]) - (integer-in 0 1000000000)]{ + (integer-in 0 10000)]{ Gets the current value of a manual scrollbar. The result is always @scheme[0] if the scrollbar is not active or it is automatic. @@ -121,7 +121,7 @@ See also @defmethod[(get-scroll-range [which (one-of/c 'horizontal 'vertical)]) - (integer-in 0 1000000000)]{ + (integer-in 0 10000)]{ Gets the current maximum value of a manual scrollbar. The result is always @scheme[0] if the scrollbar is not active or it is automatic. @@ -163,8 +163,8 @@ Gets the size in device units of the scrollable canvas area (as } -@defmethod[(init-auto-scrollbars [horiz-pixels (or/c (integer-in 1 1000000000) false/c)] - [vert-pixels (or/c (integer-in 1 1000000000) false/c)] +@defmethod[(init-auto-scrollbars [horiz-pixels (or/c (integer-in 1 10000) false/c)] + [vert-pixels (or/c (integer-in 1 10000) false/c)] [h-value (real-in 0.0 1.0)] [v-value (real-in 0.0 1.0)]) void?]{ @@ -202,12 +202,12 @@ See also } -@defmethod[(init-manual-scrollbars [h-length (or/c (integer-in 0 1000000000) false/c)] - [v-length (or/c (integer-in 0 1000000000) false/c)] - [h-page (integer-in 1 1000000000)] - [v-page (integer-in 1 1000000000)] - [h-value (integer-in 0 1000000000)] - [v-value (integer-in 0 1000000000)]) +@defmethod[(init-manual-scrollbars [h-length (or/c (integer-in 0 10000) false/c)] + [v-length (or/c (integer-in 0 10000) false/c)] + [h-page (integer-in 1 10000)] + [v-page (integer-in 1 10000)] + [h-value (integer-in 0 10000)] + [v-value (integer-in 0 10000)]) void?]{ Enables and initializes manual scrollbars for the canvas. A @@ -299,7 +299,7 @@ See also @defmethod[(set-scroll-page [which (one-of/c 'horizontal 'vertical)] - [value (integer-in 1 1000000000)]) + [value (integer-in 1 10000)]) void?]{ Set the current page step size of a manual scrollbar. (This method has @@ -316,7 +316,7 @@ See also @defmethod[(set-scroll-pos [which (one-of/c 'horizontal 'vertical)] - [value (integer-in 0 1000000000)]) + [value (integer-in 0 10000)]) void?]{ Sets the current value of a manual scrollbar. (This method has no @@ -336,7 +336,7 @@ See also @defmethod[(set-scroll-range [which (one-of/c 'horizontal 'vertical)] - [value (integer-in 0 1000000000)]) + [value (integer-in 0 10000)]) void?]{ Sets the current maximum value of a manual scrollbar. (This method has