Provided by: libgraphics-primitive-perl_0.67-1_all
Graphics::Primitive::Path - Collection of primitives
Graphics::Primitive::Path is a shape defined by a list of primitives.
use Graphics::Primitive::Path; my $path = Graphics::Primitive::Path->new(); $path->add_primitive($line); $path->move_to($point);
Constructor new Creates a new Graphics::Primitive::Path Instance Methods add_primitive ($prim) Add a primitive to this Path. arc ($radius, $start, $end, [ $skip_line_to ]) $path->arc($radius, $start_angle_in_radians, $end_angle_in_radians); Draw an arc based at the current point with the given radius from the given start angle to the given end angle. A line will be drawn from the current_point to the start point of the described arc. If you do not want this to happen, supply a true value as the last argument. clear_current_point Clears the current point on this Path. clear_primitives Clears all primitives from this Path. NOTE: This does not clear the current point. close_path Close the current path by drawing a line from the current_point back to the first point in the path. contiguous Flag this path as being contiguous at this point. Continuity is important so some path-based drivers such as Cairo. You should not mess with this attribute unless you know what you are doing. It's used for driver hinting. current_point Returns the current -- or last -- point on this Path. curve_to ($control1, $control2, $end) Creates a cubic Bezier curve from the current point to the $end point using $control1 and $control2 as control points. ellipse ($width, $height, [ $skip_line_to ]) Creates an ellipse at the current point with the specified width and height. Optional last argument, if true, skips drawing a line to the ellipse's starting point. get_points Get this path as a series of points. get_primitive Returns the primitive at the specified offset. hints List of hint hashrefs. This hint arrayref matches the primitives arrayref one-to-one. Hints are tidbits of information that may assist drivers in optimizing (or successfully handling) primitives in this path's list. You should not mess with this structure unless you know what you are doing. line_to ($point | $x, $y) Draw a line from the current point to the one provided. Accepts either a Geoemetry::Primitive::Point or two arguments for x and y. move_to ($point | $x, $y) Move the current point to the one specified. This will not add any primitives to the path. Accepts either a Geoemetry::Primitive::Point or two arguments for x and y. primitive_count Returns the number of primitives on this Path. rectangle ($width, $height) Draw a rectangle at current_position of the specified width and height. rel_curve_to ($x1, $y1, $x2, $y2, $x3, $y3) Creates a cubic Bezier curve from the current point using the provided values as offsets: start = current point control1 = current point + $x1,$y1 control1 = current point + $x2,$y2 end = current point + $x3,$y3 rel_line_to ($x_amount, $y_amount) Draw a line by adding the supplied x and y values to the current one. For example if the current point is 5,5 then calling rel_line_to(2, 2) would draw a line from the current point to 7,7. rel_move_to ($x_amount, $y_amount) Move to a new point by adding the supplied x and y values to the current ones.
Cory Watson <email@example.com>
COPYRIGHT & LICENSE
Copyright 2008-2010 by Cory G Watson. You can redistribute and/or modify this code under the same terms as Perl itself.