ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Yuri Kostylev                        2:5050/61.1    04 Dec 2004  18:27:09
 To : All
 Subject : Tk
 -------------------------------------------------------------------------------- 
 

 .RFC-X-Complaints-To: news@my.at.home.net
 .RFC-NNTP-Posting-Date: 4 Dec 2004 13:27:09 GMT
 .RFC-Cancel-Lock: sha1:wXh1Qb69p/P9WSU9rPreuGYlvDQ=
 From: Yuri Kostylev <Yuri.Kostylev@p1.f61.n5050.z2.fidonet.org>
 Я  торможу?
 
 for(1..5) {
   $some_widget -> Button(-text=>"Button $_", -command=>\&pressed);
 }
 sub pressed {
   # как здесь узнать, на какую кнопку нажали?
   # в tcl, python - элементарно...
   # @_ - пусто
 }
 -- 
 Rydw i'n mynd i aros yma.  ICQ 217840168
 
 --- Gnus/5.1006 (Gnus v5.10.6) Emacs/21.2 (gnu/linux)
  * Origin: Izhevsk (2:5050/61.1@fidonet)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    Tk   Yuri Kostylev   04 Dec 2004 18:27:09   Re: Tk   Yuri Kostylev   05 Dec 2004 15:02:27