Perhaps try
Code:
{$Mode Delphi}
or
Code:
type
   pOnReType = OnReType^;