Source position: interfacebase.pp line 201
type TLoadCursorFunction = function(
hInstance: PtrUInt;
lpCursorName: PChar
):HCURSOR;