[fpc-pascal] Case statement for class introspection

[Ryan Joseph]

> On Jan 17, 2022, at 5:09 PM, Sven Barth <pascaldragon at googlemail.com> wrote:
> 
> The VMT writer already does that, cause the VMT pointer is required for each constructor call. 
> 

The pointer to the VMT table is just PVmt(self) right? If I make a program and do:

writeln(PtrUInt(TObject.ClassType));

the address changes every time the program reloads (as expected) so how do you use a constant memory address which would map to this?

Regards,
	Ryan Joseph