Handbook
Glossary
build-header-scroller ( scroller -- scroller )
Vocabulary
ui
.
gadgets
.
scrollers
.
private
Inputs
scroller
an
object
Outputs
scroller
an
object
Definition
USING:
accessors
kernel
ui.gadgets.grids
;
IN:
ui.gadgets.scrollers.private
:
build-header-scroller
( scroller -- scroller )
dup
<column-header-viewport>
{
0 0
}
grid-add
dup
x>>
{
0 2
}
grid-add
dup
y>>
{
1 1
}
grid-add
dup
viewport>>
{
0 1
}
grid-add
;
inline