Модераторы: ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> perl Tk::Listbox, условия выбора элемента Listbox 
:(
    Опции темы
spens
Дата 27.12.2007, 18:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 27.12.2007

Репутация: нет
Всего: нет



имеем лист во фрейме 

Код

$list = $frame->Listbox(-width => 15)->pack....
$insert = $list->insert('end', "1", "2", "3");
$action->bind('<Button-1>', \&list);


при таком варианте тычек левой мышой по любому элементу списка будет вызывать функцию &list

можно ли как нибудь организовать условие проверки выбора элемента?

т.е при тычке на "1" будет выполняться &list, при "2" - &list2 и т.д

пробовал через метод curselecton() - не получилось.
PM MAIL   Вверх
Ramirez
Дата 28.12.2007, 00:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 305
Регистрация: 18.1.2005
Где: Moscow, ExUSSR

Репутация: нет
Всего: 5



у меня получалось только методом: тычек - обработчик - смотрим содержимое выделенного элемента - вызываем нужную функцию
PM ICQ   Вверх
spens
Дата 28.12.2007, 10:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 27.12.2007

Репутация: нет
Всего: нет



Цитата(Ramirez @ 28.12.2007,  00:20)
у меня получалось только методом: тычек - обработчик - смотрим содержимое выделенного элемента - вызываем нужную функцию

Ну это несколько неудобно.
Мне Listbox нужна для обработки списка аля почтовый клиент Inbox, Sent, Trash и т.д.

Это сообщение отредактировал(а) spens - 28.12.2007, 10:36
PM MAIL   Вверх
spens
Дата 28.12.2007, 12:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 27.12.2007

Репутация: нет
Всего: нет



Tk::HList решает проблему
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: GUI | Следующая тема »


 




[ Время генерации скрипта: 0.0782 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.