Долго вспоминал Це, потом понял, что это структура с полями - указателями на процедуры.
## Код:
```
IMPORT SYSTEM;

TYPE 
SDL_RWops = RECORD [untagged]
  seek: PROCEDURE (context: POINTER TO SDL_RWops; ptr: INTEGER (*и передавать SYSTEM.ADR *); size, maxnum: INTEGER);
  write: PROCEDURE (context: POINTER TO SDL_RWops; ptr: INTEGER; size, num: INTEGER);
  type: INTEGER;
  (* WIN32 *)
  hidden: RECORD [union]
     win32io: RECORD append: INTEGER; h: INTEGER END;
     stdio: RECORD autoclose: INTEGER; fp: INTEGER END;
     mem: RECORD base, here, stop: INTEGER END;
     unknown: RECORD data1: INTEGER END
  END
END
```
