Re: [clubSmalltalk] Capturar tecla Escape

[GallegO]

Hola:

Fijate implementors de #onKeyPressed:

Saludos
GallegO

El día 19 de octubre de 2009 09:14, Cristian Sebastian Fiasco Miliante
<cristianfia...@gmail.com> escribió:
> Hola:  estoy necesitando capturar el evento cuando aprieto la tecla escape.
> Es decir,  cuando aprieto la tecla Esc, tengo que llamar a un método, como
> lo puedo hacer?
>
> Gracias, cristian
>
> >
>

[GallegO]

Hola:

Fijate como registras los eventos, te paso un ejemplo, que no es un
pattern ya que tenes que fijarte como te conviene registrar los
eventos. El ejemplo es una prueba de que funciona como uno espera.

"Filed out from Dolphin Smalltalk X6"!

Presenter subclass: #KeyLogPresenter
instanceVariableNames: ''
classVariableNames: ''
poolDictionaries: ''
classInstanceVariableNames: ''!
KeyLogPresenter guid: (GUID fromString:
'{DBB65D0B-D25E-46CE-AE7A-AB0DB35F908D}')!
KeyLogPresenter comment: ''!
!KeyLogPresenter categoriesForClass!MVP-Presenters! !
!KeyLogPresenter methodsFor!

onViewKeyPressed: keyEvent

Transcript print: keyEvent; cr!

onViewOpened

super onViewOpened.
self topShell when: #keyPressed: send: #onViewKeyPressed: to: self! !
!KeyLogPresenter categoriesFor: #onViewKeyPressed:!public! !
!KeyLogPresenter categoriesFor: #onViewOpened!public! !