TFOS_PtrCast

type TFOS_PtrCast = packed record

  case Byte of

    0: (

        ptr: pointer;

      );

    1: (

        adr: PtrUint;

      );

    2: (

        val: PtrInt;

      );

    3: (

        vskk: Byte;

      );

end;