Appel API Windows en VS 2005 (VB)

Question

Bonjour
Quand j'appelle EnumProcess avec le prototype suivant (qui marche en VB6) :
    Declare Function EnumProcesses Lib "psapi.dll" (ByRef lpidProcess As Long, ByVal cb As Long, ByRef cbNeeded As Long) As Long

A l'exécution je récupère:
1. le message suivant :
PInvokeStackImbalance a été détecté
Message: Un appel à la fonction PInvoke 'TestsBaaN!TestsBaaN.Module1::EnumProcesses' a déséquilibré la pile. Cela peut se produire, car la signature PInvoke managée ne correspond pas à la signature cible non managée. Vérifiez que la convention d'appel et les paramètres de la signature PInvoke correspondent à la signature non managée cible.

2. dans le résultat : n'importe quoi.

Quelqu'un peut-il m'éclairer

Merci d'avance
Jean-François LASSALLE

Answer 1

Le site pinvoke.net dit que le bon prototype est :
<DllImport("psapi.dll", CharSet:=CharSet.Auto, SetLastError:=True)> _
Public Shared Function EnumProcesses( _
<MarshalAs(UnmanagedType.LPArray, ArraySubType=UnmanagedType.U4),[In],[Out]> _
ByVal processIds As Integer(), _
ByVal size As Integer, _
<[Out]()> ByRef needed As Integer) As Boolean
End Function

 

http://pinvoke.net/default.aspx/psapi/EnumProcesses.html

 

Mais en mon avis, c’est plus faciale à utiliser Process.GetProcesses() :
http://msdn2.microsoft.com/fr-fr/library/1f3ys1f9(VS.80).aspx

 

Answer 2

Pour information, il existe une fonction managées présente dans le Framework .NET qui permettent d'énumérer des processus :

 

Code Snippet

System.Diagnostics.Process.GetProcesses()

 

Cordialement