Einzelnen Beitrag anzeigen

EWeiss
(Gast)

n/a Beiträge
 
#5

AW: Anfängerfrage zu Hooks

  Alt 6. Mär 2018, 19:31
Welchen Hook Typ verwendest du? Mit der nicht low-level Variante der Keyboard Hooks hatte ich auch schonmal Probleme. Läuft irgendeine Art von Sicherheits-Software?

Edit:
Folgender Code funktioniert bei mir unter Windows 10 - 64 Bit (für WH_KEYBOARD_LL benötigt man sogar nichtmal eine Dll ):
Delphi-Quellcode:
var
  Hook: HHOOK;

function TestHook(code: Integer; wparam: WPARAM; lparam: LPARAM): LRESULT stdcall;
begin
  Winapi.Windows.Beep(1000, 50);
  Result := CallNextHookEx(Hook, code, wparam, lparam);
end;

procedure TfrmMain.Button1Click(Sender: TObject);
begin
  Hook := SetWindowsHookEx(WH_KEYBOARD_LL, TestHook, hInstance, 0);
  if (Hook = 0) then RaiseLastOSError;
end;
Interessant..
Nur was sagen die Malware, Virenscanner?

gruss
  Mit Zitat antworten Zitat