R и gWidgets: триггер события при закрытии виджета

Question

В настоящее время я работаю над небольшим графическим интерфейсом с использованием gWidgets (RGtk2). У меня возник вопрос, который я не смог решить самостоятельно, используя документацию, представленную в пакете gWidgets:

Возможно ли инициировать событие, то есть функцию, когда пользователь нажимает на красный крест, чтобы закрыть GUI/виджеты/главное окно? Для удобства использования я не хочу иметь дополнительную кнопку, хотя она определенно будет работать.

PS: Я не думаю, что здесь нужен пример, но если кто-то из вас настаивает, я добавлю его.

Answer 1

Попробуйте

addhandlerdestroy(myWidget, handler = f_exit) 

где

f_exit <- function(h,... 
{ 
    # your code, maybe simply 
    dispose(myWidget) 
}