The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<HTML>
<HEAD>
<TITLE>Package Win32::GUI::Pen</TITLE>
<LINK REV="made" HREF="mailto:">
</HEAD>

<BODY>

<!-- INDEX BEGIN -->
<!--

<UL>

	<UL>

		<LI><A HREF="#Package_Win32_GUI_Pen">Package Win32::GUI::Pen</A>
		<UL>

			<LI><A HREF="#Constructor">Constructor</A>
			<LI><A HREF="#Methods">Methods</A>
		</UL>

	</UL>

</UL>
-->
<!-- INDEX END -->

<P>
<H2><A NAME="Package_Win32_GUI_Pen">Package Win32::GUI::Pen</A></H2>
<P>
<A HREF="././guipacks.html#">Back to the Packages</A>



<UL>
<LI>
<P>
<A HREF="#Constructor">Constructor</A>



<UL>
<LI>
<P>
<A HREF="#new_Win32_GUI_Pen_COLOR_OPT">new Win32::GUI::Pen(COLOR &#124; %OPTIONS)</A>



</UL>
<LI>
<P>
<A HREF="#Methods">Methods</A>



<UL>
<LI>
<P>
<A HREF="#Info_">Info()</A>



</UL>
</UL>
<P>
<HR>
<H3><A NAME="Constructor">Constructor</A></H3>
<A NAME="new_Win32_GUI_Pen_COLOR_OPT">

<DL>
<DT><STRONG><A NAME="item_new">new Win32::GUI::Pen(COLOR | %OPTIONS)</A></STRONG><DD>
<P>
Creates a new Pen object. Allowed <CODE>%OPTIONS</CODE> are:

<P>
<PRE>  -style =&gt;
    0 PS_SOLID
    1 PS_DASH
    2 PS_DOT
    3 PS_DASHDOT
    4 PS_DASHDOTDOT
    5 PS_NULL
    6 PS_INSIDEFRAME
  -width =&gt; number
  -color =&gt; COLOR
</PRE>
<P>

</DL>
<P>
<HR>
<H3><A NAME="Methods">Methods</A></H3>
<A NAME="Info_">

<DL>
<DT><STRONG><A NAME="item_Info">Info()</A></STRONG><DD>
<P>
Returns an associative array of information about the Pen object, with the
same options given when creating the Pen.

<P>

</DL>
</BODY>

</HTML>