grid-layout?

How about this? How to get the last column to stay with the others?

(capi:contain (make-instance 'capi:grid-layout
                              :rows 3
                              ;:x-uniform-size-p t
                              ;:y-uniform-size-p t
                              :description
                              (loop for iv from 0 to 24 collect
                                    (make-instance 'capi:check-button
                                                   :text (format () "~a" 
iv))))
               :visible-min-width 800)

BTW: I am using LWM and OS X 10.3.4