Page 174	Table of Contents	Index	Page 176
	Chapters
	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30 A, B, C, D, E

Chapter 19

Bordered Output

CLIM provides a mechanism for surrounding arbitrary output with some kind of a border. The
programmer annotates some output-generating code with an advisory macro that describes the
type of border to be drawn. The following code produces the output shown in Figure 19.1.
For example, the following produces three pieces of output, surrounded by a rectangular, high-
lighted with a dropshadow, and underlined, respectively.

 
 (defun border-test (stream)
   (fresh-line stream)
   (surrounding-output-with-border (stream :shape :rectangle)
     (format stream "This is some output with a rectangular border"))
   (terpri stream) (terpri stream)
   (surrounding-output-with-border (stream :shape :drop-shadow)
     (format stream "This has a drop-shadow under it"))
   (terpri stream) (terpri stream)
   (surrounding-output-with-border (stream :shape :underline)
     (format stream "And this output is underlined")))

Figure 19.1: Examples of bordered output.

Page 174	Table of Contents	Index	Page 176
	Chapters
	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30 A, B, C, D, E