Hmm..
Hat mir keine Ruhe gelassen und dass gefunden:
https://www.codeproject.com/Articles...k-to-selective
Damit habe ich eine vereinfachte Umsetzung als Test gemacht.
Im Artikel wird noch auf verschiedene Probleme mit schnellem Tippen oder fehlenden Messages eingegangen, was ich im ersten Test ignoriert habe.
Hiermit konnte ich z.B. mit einem USB-Barcodescanner im Notepad Scannen, ohne dass dessen Keyevents dort auftauchten.
Getestet mit Delphi 6 auf Windows 7 64bit.