003
04.04.2011, 13:31 Uhr
~Gast
Gast
|
Hallo,
ihr versteht mich echt falsch. Ich bin kein Hacker.
Es geht darum, dass ein Programm erst gestartet werden darf nach dem ein spezieller Grafiktreiber gelaufen ist. Startet man das Programm vorher, so gibt es Fehler. Das Programm ist bereits abgenommen und sollte nicht mehr geändert werden.
Deshalb muss eine Lösung gefunden werden, ohne dass Programm zu ändern.
Inzwischen habe ich ein Perl-Script gefunden, mit welchem ich Maus/Tastatur sperren und wieder freigeben kann. Anstatt dem
muss ich nur noch den Treiber aufrufen.
| Code: |
use strict;
use Win32::API;
$|=1;
# Constants _BlockInput parameter
sub LOCK {1};
sub UNLOCK {0};
########################################################################
# Name : _BlockInput
#
#
#
# input : LOCK (1) = Lock Keyboard and Mouse
#
# UNLOCK (0) = Unlock Keyboard and Mouse
#
#
#
# !!! WARNING !!! a simple CTRL+ALT+DEL unblock all
#
########################################################################
sub _BlockInput
{
my $value = shift;
my $Library = "user32";
my $Function = "BlockInput";
my $ref_ParamsList = ['I'];
my $ReturnValue = 'I';
my $BlockInput = new Win32::API($Library, $Function, $ref_ParamsList, $ReturnValue) or die $^E;
$BlockInput->Call($value);
}
sub LockInput
{
_BlockInput( LOCK );
}
sub UnlockInput
{
_BlockInput( UNLOCK );
}
# Sample to use
print "START\n";
LockInput;
print "Try to move mouse and type keys ;-)\n";
sleep 5;
UnlockInput;
print "You are free now!\n";
print "END\n";
sleep 1;
exit;
|
|
