RowInput Method
lazarus / 34-Windows

----------------------------------------------------------------------
Stilgar · 2012-05-01 21:12

Hi, everybody.
I'm try to reading keyboard through the use of RowInput method (WinXp)
I've trouble with handle entry point (WM_INPUT =$00FF) of my form.
It's never called  I've register my form with
Code: [Select]constructor TForm1.Create(aOwner : TComponent);
var
 Rid:array[0..0] of RAWINPUTDEVICE;
begin
  inherited;  
  // Keyboard
  Rid[0].usUsagePage := 1;
  Rid[0].usUsage := 6;
  Rid[0].dwFlags := 0;
  Rid[0].hwndTarget:=0;

  if not RegisterRawInputDevices(rid,1,SizeOf(RAWINPUTDEVICE)) then
    ShowMessageFmt('RegisterRawInputDevices
error=%d',[GetLastOSError]);

Somebody try this way? (I want bypass the latency on reading keyboard
repetition key)
Some other way to try?

Stilgar