gfx:set-start-point

(gfx:set-start-point path x y)


Description:

Sets the starting point for a path


Arguments:

           path -- path

              x -- x coordinate

              y -- y coordinate


Returns: boolean


Related: gfx:close-path gfx:make-path gfx:add-line gfx:add-oval gfx:add-text gfx:add-curve 


Examples:

; Create and return a square path object.

; A path is made up of line segments.

(define draw-square

   (lambda (x y size)

      (let ((path (gfx:make-path)))

      (gfx:set-start-point path x y)

      (gfx:add-line path x (+ y size))

      (gfx:add-line path (+ x size) (+ y size))

      (gfx:add-line path (+ x size) y)

      (gfx:add-line path x y)

        (gfx:close-path path)

      path)))



Back to index