sair do form com a tecla quot;escquot; ...

Delphi

01/07/2009

tenho um Form e neste Form tenho um componente TWebBrowser...

o problema:

se coloco um evento OnKeyDown, OnKeyPress ou OnKeyUp, onde se o usuário pressionar a tecla ´ESC´ feche o Form, funciona perfeitamente, porém, se o usuário clicar no componente TWebBrowser (tirando o foco do Form), o evento não funciona mais...

Obs: a propriedade KeyPreview do Form = True...

preciso da checagem da tecla, onde o foco estiver ... o TWebBrowser não tem os eventos OnKey...


abraços !!!


Danielrsanches

Danielrsanches

Curtidas 0

Respostas

Woinch

Woinch

01/07/2009

De uma olhada nesses dois artigos:

http://delphi.about.com/od/kbwinshell/a/delphi_hook.htm
http://delphi.about.com/od/windowsshellapi/a/keyboard_hook.htm

Creio que irão lhe ajudar...


GOSTEI 0
Osocram

Osocram

01/07/2009

usa um componente ActionList, cria uma action nele por exemplo acFechar.
No evento execute da action coloca close;
e no shortCut da action coloca ESC
pronto...


GOSTEI 0
Danielrsanches

Danielrsanches

01/07/2009

Woinch, obrigado pela dica, dei uma lida nos links, porém acho que complicou um pouco !!! rsrsrs

osocram, obrigado pela dica também, deu certíssimo!!!


obrigado a todos !!!


GOSTEI 0
Osocram

Osocram

01/07/2009

As ordens amigo...
usando esse ShorCut das Action, vc não precisa nem do KeyPreview do form.

Woinch, obrigado pela dica, dei uma lida nos links, porém acho que complicou um pouco !!! rsrsrs osocram, obrigado pela dica também, deu certíssimo!!! obrigado a todos !!!



GOSTEI 0
POSTAR