Показать сообщение отдельно

perl tk абдейт label
  #1  
Старый 23.05.2007, 10:05
genom--
Постоянный
Регистрация: 09.07.2006
Сообщений: 937
Провел на форуме:
1948091

Репутация: 1686


По умолчанию perl tk абдейт label

вообщем есть такой код

$pr->Label(-text => "Записи-->base.txt:".hay('base.txt')." good.txt:".hay('good.txt')." ftps.txt:".hay('ftps.txt')." good_ftp.txt:".hay('good_ftp.txt') , -font => '{Tahoma} 7 bold',-foreground=>'red')->pack(-side => "top" ,-anchor => 's');

он отображает количество записей в том или ином фале через саб который и возвражает нужное значение

в процессе работы проги это значение меняется --- я вот застрял немогу сделать обновление инфы в этом лейбле -- например прога поработала дописала чтонить в файл good.txt и нужно потом заново прогнать этот лейбл для отображения нового количества записей ---

жду вашего совета
 
Ответить с цитированием