gfx:add-line

(gfx:add-line path x y)


Description:

Appends a line to the end of the given path


Arguments:

           path -- The path to append the line to

              x -- x coordinate to extend path to

              y -- y coordinate to extend path to


Returns: boolean


Examples:

(define *canvas* (gfx:make-canvas '(100 100 600 600)))

(define *path* (gfx:make-path))

(set-start-point *path* 0 0)

(add-line *path* 200 200)

(gfx:draw-path (now) *canvas* *path* '(0 0 1 1) '(1 0 0

  1) 10.0 *whole-path*)



Back to index