The coordinates of interface are modified according to the keyword arguments passed. The value of interface should be a top level interface. If a keyword is omitted then that part of the coordinates is not changed.
(setf ii
(capi:element-interface
(capi:contain
(make-instance 'capi:text-input-pane))))
(multiple-value-bind (x y width height)
(capi:top-level-interface-geometry ii)
(capi:execute-with-interface
ii
'capi:set-top-level-interface-geometry
ii
:x (round (+ x (/ width 4)))
:y y
:width (round (* 0.75 width))
:height height))
top-level-interface-p
top-level-interface-geometry
top-level-interface-display-state
interface