cs_Jacck
Messages postés2Date d'inscriptionmercredi 3 mars 2004StatutMembreDernière intervention 8 mars 2004
-
8 mars 2004 à 03:11
BruNews
Messages postés21040Date d'inscriptionjeudi 23 janvier 2003StatutModérateurDernière intervention21 août 2019
-
8 mars 2004 à 18:23
Bonjour a tous,
J'ai un gros problème! J'ai écris une dll en c++ avec VC++ 6.0 Enterprise, en utilisant le win32 dll wizard. J'ai ajouté mes fonctions comme celle de l'exemple et comme celles des tutorials que j'ai vu sur le net. Malgré tout ceci, lorsque j'essaie d'utiliser la dll en VB, les parametres ne passent pas correctement, et les retours sont corrects seulement si il s'agit de constantes (ex: "return 24;" donne 24, mais "int myvar = 24; return myvar;" donnera un chiffre aléatoire). Je ne sais pas si il s'agit de ma dll, ou de vb, mais j'aimerais bcp avoir de l'aide. Merci d'avance de m'aider.
Je suis en train de travailler sur un gros projet avec un ami, une invention un peu bizzaroide, et j'ai absolument besoin de terminer toute la programmation avant le 20 mars 2004. Je remercie énormément tout ceux qui voudront m'aider, meme la plus petite information est précieuse. Nous travaillons avec VB 6.0 et VC++ 6.0 Enterprise. Répondez ici et si vous avez des questions, écrivez moi directement à l'adresse suivente " aidez.nous@xerolab.tk ". Vous pouvez aussi visiter mon site www.xerolab.4t.com pour plus d'information sur mon projet.
cs_Jacck
Messages postés2Date d'inscriptionmercredi 3 mars 2004StatutMembreDernière intervention 8 mars 2004 8 mars 2004 à 17:39
voici la source de la dll, avant que les fonctions ne soient remplis (prend moins de place, et c bcp plus compréhensible)
XLdll.cpp:
#include <windows.h>
extern "C" int __stdcall bnFuncA(int dwcode) // export dans le def
{
dwcode++;
return dwcode;
}
extern "C" int __stdcall bnFuncB(char *pszfile) // export dans le def
{
// code fonction
return 0;
}
XLdll.def:
LIBRARY XLdll
EXPORTS
bnFuncA
bnFuncB
Code VB
Module:
(je n'utilise que la fonction bnFuncA pour l'instant)
Public Declare Function bnFuncA Lib "C:\Documents and Settings\--**Mon nom a moi ;) **--\My Documents\Visual Studio Projects\XLdll\Release\XLdll.dll" (dwcode As Long) As Long
code:
Private Sub Command1_Click()
Dim Data As Long If Check1.Value 1 Then Data 1 If Check1.Value 2 Then Data 2 If Check1.Value 3 Then Data 3 If Check1.Value 4 Then Data 4
Label1.Caption = bnFuncA(Data)
End Sub
Le code VB est utilisé seulement pour le test, et sera remplacé par qqchose de plus utile. Pour l'instant, si je mets dans la dll c++ "return 0;" la valeur du Label1.Caption est de 0, mais si je mets le code qui retourne une variable, peu importe la valeur de Data, la valeur de Label1.Caption est de "1242189"