All Manuals > CAPI User Guide and Reference Manual > 21 CAPI Reference Entries

NextPrevUpTopContentsIndex

static-layout-child-position

Generic Function
Summary

Gets and sets the location of an object inside its parent static-layout.

Package

capi

Signature

static-layout-child-position self => x , y

setf (static-layout-child-position self ) (values x y ) => x , y

Arguments

self

A static-layout or simple-pane.

Values

x , y

The horizontal and vertical coordinates in the static-layout parent of self .

Description

The generic function static-layout-child-position returns as multiple values x , y the coordinates of self inside its parent static-layout.

There is also a setf expansion which sets the location of self in its parent.

Example
(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:static-layout-child-position po)
                 (values new-x new-y)))))
   po))
See also

static-layout
static-layout-child-size


CAPI User Guide and Reference Manual (Unix version) - 25 Feb 2015

NextPrevUpTopContentsIndex