Term::Stool::ScUser(Contributed Perl DocumeTerm::Stool::Screen(n) NAME Term::Stool::Screen - represents the whole screen SYNOPSIS use Term::Stool::Screen; use Term::Stool::Window; use Term::Stool::Button; $s=Term::Stool::Screen->new; $b=Term::Stool::Button->new(text => "Ok", xoffset => 4, yoffset => 4, width => 4); $w=Term::Stool::Window->new(title => "Hello, World!", xoffset=>10, yoffset=>2, height=>17, width=>40); $w->inside->add($b); $s->add($w); $s->run($b); $s->reset; DESCRIPTION This widget represents the whole screen. It is a container of course, so you can place windows and so on inside it. This widget should only be used as a top-level widget; ie, it should not be inside other widgets. Term::Stool::Container is the parent of this class. FIELDS initialized Set if S-Lang is initialized. width The screen width. Updated automatically. height The screen height. Updated automatically. desktop The color of the screen; ie, the desktop color. A Term::Stool::Color object. Color tag must be "desk- top". METHODS init Sets the background color to a default. x Always 0. y Always 0. display This does a standard screen redisplay. Doesn't guar- entee the whole screen is painted, though. force_display This forces the whole display to be repainted, even if slang doesn't think it has changed. refresh This just has slang write all pending changes to the screen. resize This method is automatically called when the screen is resized. It normally forces a full screen redraw, but if a parameter is passed, that can be avoided. suspend This method handles suspending everything. continue This is a CONT signal handler. init Initializes and sets up slang. Registers SIGWINCH han- dler and so forth. Generally, you don't need to call this by hand; any methods that require slang is initialized will call it for you. run This is the main event processing loop. Pass in the widget that should get focus. The event loop works like this: Wait for a keystroke. If the active widget has a keypress_hook, call it. If that fails, send the data to the active widget's key- press method. If either of the above return EXITLOOP, then the event loop is exited. Otherwise, it continues. reset This method resets the display to normal mode. keypress ctrl-r can be used to force a screen refresh. AUTHOR Joey Hess <joey@kitenet.net> 2001-05-23 perl v5.6.1 Term::Stool::Screen(n)