suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

svn: r9469

Browse Source
This commit is contained in:
Matthias Felleisen 2008-04-25 00:48:31 +00:00
parent c88c7fd4c5
commit 1bf7d81a50
1 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
collects/teachpack/htdp/Docs/gui.scrbl
View File

@ -18,13 +18,15 @@ window on your computer screen.
@deftech{GUI-ITEM} A @tech{GUI-Item} is a data representation of an active
component of a window on your computer screen.
@defproc[(create-window [g (listof (listof (unsyntax @tech{GUI-ITEM})))]) Window]{
Creates a window from the ``matrix'' of gui items @scheme[g].}
@defproc[(window? [x any/c]) boolean?]{Is the given value a window?}
@defproc[(show-window [w Window]) true]{Shows @scheme[w].}
@defproc[(hide-window [w window]) true]{Hides @scheme[w].}
@defproc[(create-window [g (listof (listof (unsyntax @tech{GUI-ITEM})))]) Window]{
Creates a window from the ``matrix'' of gui items @scheme[g].}
@defproc[(make-button [label string>][callback (-> event% boolean)]) (unsyntax @tech{GUI-ITEM})]{Creates a
button with @scheme[label] and @scheme[callback] function. The latter
receives an argument that it may safely ignore.}
@ -52,8 +54,11 @@ Example 1:
@(begin
#reader scribble/comment-reader
(schemeblock
> (define w (create-window (list (list (make-button "QUIT" (lambda (e) (hide-window w)))))))
;; A button appears on the screen. Click on the button and it will disappear.
> (define w
(create-window
(list (list (make-button "QUIT" (lambda (e) (hide-window w)))))))
;; A button appears on the screen.
;; Click on the button and it will disappear.
> (show-window w)
;; The window disappears.
))
@ -75,7 +80,8 @@ Example 2:
(define (respond e)
(draw-message msg1 (string-append "Hello, " (text-contents text1))))
;; set up window with three "lines": a text field, a message, and two buttons
;; set up window with three "lines":
;; a text field, a message, and two buttons
;; fill in text and click OKAY
(define w
(create-window