add to list-panel

1. The default initial value for the "items" slot of a list-panel is an
empty vector, but vector-push-extend on it signaled an error "#() is not of
type (SATISFIES ARRAY-HAS-FILL-POINTER-P)". Is there a simple function that
gets as input: a list-panel and an object, and adds the object to the items
of the list-panel at the end? At the beginning? (Is it documented?)

2. If I don't specify a reader for a pane inside an interface, is it ok to
access it with slot-value? What about (setf (slot-value ..)) ?

3. I remember that I saw once in the documentation some command which
initiates a demo program for CAPI, where each button launches another
example. I can't find it now. Is there such a thing?

Thanks,
Iddo

Re: add to list-panel

At 03:01 PM 25/07/2002 +0200, Iddo Lev wrote:
>2. If I don't specify a reader for a pane inside an interface, is it ok to
>access it with slot-value? What about (setf (slot-value ..)) ?

I use ":accessor <name>" for this, then access it via (setf 
(capi:<whatever> (<name> interface)) ...).  Is this what you wanted?
e.g.

(capi:define-interface project ()
   ()
   (:panes
     ...
    (debug-pane-1
     capi:collector-pane
     :accessor debug-pane
     :read-only t
     :pane-can-scroll t
     :horizontal-scroll t
     :vertical-scroll t)
     ...
    (text-input-pane-1
     capi:text-input-pane
     :accessor project-types)
    ...

  (setf (capi:editor-pane-text (debug-pane interface)) ""))
....
  (let ((text (capi:text-input-pane-text (project-types interface)))...
....
pt

Re: add to list-panel

Unable to parse email body. Email id is 483