set-top-level-interface-geometry

set-top-level-interface-geometry Generic Function

Summary

Sets the geometry of a top level interface.

Package

capi

Signature

set-top-level-interface-geometry interface &key x y width height

Arguments

`interface`⇩	A CAPI interface.
`x`⇩, `y`⇩, `width`⇩, `height`⇩
	Integers specifying the new geometry.

Description

The generic function set-top-level-interface-geometry sets the geometry of a top level interface.

The coordinates of interface are modified according to x, y, width and height. interface should be a top level interface. If a keyword is omitted then that part of the coordinates is not changed.

x and y are measured from the top-left of the screen rectangle representing the area of the primary monitor (the primary screen rectangle).

Notes

On Cocoa set-top-level-interface-geometry behaves as if an interface toolbar is not present, even if interface does contain an interface toolbar.

Examples

(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))