pinboard-pane-size Accessor

Summary

Gets and sets the size of an object inside its parent pinboard-layout. This function is deprecated.

Package

capi

Signature

pinboard-pane-size self => width, height

setf (pinboard-pane-size self) (values width height) => width, height

Arguments

self⇩	A pinboard-object or a simple-pane.
width⇩, height⇩	Positive integers.

Values

width⇩, height⇩

Positive integers.

Description

The accessor pinboard-pane-size gets and sets the dimensions (width and height) of self as multiple values.

Examples

(let* ((po (make-instance 'capi:pinboard-object
                          :x 5 :y 5 
                          :width 5 :height 5
                          :graphics-args 
                          '(:background :red)))
       (pl (capi:contain 
            (make-instance 'capi:pinboard-layout 
                           :description (list po)
                           :visible-min-width 200
                           :visible-min-height 200))))
  (capi:execute-with-interface
   (capi:element-interface pl)
   #'(lambda(po)
       (dotimes (x 20)
         (mp:wait-processing-events 1)
         (let ((new-x (* (1+ x) 10))
               (new-y (* 5 (+ 2 x))))
           (setf (capi:pinboard-pane-size po)
                 (values new-x new-y)))))
   po))

Notes

pinboard-pane-size is deprecated, but is retained in this version for backwards compatibility. Please use static-layout-child-size instead. This does just the same.

See also

static-layout-child-size