Source position: xlib.pp line 1335
function XCreateFontCursor(
ADisplay: PDisplay;
AShape: cuint
):TCursor;