.
original commit: db6c11502f6f5720b7fa3f241a7e51e59a336561
This commit is contained in:
parent
aac0946eb3
commit
a2718fa0d4
|
@ -248,7 +248,11 @@
|
|||
|
||||
(values l il))))
|
||||
|
||||
(define b (make-object button% "He&llo" ip void))
|
||||
(define b (make-object button% "He&llo" ip
|
||||
(lambda (b e)
|
||||
(send b enable #f)
|
||||
(sleep/yield 5)
|
||||
(send b enable #t))))
|
||||
|
||||
(define ib (make-object button% bb-bmp ip void))
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user