CAPI Toolbars

As you see, today I am working with CAPI a lot :)

I am trying to get a toolbar up and running.

I try something like

(define-interface zut () ()
    (:panes (tb-1 toolbar :items (list :std-file-open))) ...)

and it works.  But suppose I want something more complicated in the 
items list, like a TOOLBAR-BUTTON.

If I try

(define-interface zot () ()
    (:panes (tb-b toolbar-button :image :std-file-open)
                  (tb-1 toolbar :items (list tb-b))) ...)

I get a SLOT-UNBOUND error for TB-B.

Shall i resort to an after method on INITIALIZE-INSTANCE to achieve the 
desired result?

Cheers

--
Marco Antoniotti
NYU Courant Bioinformatics Group		tel. +1 - 212 - 998 3488
715 Broadway 10th FL				fax. +1 - 212 - 998 3484
New York, NY, 10003, U.S.A.


________________________________________________________________________
This email has been scanned for all viruses by the MessageLabs Email
Security System. For more information on a proactive email security
service working around the clock, around the globe, visit
http://www.messagelabs.com
________________________________________________________________________

Re: CAPI Toolbars

Its probably something like,

(define-interface zot () ()
     (:panes
        (tb-1 toolbar :items (list (make-instance 'toolbar-button :image
:std-file-open)))))

Wade


----- Original Message ----- 
From: "Marco Antoniotti" <marcoxa@cs.nyu.edu>
To: <lisp-hug@xanalys.com>
Sent: Thursday, August 07, 2003 2:53 PM
Subject: CAPI Toolbars


| As you see, today I am working with CAPI a lot :)
|
| I am trying to get a toolbar up and running.
|
| I try something like
|
| (define-interface zut () ()
|     (:panes (tb-1 toolbar :items (list :std-file-open))) ...)
|
| and it works.  But suppose I want something more complicated in the
| items list, like a TOOLBAR-BUTTON.
|
| If I try
|
| (define-interface zot () ()
|     (:panes (tb-b toolbar-button :image :std-file-open)
|                   (tb-1 toolbar :items (list tb-b))) ...)
|
| I get a SLOT-UNBOUND error for TB-B.
|
| Shall i resort to an after method on INITIALIZE-INSTANCE to achieve the
| desired result?
|
| Cheers
|
| --
| Marco Antoniotti
| NYU Courant Bioinformatics Group tel. +1 - 212 - 998 3488
| 715 Broadway 10th FL fax. +1 - 212 - 998 3484
| New York, NY, 10003, U.S.A.
|
|
| ________________________________________________________________________
| This email has been scanned for all viruses by the MessageLabs Email
| Security System. For more information on a proactive email security
| service working around the clock, around the globe, visit
| http://www.messagelabs.com
| ________________________________________________________________________


________________________________________________________________________
This email has been scanned for all viruses by the MessageLabs Email
Security System. For more information on a proactive email security
service working around the clock, around the globe, visit
http://www.messagelabs.com
________________________________________________________________________

Re: CAPI Toolbars

On Thursday, Aug 7, 2003, at 17:13 America/New_York, Wade Humeniuk 
wrote:

> Its probably something like,
>
> (define-interface zot () ()
>      (:panes
>         (tb-1 toolbar :items (list (make-instance 'toolbar-button 
> :image
> :std-file-open)))))

I thought so.  Not very declarative.  Oh well.

Marco
--
Marco Antoniotti
NYU Courant Bioinformatics Group		tel. +1 - 212 - 998 3488
715 Broadway 10th FL				fax. +1 - 212 - 998 3484
New York, NY, 10003, U.S.A.

________________________________________________________________________
This email has been scanned for all viruses by the MessageLabs Email
Security System. For more information on a proactive email security
service working around the clock, around the globe, visit
http://www.messagelabs.com
________________________________________________________________________

Re: CAPI Toolbars

Hmm, here's what I found in my code - does it help?

(:panes
    (toolbar-1
     capi:toolbar
     :items '(file-new file-open file-save)
     :tooltips '("New" "Open" "Save")
     :images '(6 7 8)
     :callbacks '(toolbar-file-new toolbar-file-open toolbar-file-save)
     :callback-type :data-interface)
....

pt


________________________________________________________________________
This email has been scanned for all viruses by the MessageLabs Email
Security System. For more information on a proactive email security
service working around the clock, around the globe, visit
http://www.messagelabs.com
________________________________________________________________________

Re: CAPI Toolbars

Yes.  That would work.

It just seems that you cannot refer to a pane in the :items list, like  
you would do for the layout :description.  It is a matter of  
initializations.

Not such a big problem, but you have to figure it out by trial and  
error.

Cheers

marco

On Thursday, Aug 7, 2003, at 18:10 America/New_York, Paul Tarvydas  
wrote:

> Hmm, here's what I found in my code - does it help?
>
> (:panes
>    (toolbar-1
>     capi:toolbar
>     :items '(file-new file-open file-save)
>     :tooltips '("New" "Open" "Save")
>     :images '(6 7 8)
>     :callbacks '(toolbar-file-new toolbar-file-open toolbar-file-save)
>     :callback-type :data-interface)
> ...
>
> pt
>
>
> _______________________________________________________________________ 
> _
> This email has been scanned for all viruses by the MessageLabs Email
> Security System. For more information on a proactive email security
> service working around the clock, around the globe, visit
> http://www.messagelabs.com
> _______________________________________________________________________ 
> _
>
--
Marco Antoniotti
NYU Courant Bioinformatics Group		tel. +1 - 212 - 998 3488
715 Broadway 10th FL				fax. +1 - 212 - 998 3484
New York, NY, 10003, U.S.A.

________________________________________________________________________
This email has been scanned for all viruses by the MessageLabs Email
Security System. For more information on a proactive email security
service working around the clock, around the globe, visit
http://www.messagelabs.com
________________________________________________________________________