Re: scrolling frame?

From: Shiro Kawai <shiro_at_squareusa.com>
Date: Fri, 01 Sep 2000 10:54:14 -1000 (HST)

If you're using STklos in your app, there's a <Scroll-Frame> composite
widget which takes care of scrolling its contents.

(require "Tk-classes")
(define f (make <Scroll-Frame>))
(dotimes (i 10)
  (let ((ff (make <Frame> :parent f)))
    (dotimes (j 10)
       (pack (make <Label> :parent ff :text "foo")))
    (pack ff)))
(pack f)

--
Shiro KAWAI
  Square USA Inc.   Honolulu Studio R&D division
#"The most important things are the hardest things to say" --- Stephen King

Received on Fri Sep 01 2000 - 22:55:43 CEST