I get an access violation while trying to call an anonymous method from a Pointer variable
Pointer
var Proc : TProc; Pt : Pointer; begin Proc := pr