Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi KeyHook mit TJvShellHook? (https://www.delphipraxis.net/46724-keyhook-mit-tjvshellhook.html)

glkgereon 30. Mai 2005 14:56


KeyHook mit TJvShellHook?
 
Hi

es gibt ja die JclKompo TJvShellHook.

dazu meine frage: wie funktioniert die?
ich denke mal das man im OnShellMessage-Event die Message kriegt und verarbeiten kann.

dazu:
welche messages kommen an? alle?
wie kann ich Tastatur-Inputs rausfiltern?
wie kann ich Messages einfach nur weiterleiten?

toms 30. Mai 2005 18:25

Re: KeyHook mit TJvShellHook?
 
Zitat:

Zitat von glkgereon
Hi

es gibt ja die JclKompo TJvShellHook.

dazu meine frage: wie funktioniert die?
ich denke mal das man im OnShellMessage-Event die Message kriegt und verarbeiten kann.

dazu:
welche messages kommen an? alle?

Schau mal in der unit JvShellHook:

Zitat:

const
HSHELL_WINDOWCREATED = 1;
{$EXTERNALSYM HSHELL_WINDOWCREATED}
HSHELL_WINDOWDESTROYED = 2;
{$EXTERNALSYM HSHELL_WINDOWDESTROYED}
HSHELL_ACTIVATESHELLWINDOW = 3;
{$EXTERNALSYM HSHELL_ACTIVATESHELLWINDOW}
usw...

Zitat:

wie kann ich Tastatur-Inputs rausfiltern?
Gar nicht mit einem Shell Hook.

Zitat:

wie kann ich Messages einfach nur weiterleiten?
Indem du den var Parameter Msg unberuehrt laesst, d.h nicht veraenderst.

glkgereon 30. Mai 2005 18:35

Re: KeyHook mit TJvShellHook?
 
Zitat:

Zitat von toms
Zitat:

wie kann ich Tastatur-Inputs rausfiltern?
Gar nicht mit einem Shell Hook.

gibts ne andere Kompo dafür? :)

shortcuts würden mir auch reichen...

toms 30. Mai 2005 18:47

Re: KeyHook mit TJvShellHook?
 
z.B mit der TWatch Komponente.

Mit dieser kannst du Maus, Tastatur und Shell Events abfangen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:55 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz