[Free Pascal] Implementacja interfejsu w bibliotece

[TSr]

Cel:
Chcę Napisać interfejs, a następnie zaimplementować go w dynamicznej bibliotece.

Jak próbuję to zrobić?:
Podam tutaj najprostszy przykład jaki udało mi się wymyślić

Mam interfejs i odpowiednią klasę implementującą:
[code=Delphi]
IFoo = interface(IInterface)
function Dodaj(a, b: IntegH[Y[B[BBHĘ[XY7BfgVć7FFF#FVvW\& quot;FVvW#7FF6Ć4)ęqn(Ż7zZaBYHX]QĘ]SN[B
Y[BQĘSŁDf7&VFSŚVćC3ĘdŁ9ŁzgĘjk
'Ł3ĘdĄihŚś'
.-jG^bppf ffó7&VFTff6tW76vRAMŃ5ź [/code]

Oczywiście pojawia się komunikat z napisem '5'. 8)

Teraz kiedy klasę TFoo oraz procedurę CreateFoo umieszczę w bibliotece to podczas wywołania CreateFoo dostaję Acces Violation Oczywiście CreateFoo jest poprawnie wyeksportowana i kiedy podmienię jej zawartość na coś prostego to program się nie wykrzacza.

Czy wie ktoś jak to rozwiązać?
Czy sprawdzi to ktoś w Delphi?