Perl Win32::API call WaitForMultipleObjects
Geizhals Preisvergleich Impressum | Werbung
 
Geizhals » Forum » Programmierung » Perl Win32::API call WaitForMultipleObjects (1 Beitrag, 57 Mal gelesen) Top-100 | Fresh-100
Du bist nicht angemeldet. [ Login/Registrieren ]
^ Forum  Programmierung  #5314052
Perl Win32::API call WaitForMultipleObjects
Norret Homepage
13.02.2009, 11:24:28
Ich versuche gerade verzweifelt die Funktion WaitForMultipleObjects aus der kernel32.dll in ein Perl Script zu importieren, was aber scheinbar nicht geht, da der Call sofort mit -1 retuniert.

our $dllWaitForMultipleObjects;
sub WaitForMultipleObjects($@$$){
my($nCount,@hHandles,$bWaitAll,$dwWaitTimeout) = @_;
if(not defined $dllWaitForMultipleObjects) { $dllWaitForMultipleObjects = new Win32::API('kernel32', 'WaitForMultipleObjects', 'IIII', 'I'); }
if(not defined $dllWaitForMultipleObjects) { die "Can't import API WaitForMultipleObject: $!\n"; }
return $dllWaitForMultipleObjects->Call($nCount,\@hHandles,$bWaitAll,$dwWaitTimeout);
}

So schaut die Import Funktion grundsätzlich aus, wobei ich mir mit dem Array absolut nicht sicher bin. Aufrufen tu ich das ganze folgendermaßen:


my @handles;
push(@handles,MyCreateProcess(0,0x12,"C:\\irgendwas.exe"));

my $ret = WaitForMultipleObjects(1,@handles,1,10000);
print $ret;

Zum Vergrößern klicken!
Picasa Webalbum
Antworten PM Übersicht Chronologisch
 
Melden nicht möglich
 

Dieses Forum ist eine frei zugängliche Diskussionsplattform.
Der Betreiber übernimmt keine Verantwortung für den Inhalt der Beiträge und behält sich das Recht vor, Beiträge mit rechtswidrigem oder anstößigem Inhalt zu löschen.
Datenschutzerklärung