The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Graphics::Primitive::Border - Line around components

DESCRIPTION

Graphics::Primitive::Border describes the border to be rendered around a component.

SYNOPSIS

  use Graphics::Primitive::Border;

  my $border = Graphics::Primitive::Border->new;

METHODS

Constructor

new

Creates a new Graphics::Primitiver::Border. Borders are composed of 4 brushes, one for each of the 4 sides. See the documentation for Graphics::Primitive::Brush for more information.

Instance Methods

bottom

The brush representing the bottom border.

clone

Close this border.

color

Set the Color on all 4 borders to the one supplied. Shortcut for setting it with each side.

dash_pattern

Set the dash pattern on all 4 borders to the one supplied. Shortcut for setting it with each side.

equal_to ($other)

Returns 1 if this border is equal to the one provided, else returns 0.

homogeneous

Returns 1 if all of this border's sides are the same. Allows for driver optimizations.

left

The brush representing the left border.

not_equal_to

Opposite of equal_to.

The brush representing the right border.

top

The brush representing the top border.

width

Set the width on all 4 borders to the one supplied. Shortcut for setting it with each side.

AUTHOR

Cory Watson, <gphat@cpan.org>

Infinity Interactive, http://www.iinteractive.com

BUGS

Please report any bugs or feature requests to bug-geometry-primitive at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Geometry-Primitive. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

COPYRIGHT & LICENSE

Copyright 2008 by Infinity Interactive, Inc.

http://www.iinteractive.com

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.