Exportierte Funktion aus Exe mit GetProcAddress

[Neutral General]

Hallo,

Der Titel ist etwas unklar glaube ich daher eine Erklärung:
Ich habe eine Programm, das dynamisch per LoadLibrary eine DLL lädt.
Jetzt möchte ich aus der DLL heraus eine von der EXE exportierte Funktion aufrufen (quasi "falsch rum").
Das müsste doch möglich sein oder nicht?

Code sieht ca. so aus:

Delphi-Quellcode:

library MeineDLL;

uses
  MeineDLLUnit;

begin

end.

Delphi-Quellcode:

unit MeineDLLUnit;

interface

function GetModuleHandleW(lpModuleName: PChar): Cardinal; stdcall; external 'kernel32.dll';
function GetProcAddress(hModule: Cardinal; lProcName: PChar): Pointer; stdcall; external 'kernel32.dll';

implementation

var
  hMod: Cardinal;
  DemoFunc: function: Integer;
  dummy: Integer;

initialization
  hMod := GetModuleHandleW(nil);
  DemoFunc := GetProcAddress(hMod, 'Demo');
  dummy := DemoFunc();

end.

Hier noch ein kleiner Ausschnitt aus der exe:

Delphi-Quellcode:

program MeineExe;

function Demo: Integer;
begin
  Result := 1234;
end;

exports
  Demo;

begin
  // ...
  LoadLibrary('MeineDLL.dll'); // Absoluter Pseudocode
  // ...
end.

Ich bekomme von GetProcAddress aber immer nil zurück.
Habe debugged und GetModuleHandleW liefert den richtigen Wert zurück. Aber GetProcAddress schlägt dann fehl mit GetLastError = ERROR_PROC_NOT_FOUND
Der PE Explorer findet die "Demo" Funktion in der exe.

[Fritzew]

Ich bin mir nicht sicher ob Delphi aus einer Exe wirklich exportiert.........

Aber ansonsten:

Use LoadLibraryEx Function and DONT_RESOLVE_DLL_REFERENCES parameter

[Neutral General]

Wie schon oben reineditiert: (siehe Anhang)

Mit LoadLibraryEx + DONT_RESOLVE_DLL_REFERENCES wird die DLL gar nicht initialisiert. (Mein Code wird gar nicht ausgeführt).
Das ist auch nicht Sinn der Sache

[Fritzew]

Kann sein das ich das nicht mehr richtig im Kopf hatte.
Aber ansonsten was spricht gegen eine CallBack Function die Du als Parameter an die Dll übergibst? Das wäre wohl der "normale" Weg....

[TiGü]

Ja,dass geht problemlos. Morgen gerne mit Code.
Aber warum definierst du die Get... selbst? Die sind doch bestimmt in Winapi.Windows schon drin.
Die Module-Handles mit Cardinal zu definieren ist jedenfalls so unschön/fehleranfällig/der direkte Weg in die Hölle unter 64-Bit.

[hoika]

Hallo,
hat den hMod einen anständigen Wert?