Thread Globales Tasten-Event abfangen (win) (20 answers)
Opened by GoodFella at 2007-02-28 12:24

GoodFella
 2007-02-28 22:25
#74661 #74661
User since
2007-01-09
192 Artikel
BenutzerIn
[default_avatar]
[quote=esskar,28.02.2007, 17:26]mit Hilfe von CPAN:Win32::API ( oder noch besser CPAN:Win32::API::Interface ) könntest du dich in die Windows-Hooks einhängen.[/quote]
Also, mein erster Versuch scheitert mit der Fehlermeldung
Quote
Can't locate object method "SetWindowsHookEx" via package "MyModule" at test.pl line 11, <DATA> line 164.


Code:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

#!/usr/bin/perl
use strict;

package MyModule;
use base qw/Win32::API::Interface/;

__PACKAGE__->generate( "kernel32", "SetWindowsHookEx", "WH_MOUSE", \&test, "NULL", 0 );

1;

my $obj = MyModule->new();
$obj->SetWindowsHookEx();


sub test
 {
  print "Mouse Event\n";
 }


Ich war mir noch nie so unsicher mit Perlcode, hab einfach alles gelesen, was da stand und irgendwie miteinander verbunden. Hab noch nie eine package geschrieben, vielleicht liegts daran ... an API-Calls hab ich mich auch noch nie rangetraut.
Vielleicht magst du mir ja etwas unter die Arme greifen hierbei, esskar :)

View full thread Globales Tasten-Event abfangen (win)