Didn’t you say: FHook := THook.Create;
so you need a FHook.Free call? The class is THook = class(TInterfacedObject, IHook) right? > On Sep 6, 2017, at 4:24 PM, Graeme Geldenhuys <[email protected]> > wrote: > > I changed the destructor to the code shown below. Just so you know, I tried > this before I posted the message, and it didn't make any difference. FHook is > a IHook interface reference, not a object reference. I can't change it > either, otherwise FPC gives me a compiler error on the property ... > implements...; line. Regards, Ryan Joseph _______________________________________________ fpc-pascal maillist - [email protected] http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
