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.