Gets and sets the location of an object inside its parent pinboard-layout. This function is deprecated.
capi
pinboard-pane-position self => x, y
setf (pinboard-pane-position self) (values x y) => x, y
self⇩ |
A pinboard-object or simple-pane. |
The horizontal and vertical coordinates in the pinboard-layout parent of self. |
The horizontal and vertical coordinates in the pinboard-layout parent of self. |
The accessor pinboard-pane-position
gets and sets the coordinates (x and y) of self inside its parent pinboard-layout as multiple values.
(let* ((po (make-instance 'capi:item-pinboard-object :text "5x5" :x 5 :y 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:item-text po) (format nil "~ax~a" new-x new-y)) (setf (capi:pinboard-pane-position po) (values new-x new-y))))) po))
pinboard-pane-position
is deprecated, but is retained in this version for backwards compatibility. Please use static-layout-child-position instead. This does just the same.
CAPI User Guide and Reference Manual (Unix version) - 01 Dec 2021 19:32:42