superclass: object% | ||
|
An editor-canvas% object manages and displays a text% or pasteboard% object.
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
scrolls-per-page : (integer-in 1 10000) = 100 | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
wheel-step : (or/c (integer-in 1 10000) false/c) = 3 | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
line-count : (or/c (integer-in 1 1000) false/c) = #f | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
horizontal-inset : (integer-in 0 1000) = 5 | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
vertical-inset : (integer-in 0 1000) = 5 | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
enabled : any/c = #t | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
vert-margin : (integer-in 0 1000) = 0 | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
horiz-margin : (integer-in 0 1000) = 0 | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
min-width : (integer-in 0 10000) = graphical-minimum-width | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
min-height : (integer-in 0 10000) = graphical-minimum-height | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
stretchable-width : any/c = #t | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
stretchable-height : any/c = #t |
If a canvas is initialized with #f for editor, install an editor later with set-editor.
The style list can contain the following flags:
'no-border – omits a border around the canvas
'control-border – gives the canvas a border that is like a text-field% control
'combo – gives the canvas a combo button that is like a combo-field% control; this style is intended for use with 'control-border, 'hide-hscroll, and 'hide-vscroll
'no-hscroll – disallows horizontal scrolling and hides the horizontal scrollbar
'no-vscroll – disallows vertical scrolling and hides the vertical scrollbar
'hide-hscroll – allows horizontal scrolling, but hides the horizontal scrollbar
'hide-vscroll – allows vertical scrolling, but hides the vertical scrollbar
'auto-hscroll – automatically hides the horizontal scrollbar when unneeded (unless 'no-hscroll or 'hide-hscroll is specified)
'auto-vscroll – automatically hides the vertical scrollbar when unneeded (unless 'no-vscroll or 'hide-vscroll is specified)
'resize-corner – leaves room for a resize control at the canvas’s bottom right when only one scrollbar is visible
'deleted – creates the canvas as initially hidden and without affecting parent’s geometry; the canvas can be made active later by calling parent’s add-child method
'transparent – the canvas is “erased” before an update using it’s parent window’s background
While vertical scrolling of text editors is based on lines, horizontal scrolling and pasteboard vertical scrolling is based on a fixed number of steps per horizontal page. The scrolls-per-page argument sets this value.
If provided, the wheel-step argument is passed on to the wheel-step method. The default wheel step can be overridden globally though the 'MrEd:wheelStep preference; see Preferences.
If line-count is not #f, it is passed on to the set-line-count method.
If horizontal-inset is not 5, it is passed on to the horizontal-inset method. Similarly, if vertical-inset is not 5, it is passed on to the vertical-inset method.
For information about the enabled argument, see window<%>. For information about the horiz-margin and vert-margin arguments, see subarea<%>. For information about the min-width, min-height, stretchable-width, and stretchable-height arguments, see area<%>.
(send an-editor-canvas allow-scroll-to-last) → boolean? |
(send an-editor-canvas allow-scroll-to-last on?) → void? |
on? : any/c |
Enables or disables last-line scrolling, or gets the current enable state. If last-line scrolling is enabled, then an editor displayed in this canvas can be scrolled so that the last line of text is at the top of the canvas (or bottom of the canvas when bottom-based scrolling is enabled; see scroll-with-bottom-base). By default, an editor can only be scrolled until the last line is at the bottom (or top) of the canvas.
(send an-editor-canvas allow-tab-exit) → boolean? |
(send an-editor-canvas allow-tab-exit on?) → void? |
on? : any/c |
Gets or sets whether tab-exit is enabled for the editor canvas. When tab-exit is enabled, the user can move the keyboard focus out of the editor using the Tab and arrow keys, or invoke the default button using the Enter/Return key. By default, tab-exit is disabled.
When tab-exit is enabled for an editor canvas, Tab, arrow, and Enter keyboard events are consumed by a frame’s default on-traverse-char method. (In addition, a dialog’s default method consumes Escape key events.) Otherwise, on-traverse-char allows the keyboard events to be propagated to the canvas.
(send an-editor-canvas call-as-primary-owner f) → any |
Calls a thunk and returns the value. While the thunk is being called, if the canvas has an editor, the editor’s get-admin method returns the administrator for this canvas. This method is only useful when an editor is displayed in multiple canvases.
(send an-editor-canvas force-display-focus) → boolean? |
(send an-editor-canvas force-display-focus on?) → void? |
on? : any/c |
Enables or disables force-focus mode. In force-focus mode, the caret of the editor displayed in this canvas will always be visible, even when the canvas does not actually have the keyboard focus.
(send an-editor-canvas get-editor) |
→ (or/c (or/c (is-a?/c text%) (is-a?/c pasteboard%)) false/c) |
Returns the editor currently displayed by this canvas, or #f if the canvas does not have an editor.
(send an-editor-canvas get-line-count) |
→ (or/c (integer-in 1 1000) false/c) |
Returns a line count installed with set-line-count, or #f if no minimum line count is set.
(send an-editor-canvas horizontal-inset) |
→ (integer-in 1 10000) |
(send an-editor-canvas horizontal-inset step) → void? |
step : (integer-in 1 10000) |
Gets or sets the number of pixels within the canvas reserved to the left and right of editor content. The default is 5.
(send an-editor-canvas lazy-refresh) → boolean? |
(send an-editor-canvas lazy-refresh on?) → void? |
on? : any/c |
Enables or disables lazy-refresh mode, or gets the current enable state. In lazy-refresh mode, the canvas’s refresh method is called when the window needs to be updated, rather than on-paint. By default, an editor-canvas% object is not in lazy-refresh mode.
event : (is-a?/c key-event%) |
Overrides on-char in canvas<%>.
Handles 'wheel-up and 'wheel-down events by scrolling vertically. Otherwise, passes the event to the canvas’s editor, if any, by calling its on-char method.
See also get-editor.
event : (is-a?/c mouse-event%) |
Overrides on-event in canvas<%>.
Passes the event to the canvas’s editor, if any, by calling its on-event method.
See also get-editor.
on? : any/c |
Overrides on-focus in window<%>.
Enables or disables the caret in the display’s editor, if there is one.
Overrides on-paint in canvas<%>.
Repaints the editor.
| ||||||||||||||
width : (integer-in 0 10000) | ||||||||||||||
height : (integer-in 0 10000) |
Overrides on-size in window<%>.
If the canvas is displaying an editor, its on-display-size method is called.
| ||||||||||||||||||||||||||||||||||||||||||
localx : real? | ||||||||||||||||||||||||||||||||||||||||||
localy : real? | ||||||||||||||||||||||||||||||||||||||||||
refresh? : any/c | ||||||||||||||||||||||||||||||||||||||||||
bias : (one-of/c 'start 'end 'none) = 'none |
Requests scrolling so that the given region in the currently displayed editor is made visible.
The localx, localy, w, and h arguments specify a region of the editor to be made visible by the scroll (in editor coordinates).
If refresh? is not #f, then the editor is updated immediately after a successful scroll.
The bias argument is one of:
'start – if the range doesn’t fit in the visible area, show the top-left region
'none – no special scrolling instructions
'end – if the range doesn’t fit in the visible area, show the bottom-right region
The return value is #t if the display is scrolled, #f if not (either because the requested region is already visible, because the display has zero size, or because the editor is currently printing).
(send an-editor-canvas scroll-with-bottom-base) → boolean? |
(send an-editor-canvas scroll-with-bottom-base on?) → void? |
on? : any/c |
Enables or disables bottom-base scrolling, or gets the current enable state. If bottom-base scrolling is on, then scroll positions are determined by line boundaries aligned with the bottom of the viewable area (rather than with the top of the viewable area). If last-line scrolling is also enabled (see allow-scroll-to-last), then the editor is bottom-aligned in the display area even when the editor does not fill the viewable area.
| ||||||||||||||
edit : (or/c (or/c (is-a?/c text%) (is-a?/c pasteboard%)) false/c) | ||||||||||||||
redraw? : any/c = #t |
Sets the editor that is displayed by the canvas, releasing the current editor (if any). If the new editor already has an administrator that is not associated with an editor-canvas%, then the new editor is not installed into the canvas.
If redraw? is #f, then the editor is not immediately drawn; in this case, something must force a redraw later (e.g., a call to the on-paint method).
If the canvas has a line count installed with set-line-count, the canvas’s minimum height is adjusted.
(send an-editor-canvas set-line-count count) → void? |
count : (or/c (integer-in 1 1000) false/c) |
Sets the canvas’s graphical minimum height to display a particular number of lines of text. The line height is determined by measuring the difference between the top and bottom of a displayed editor’s first line. The minimum height is not changed until the canvas gets an editor. When the canvas’s editor is changed, the minimum height is recalculated.
If the line count is set to #f, then the canvas’s graphical minimum height is restored to its original value.
(send an-editor-canvas vertical-inset) → (integer-in 1 10000) |
(send an-editor-canvas vertical-inset step) → void? |
step : (integer-in 1 10000) |
Gets or sets the number of pixels within the canvas reserved above and below editor content. The default is 5.
(send an-editor-canvas wheel-step) |
→ (or/c (integer-in 1 10000) false/c) |
(send an-editor-canvas wheel-step step) → void? |
step : (or/c (integer-in 1 10000) false/c) |
Gets or sets the number of vertical scroll steps taken for one click of the mouse wheel via a 'wheel-up or 'wheel-down key-event%. A #f value disables special handling for wheel events (i.e., wheel events are passed on to the canvas’s editor).