Hi,

I needed scrolled-frame, too and checked it out, but the code posted by Russell McManus doesn't work for me, event after the corrections pointed out by Peter Herth: I get an error that "NIL is not a one of integer, float or rational" (with clisp-2.43 on Windows XP and LTK-0.91). This error is signaled in tk-number, itself called by the place function call in

(defmethod initialize-instance :after ((sf scrolled-frame) &key) ... (place (interior sf) 0 0) ...)

because the width and height &key parameters in the method place default to NIL. I have fixed it locally as follows:

(defmethod place (widget x y &key width height) (format-wish "place ~A -x ~A -y ~A~@[ -width ~a~]~@[ -height ~a~]" (widget-path widget) (tk-number x) (tk-number y) (and (numberp width) (tk-number width)) (and (numberp height) (tk-number height))) widget)

As Peter Herth said, the scrolling behaviour is bit strange, but I have Tcl code that improves this. I will plug it into the initialize-instance method of the scrolled-frame and submit it once it fits together.

Regards,

Philippe Crama

____________________________________________________________________________________ Be a better friend, newshound, and know-it-all with Yahoo! Mobile. Try it now. http://mobile.yahoo.com/;_ylt=Ahu06i62sR8HDtDypao8Wcj9tAcJ