C++ DLL in Delhi nutzen, GetProcAddress gibt immer nil zurück

[MarioR]

Hallo,

ich habe eine C++ DLL diese enthält (zur Zeit) eine Funktion

Code:

 __declspec(dllexport) int getVersion() 
{   
   System::Console::Beep(500, 1000);
   return 2;       
}

Im Delphi versuche ich die "getVersion" aufzurufen:

Code:

...
    dllGetVersionName = 'getVersion@YAHXZ';
...
begin
    hRosiLib := LoadLibrary(libNamePath);
    if (hRosiLib<>0) then
    begin
      @vFuncVersion := GetProcAddress(hRosiLib, dllGetVersionName);
      if (Assigned(vFuncVersion)) then
      begin
        test :=  vFuncVersion();
        Result := '';
      end
      else
        Result := 'Fehler beim finden der Funktion['+dllGetVersionName+']';
      FreeLibrary(hRosiLib);
    end
    else
      Result := 'Fehler beim Laden der dll['+libNamePath+']!';
end;

Loadlibrary funktioniert, aber GetProcAddress liefert immer Nil.
"_cdecl und _stdcall" habe ich schon in allen Kombinationen ausprobiert.


DependencyWalker zeigt die Funktion als "int getVersion(void)" an
DLLEports2.0 als "?getVersion@@YAHXZ" bei _stdcall und "?getVersion@@YGHXZ" bei _cdecl.

...mmm... und nun ??
steht er da und hat keinen Schimmer wo es hackt.

Gruß Mario

[DeddyH]

Müsste es nicht einfach nur
dllGetVersionName = 'getVersion'; heißen?

[BUG]

Zitat von MarioR:

DependencyWalker zeigt die Funktion als "int getVersion(void)" an
DLLEports2.0 als "?getVersion@@YAHXZ" bei _stdcall und "?getVersion@@YGHXZ" bei _cdecl.

C++-Compiler machen Name-Mangling um z.B. überladenen Funktionen zu implementieren. Um die Funktion in anderen Sprachen nutzen zu können, ist es am einfachsten sie mit C-linkage zu deklarieren.

Code:

extern "C" __declspec(dllexport) int getVersion()
{   
   System::Console::Beep(500, 1000);
   return 2;       
}

Mehr findest du hier.

[uligerhardt]

Zitat von MarioR:

ich habe eine C++ DLL diese enthält (zur Zeit) eine Funktion

Code:

 __declspec(dllexport) int getVersion() 
{   
   System::Console::Beep(500, 1000);
   return 2;       
}

Mach doch ein extern "C" drumrum, dann hast du kein Name mangling.

BTW: System::Console::Beep schaut nach .NET aus. Ich könnte mir vorstellen, dass das später auch Probleme macht.

[Neutral General]

Zitat von uligerhardt:

BTW: System::Console::Beep schaut nach .NET aus. Ich könnte mir vorstellen, dass das später auch Probleme macht.

Das ist kein .NET

[uligerhardt]

Zitat von Neutral General:

Zitat von uligerhardt:

BTW: System::Console::Beep schaut nach .NET aus. Ich könnte mir vorstellen, dass das später auch Probleme macht.

Das ist kein .NET

Ich dachte, das wäre das hier in C++/CLI-Notation.

[Neutral General]

Zitat von uligerhardt:

Zitat von Neutral General:

Zitat von uligerhardt:

BTW: System::Console::Beep schaut nach .NET aus. Ich könnte mir vorstellen, dass das später auch Probleme macht.

Das ist kein .NET

Ich dachte, das wäre das hier in C++/CLI-Notation.

Mh jetzt bin ich mir dann doch nicht mehr ganz so sicher wie eben
Ich nehms zurück und überlasse die korrekte Antwort jemandem der sich wirklich auskennt

[uligerhardt]

Zitat von Neutral General:

Zitat von uligerhardt:

Zitat von Neutral General:

Zitat von uligerhardt:

BTW: System::Console::Beep schaut nach .NET aus. Ich könnte mir vorstellen, dass das später auch Probleme macht.

Das ist kein .NET

Ich dachte, das wäre das hier in C++/CLI-Notation.

Mh jetzt bin ich mir dann doch nicht mehr ganz so sicher wie eben
Ich nehms zurück und überlasse die korrekte Antwort jemandem der sich wirklich auskennt

Ist eigentlich auch egal und hat nichts mit dem akuten Problem zu tun. Aber ich würde sicherheitshalber einfach MessageBeep oder so aufrufen.

[MarioR]

Hallo Ihr alle,

... man seit Ihr schnell.
Hab leider 14:15 Feierabend und war heute Nachmittag unterwegs.

Zitat:

extern "C"

wird Morgen probiert.

Zitat:

Müsste es nicht einfach nur
dllGetVersionName = 'getVersion'; heißen?

Ja natürlich, das "olle" dllGetVersionName = 'getVersion@YAHXZ';
ist nur von meinen "verzweifelten" Versuchen übrig geblieben.

Zitat:

System::Console::Beep(500, 1000);

Ein Sound "HELLO" hab ich auf der schnelle nicht hin bekommen und wollte,
besser will nur mal hören, ob sie anläuft.

Die DLL soll eine Wrapperklasse für meine .NET-Entwicklungen damit mein
Kollege sie unter Delphi nutzen kann.


Gruß und vorerst Dankeschön
Mario