AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Anfängerfrage zu Hooks

Ein Thema von derseitzer · begonnen am 6. Mär 2018 · letzter Beitrag vom 6. Mär 2018
 
Benutzerbild von Zacherl
Zacherl

Registriert seit: 3. Sep 2004
4.629 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#4

AW: Anfängerfrage zu Hooks

  Alt 6. Mär 2018, 14:43
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;
Projekte:
- GitHub (Profil, zyantific)
- zYan Disassembler Engine ( Zydis Online, Zydis GitHub)

Geändert von Zacherl ( 6. Mär 2018 um 14:54 Uhr)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:22 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz