Das wäre der teil in dem es passiert.
hier werden im Finalization alle plug-ins augeladen
Delphi-Quellcode:
If Libs[
index].TheLibKind = lkBPL
then
UnloadPackage(Libs[
index].TheLibHandle)
else if Libs[
index].TheLibKind = lkDLL
Then
FreeLibrary(Libs[
index].TheLibHandle);
// <--- hier kommt die exception
Flist[
index] :=
nil;
Flist.Delete(
index);
Das ganze System oder auch nur die
unit sind wohl zu groß um hier hochgeladen zu werden.
Vermutlich müsste ich ein test Programm schreiben....
...dumm nur das der Fehler in einem Testprogramm auftritt in dem ich etwas ganz anderes testen wollte.
Edit1: Das
handle das freigegeben wird ist auch das selbe das erzeugt wurde. Und es wurde auch mit Loadlibary erzeugt.