tk :: columns

TK :: columns´Â Á¤·Ä ¹× »ó´çÇÑ ¿­ÀÌÀÖ´Â ¸ÖƼ Äݸ®Áò ¸ñ·Ï À§Á¬ÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

tk :: columns ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Damion K. Wilson
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~dkwilson/Tk-DKW-0.03/Tk/Columns.pm

tk :: columns ű×


tk :: columns ¼³¸í

TK :: Columns´Â Á¤·Ä ¹× »ó´çÇÑ ¿­ÀÌÀÖ´Â ¸ÖƼ Ä÷³ ¸ñ·Ï À§Á¬ÀÔ´Ï´Ù. TK :: columns´Â ºÐ¸íÇÏ°í »ó´çÇÑ Columns.Synopsis »ç¿ë TK :: ¿­À» »ç¿ëÇÏ´Â Multicolumn List À§Á¬ÀÔ´Ï´Ù. $ columns = $ »óÀ§ -> b ( '-columnlabels'=> 'listbackground '=>'white ','-listforeground '=>'black ','-buttonforeground => 'black' ','-ButtonBackground '=>'blue ',); $ columnheader = $ columns-> b ( '-listfont'=> '- - New Century Schoolbook-medium-r-normal - 14 - * - * - * - * - * - * - *'- ' '=>'º£ÀÌÁö ','-text '=>'column3 ','-width '=> 15,'-trimcount '=> 2,'-listbackground '=>'white ','-listforeground => ' Black ','-buttonforeground '=>'Black ','-buttonBackground '=>'Blue ','-sort '=>'true ','-sortcommand '=>'$ a cmp $ b ','-Image '=> $ icon_image,'-buttoncommand '=> sub {...},'-selectCommand '=> sub {...}); $ columns-> insert ( 'end', ); $ columns-> insert ( 'end', {column1 '=>'list ','column2 '=>'Çà ','column3 '=>'content '}); $ columns-> »ðÀÔ ( 'end', 'list', 'Çà', '³»¿ë'); $ columns-> »èÁ¦ (0, 'end'); ... TK :: MainLoop; ¿ä±¸ »çÇ× : ¡¤ Perl.


tk :: columns °ü·Ã ¼ÒÇÁÆ®¿þ¾î