Lisp HUG Maillist Archive

Very stupid CAPI question: moving a PINBOARD-OBJECT

Hi

How do I move a pinboard object?  I have it stashed in a variable and 
in the layout-description slot.
Do I have to write something like

	(defmethod move ((pb pinboard-object) new-x new-y)
	  (with-geometry pb (setf %x% new-x %y% new-y))

?

That does not seem to quite work.  I suppose I need to force a redraw 
of the thing.

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: Very stupid CAPI question: moving a PINBOARD-OBJECT

Sorry

I now see that is does work!

Marco

On Thursday, Aug 7, 2003, at 12:32 America/New_York, Marco Antoniotti  
wrote:

> Hi
>
> How do I move a pinboard object?  I have it stashed in a variable and  
> in the layout-description slot.
> Do I have to write something like
>
> 	(defmethod move ((pb pinboard-object) new-x new-y)
> 	  (with-geometry pb (setf %x% new-x %y% new-y))
>
> ?
>
> That does not seem to quite work.  I suppose I need to force a redraw  
> of the thing.
>
> 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
> _______________________________________________________________________ 
> _
>
--
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: Very stupid CAPI question: moving a PINBOARD-OBJECT

(setf (capi:pinboard-pane-position object) (values new-x new-y))

(setf (capi:pinboard-pane-size object) (values new-w new-h))

(capi:manipulate-pinboard pinboard new-object :add-top)

(capi:manipulate-pinboard pinboard object :delete)

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
________________________________________________________________________

Updated at: 2020-12-10 08:59 UTC