Hallo!
Du holst Dir zwar die Adresse der Prozedur aus der
DLL, diese Prozedur rufst Du aber nie auf.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
lib := LoadLibrary('
keyboardhook.dll');
if lib <> INVALID_HANDLE_VALUE
then
begin
InstallHook := GetProcAddress(lib, '
InstallHook');
if Assigned(InstallHook)
then // prüfen, ob die entsprechende Prozedur überhaupt in der DLL gefunden wurde
InstallHook();
// und hier die Prozedur aufrufen, ggf. Parameter übergeben nicht vergessen!
end;
// else ERROR
end;
Es ist zu wahr um schön zu sein...