Eigenes Package - Ungültige Zeigeroperation

[angelika81]

So, hier lade ich das Package:

Delphi-Quellcode:

try
      pModule := LoadPackage(files.Strings[i]);
      @proc := GetProcAddress(pModule, 'Plugin');

      if not Assigned(proc) then
        raise EPackageException.Erzeugen('Fehler beim Laden');

      plugin := proc(files.Strings[i], FKundendaten); // <-- Hier übergebe ich einen String und das Objekt, welches das Interface implementiert
      FPluginListe.Add(plugin); 
    except on E: Exception do
    begin
        UnloadPackage(pModule);
        raise E;
    end;
    end;