home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / zkuste / Perl / ActivePerl-5.6.0.613.msi / 䆊䌷䈹䈙䏵-䞅䞆䞀㡆䞃䄦䠥 / _a7bb2d0b2125e09e2daf0ffb947d0cef < prev    next >
Text File  |  2000-03-23  |  3KB  |  88 lines
  1.  
  2. <HTML>
  3. <HEAD>
  4. <TITLE>Tk::Derived - Base class for widgets derived from others</TITLE>
  5. <LINK REL="stylesheet" HREF="../../../Active.css" TYPE="text/css">
  6. <LINK REV="made" HREF="mailto:">
  7. </HEAD>
  8.  
  9. <BODY>
  10. <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%>
  11. <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc">
  12. <STRONG><P CLASS=block> Tk::Derived - Base class for widgets derived from others</P></STRONG>
  13. </TD></TR>
  14. </TABLE>
  15.  
  16. <A NAME="__index__"></A>
  17. <!-- INDEX BEGIN -->
  18.  
  19. <UL>
  20.  
  21.     <LI><A HREF="#name">NAME</A></LI><LI><A HREF="#supportedplatforms">SUPPORTED PLATFORMS</A></LI>
  22.  
  23.     <LI><A HREF="#synopsis">SYNOPSIS</A></LI>
  24.     <LI><A HREF="#description">DESCRIPTION</A></LI>
  25.     <LI><A HREF="#see also">SEE ALSO</A></LI>
  26. </UL>
  27. <!-- INDEX END -->
  28.  
  29. <HR>
  30. <P>
  31. <H1><A NAME="name">NAME</A></H1>
  32. <P>Tk::Derived - Base class for widgets derived from others</P>
  33. <P>
  34. <HR>
  35. <H1><A NAME="supportedplatforms">SUPPORTED PLATFORMS</A></H1>
  36. <UL>
  37. <LI>Linux</LI>
  38. <LI>Solaris</LI>
  39. <LI>Windows</LI>
  40. </UL>
  41. <HR>
  42. <H1><A NAME="synopsis">SYNOPSIS</A></H1>
  43. <PRE>
  44.   package Tk::Whatever;
  45.   require Tk::Something;
  46.   require Tk::Derived;</PRE>
  47. <PRE>
  48.   @ISA = qw(Tk::Derived Tk::Something);</PRE>
  49. <PRE>
  50.   sub Populate
  51.   {
  52.    my ($cw,$args) = @_;
  53.    ...
  54.    $cw->SUPER::Populate($args);
  55.    $cw->ConfigSpecs(...);
  56.    ...
  57.   }</PRE>
  58. <P>
  59. <HR>
  60. <H1><A NAME="description">DESCRIPTION</A></H1>
  61. <P>Tk::Derived is used with perl5's multiple inheritance to override some
  62. methods normally inherited from Tk::Widget.</P>
  63. <P>Tk::Derived should precede any Tk widgets in the class's @ISA.</P>
  64. <P>Tk::Derived's main purpose is to apply wrappers to <CODE>configure</CODE> and <CODE>cget</CODE>
  65. methods of widgets to allow the derived widget to add to or modify behaviour
  66. of the configure options supported by the base widget.</P>
  67. <P>The derived class should normally override the <CODE>Populate</CODE> method provided
  68. by Tk::Derived and call <A HREF="#item_ConfigSpecs"><CODE>ConfigSpecs</CODE></A> to declare configure options.</P>
  69. <P>The public methods provided by Tk::Derived are as follows:</P>
  70. <DL>
  71. <DT><STRONG><A NAME="item_ConfigSpecs">->ConfigSpecs(-<EM>key</EM> => [<EM>kind</EM>, <EM>name</EM>, <EM>Class</EM>, <EM>default</EM>], ...)</A></STRONG><BR>
  72. <DD>
  73. </DL>
  74. <P>
  75. <HR>
  76. <H1><A NAME="see also">SEE ALSO</A></H1>
  77. <P><A HREF="../../../Tk/ConfigSpecs.html">Tk::ConfigSpecs</A>
  78. <A HREF="../../../site/lib/Tk/mega.html">Tk::mega</A></P>
  79. <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%>
  80. <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc">
  81. <STRONG><P CLASS=block> Tk::Derived - Base class for widgets derived from others</P></STRONG>
  82. </TD></TR>
  83. </TABLE>
  84.  
  85. </BODY>
  86.  
  87. </HTML>
  88.