Hello Stas, Thank you for your suggestion. I tried the code you showed me and it worked on its own, but when I tried to use : (setf (clim-extensions:list-pane-items list-pane) (loop for i from 0 to (- (list-length new-list) 1) collect (nth i new-list))) it still only displays half of the list. I collected just i and out of list of 3189, it only displays 1543 ( 0 - 1542 ). My list is of a bunch of strings. I am going to look through my code tomorrow and see what I did wrong. Would setting the key arguments when making the list pane affect adjusting the items? Items and value is set at nil, but mode is nonexclusive and test is #'string=. On Tue, Aug 7, 2012 at 5:52 PM, Stas Boukarev <stassats@gmail.com> wrote:
Try this instead:
(define-application-frame test () () (:menu-bar t) (:panes (list (make-pane 'list-pane))) (:layouts (default (scrolling (:scroll-bar :vertical) list))))
(define-test-command (com-add-items :name t :menu t) () (let ((list-pane (find-pane-named *application-frame* 'list))) (setf (clim-extensions:list-pane-items list-pane) (loop for i to 3000 collect i))))
(defun test () (run-frame-top-level (make-application-frame 'test)))
-- With best regards, Stas.