Mémoire managée et non managée

Question

Bonjour,

Je migre une application de VB6.0 vers VB.Net. Cette application embarque un OCX &#233;crit en C++. Dans cet OCX, j'ai une m&#233;thode qui prend un tableau d'entiers en argument.

long MaClasseCtrl::SetPalette(long NbC, long FAR* Palette)
{
   // Je parcours mon tableau
   for (long i=0; i<NbC;i++)
   {
      // mon op&#233;ration ...

      Palette++; // Je passe &#224; l'emplacement m&#233;moire suivant
   }
}

Au niveau de mon appli VB6.0, j'appelais cette m&#233;thode en lui passant le premier &#233;l&#233;ment du tableau (et tout allait bien) :

Dim Nb As Integer
Dim MonTableau(5) as Integer
' Je rempli mon tableau ...
Nb = 5
MonOCX.SetPalette 5,MonTableau(0)

Maintenant, avec le m&#234;me code d'appel en VB.Net, et en mode debug dans Visual C++, j'ai pu observer qu'il r&#233;cup&#232;re bien la premi&#232;re adresse m&#233;moire, mais quand je passe &#224; la suivante, il fait n'importe quoi.

De ce que j'ai pu lire, il faut &#233;crire un wrapper qui marshale mon tableau manag&#233; en tableau non manag&#233; ; mais je ne vois pas tr&#232;s bien par o&#249; commencer.

Merci d'avance pour votre aide

Bruno

ShareVB · Answer

salut,



la doc MSDN donne :

Declare Function SetPalette Lib "" (NbC As Integer, _
   <MarshalAs(UnmanagedType.LPArray, SizeParamIndex:=1)> _
   Palette() As Integer)



ShareVB

Mémoire managée et non managée

1 réponse

Discussions similaires