NextPrevUpTopContentsIndex

arrow-pinboard-object

Class
Summary

A pinboard-object that draws itself as an arrow.

Package

capi

Superclasses

line-pinboard-object

Subclasses

double-headed-arrow-pinboard-object
labelled-arrow-pinboard-object

Initargs

:head

A keyword specifying the position of the arrowhead on the line.

:head-direction

A keyword specifying the direction of the arrowhead.

:head-length

The length of the arrowhead.

:head-breadth

The breadth of the arrowhead, or nil .

:head-graphics-args

A graphics args plist.

Description

An instance of the class arrow-pinboard-object is a pinboard-object that draws itself as an arrow.

head must be :end , :middle or :start . The default is :end .

head-direction must be :forwards , :backwards or :both . The default is :forwards .

head-length is the length of the arrowhead in pixels. It defaults to 12.

head-breadth is the breadth of the arrowhead in pixels, or nil which means that the breadth is half of head-length . The default is nil .

head-graphics-args is a plist of graphics state parameters and values used when drawing the arrow head. For information about the graphics state, see the section "Graphics State" in the LispWorks CAPI User Guide .

Example
(capi:contain
 (make-instance
  'capi:pinboard-layout
  :description
  (list
   (make-instance 'capi:arrow-pinboard-object 
                  :start-x 5 :start-y 10 
                  :end-x 105 :end-y 60 )
   (make-instance 'capi:arrow-pinboard-object 
                  :start-x 5 :start-y 110 
                  :end-x 105 :end-y 160 
                  :head :middle)
   (make-instance 'capi:arrow-pinboard-object
                  :start-x 5 :start-y 210 
                  :end-x 105 :end-y 260
                  :head-direction :both )
   (make-instance 'capi:arrow-pinboard-object 
                  :start-x 5 :start-y 310 
                  :end-x 105 :end-y 360
                  :head-graphics-args 
                  '(:foreground :pink)
                  :head-length 30)
   (make-instance 'capi:arrow-pinboard-object 
                  :start-x 5 :start-y 410 
                  :end-x 105 :end-y 460  
                  :head-length 30 :head-breadth 5)
   (make-instance 'capi:arrow-pinboard-object 
                  :start-x 5 :start-y 510 
                  :end-x 105 :end-y 560 
                  :head-breadth 10 
                  :head-direction :backwards))
  :visible-min-width 120
  :visible-min-height 620))

LispWorks CAPI Reference Manual - 17 Mar 2008

NextPrevUpTopContentsIndex